property OnSpeak: TPdfReadingSpeakEvent;
處理常式會收到區塊文字與一個 Interrupt 旗標,告知主機端是否要先清除目前的語音佇列
Interrupt
procedure TForm1.ReadingSessionSpeak(Sender: TObject; const Text: WString; Interrupt: Boolean);begin SpeechEngine.Speak(Text, Interrupt);end;