function EstimateSpokenWordIndex(const Words: TPdfWordBoxes; ElapsedMs: Cardinal; WordsPerMinute: Integer): Integer;
| Words | TPdfWordBoxes - Kata-kata dalam potongan yang sedang diucapkan |
| ElapsedMs | Cardinal - Milidetik yang berlalu sejak potongan saat ini mulai diucapkan |
| WordsPerMinute | Integer - Laju ucapan yang diestimasi, atau 0 untuk memakai default 175 WPM |
-1 ketika rentang kosong atau jadwal estimasi telah selesaiHelper ini menganggarkan seluruh rentang sebagai satu kata per 60000 / WordsPerMinute milidetik
Tiap kata menerima bagian dari anggaran tersebut sebanding dengan panjang teksnya ditambah bobot jeda antar-kata kecil
TPdfReadingSession.Tick memakai helper ini ketika EstimatePacing diaktifkanWordIndex := EstimateSpokenWordIndex(Words, ElapsedMs, 175);
if WordIndex >= 0 then
PdfView1.SetReadingWord(Words[WordIndex]);