function DocumentReadingUnits: TPdfReadingUnits;
TPdfReadingUnitsLas unidades de lectura mantienen los encabezados y el texto alternativo de las figuras completos, dividen el texto de los párrafos en los límites de oración, preservan los puntos decimales y dejan el cursor de lectura como un índice de arreglo propiedad del llamador
Use Rects con TPdfView.SetReadingHighlight y Language para coordinar el resaltado visual con una voz de TTS
var Units: TPdfReadingUnits;
begin
Units := Pdf1.DocumentReadingUnits;
if Length(Units) > 0 then
Memo1.Lines.Add(Units[0].Text);
end;