property OnSpeak: TPdfReadingSpeakEvent;
处理器接收分块文本和一个 Interrupt 标志,告诉宿主是否先清除当前语音队列
Interrupt
procedure TForm1.ReadingSessionSpeak(Sender: TObject; const Text: WString; Interrupt: Boolean);begin SpeechEngine.Speak(Text, Interrupt);end;