function DocumentReadingUnits: TPdfReadingUnits;
TPdfReadingUnitsLeseenheter holder overskrifter og figur-erstatningstekst hele, deler avsnittekst ved setningsgrenser, bevarer desimaltegn og lar lesemarkøren være en matriseindeks eid av kalleren
Bruk Rects sammen med TPdfView.SetReadingHighlight og Language for å koordinere visuell fremheving med en TTS-stemme
var Units: TPdfReadingUnits;
begin
Units := Pdf1.DocumentReadingUnits;
if Length(Units) > 0 then
Memo1.Lines.Add(Units[0].Text);
end;