TPdfSpokenTextprocedure SpokenTextAppend(var Spoken: TPdfSpokenText; const SpokenPart: WString; Page, StartIndex: Integer; SourceCount: Integer = -1);
| Spoken | TPdfSpokenText - Potongan yang menerima teks lisan dan entri span |
| SpokenPart | WString - Run teks yang diteruskan ke mesin ucapan |
| Page | Integer - Nomor halaman sumber berbasis satu |
| StartIndex | Integer - Indeks karakter sumber FTextPage berbasis nol |
| SourceCount | Integer - Jumlah karakter sumber, atau -1 untuk memakai panjang run lisan |
SpokenTextAppend menambahkan SpokenPart ke Spoken.Text dan mencatat TPdfSpokenSpan yang memetakan offset lisan kembali ke teks halaman
Ketika Spoken.Text sudah memiliki konten, helper ini menyisipkan satu spasi pemisah sebelum run baru; pemisah tersebut sengaja tidak dipetakan
Spoken.Text := '';
Spoken.Spans := nil;
SpokenTextAppend(Spoken, UnitText, 1, UnitStart, UnitLength);