function EstimateSpokenWordIndex(const Words: TPdfWordBoxes; ElapsedMs: Cardinal; WordsPerMinute: Integer): Integer;
| Words | TPdfWordBoxes - Ord i delen som for øyeblikket leses opp |
| ElapsedMs | Cardinal - Millisekunder gått siden den gjeldende delen begynte å leses opp |
| WordsPerMinute | Integer - Estimert talehastighet, eller 0 for å bruke standard 175 WPM |
-1 når området er tomt eller den estimerte tidsplanen er ferdigHjelpefunksjonen tildeler hele området ett ord per 60000 / WordsPerMinute millisekunder
Hvert ord får en andel av dette budsjettet proporsjonal med tekstlengden, pluss en liten pausetyngde mellom ordene
TPdfReadingSession.Tick bruker denne hjelpefunksjonen når EstimatePacing er aktivertWordIndex := EstimateSpokenWordIndex(Words, ElapsedMs, 175);
if WordIndex >= 0 then
PdfView1.SetReadingWord(Words[WordIndex]);