Du könntest die SpeechLib_TLB.pas benutzen.
Dort ist das Server-Object
// ************************************************** *******************//
// OLE-Server-Proxy-Klassendeklaration
// Server-Objekt : TSpVoice
// Hilfe-String : SpVoice Class
// Standard-Interface: ISpeechVoice
// Def. Intf. DISP? : No
// Ereignis-Interface: _ISpeechVoiceEvents
// TypeFlags : (2) CanCreate
// ************************************************** *******************//
TSpVoice = class(TOleServer)
Mit SpVoice1.Skip('Sentence', MaxInt) kannst du die Sprachausgabe stoppen
Mit SpVoice1.Pause pausieren etc. Der OleServer läßt keine Wünsche offen.