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