|
Registriert seit: 27. Nov 2017
2.490 Beiträge
Delphi 7 Professional
|
AW: TTS in Windows?
15. Mär 2023, 18: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 
|