Einzelnen Beitrag anzeigen

Delphi.Narium

Registriert seit: 27. Nov 2017
2.419 Beiträge
 
Delphi 7 Professional
 
#9

AW: TTS in Windows?

  Alt 15. Mär 2023, 17:08
Hallo TurboMagic,
richtig toll wäre es gewesen, wenn du deine Lösung präsentiert hättest.

Alternativ hier:

Delphi-Quellcode:
procedure TFormMain.Voice(text:string);
var
  OLE_voice:OleVariant;
begin
  OLE_voice:=CreateOleObject('SAPI.SpVoice');
  OLE_voice.speak(text);
end;
Geht ab Delphi XE6 und Windows 10.

Thomas
Funktioniert auch mit Delphi 7
  Mit Zitat antworten Zitat