property OnSpeak: TPdfReadingSpeakEvent;
Обробник отримує текст фрагмента та прапорець Interrupt, що повідомляє хостові, чи слід спочатку очистити поточну чергу мовлення
procedure TForm1.ReadingSessionSpeak(Sender: TObject; const Text: WString; Interrupt: Boolean);
begin
SpeechEngine.Speak(Text, Interrupt);
end;