Esta versión localizada revisa Word-by-Word TTS Highlighting in Delphi PDFium Viewers tomando como referencia el artículo base en inglés ya actualizado para equipos que trabajan con Delphi, PDF y software documental
La página convierte la versión base actualizada en puntos de control prácticos para diseño, implementación y validación
Contenido sincronizado desde la versión base
El artículo base se amplió con contexto práctico, decisiones técnicas y ejemplos concretos, por lo que esta página debe leerse como una guía de trabajo y no como un resumen breve
Puntos importantes de la versión actualizada:
- Trabaje primero con archivos de entrada pequeños y reproducibles
- Mantenga intactos nombres de producto, API, archivos y valores literales
- Guarde la salida del validador y las versiones junto con el archivo de prueba generado
Decisiones prácticas de implementación
Empiece por el tipo de archivo, el resultado esperado y el error que debe ver el usuario. Después vincule cada llamada API con un resultado verificable para que validación, registros y soporte puedan reproducir el caso del cliente
- Trabaje primero con archivos de entrada pequeños y reproducibles
- Mantenga intactos nombres de producto, API, archivos y valores literales
- Guarde la salida del validador y las versiones junto con el archivo de prueba generado
Código y puntos API
Los ejemplos de código se conservan sin cambios para poder compararlos directamente con proyectos Delphi, C++Builder y Lazarus/FPC
procedure TReaderForm.PreparePage(PageNo: Integer);
begin
PdfView.PageNumber := PageNo; // the view's word boxes track its displayed page
FWords := PdfView.PageWordBoxes;
FPageText := BuildSpeechText(FWords); // concatenate Word.Text in order
if Length(FWords) = 0 then
HandleImageOnlyPage(PageNo); // a scan with no text layer
end;procedure TReaderForm.OnSpeechWordBoundary(StreamPos: Integer);
var
WordIdx: Integer;
begin
// Maps the offset to a word box and moves the highlight in one call
WordIdx := PdfView.TrackReadingWordAt(FPageNo, StreamPos);
if WordIdx < 0 then
Exit; // boundary fell outside any word: keep last highlight
end;procedure TReaderForm.StopReading;
begin
FVoice.Stop; // halt SAPI playback first
PdfView.ClearReadingWord; // then remove the highlight; a stale cursor reads as a bug
end;Comprobación antes de publicar
Revise el archivo de salida con las mismas herramientas que usará el cliente o el archivo documental. Registre versión del componente, datos de prueba, versión del validador y resultado observado