Mit folgendem Text kann man sich ganz einfach Texte vorlesen lassen.
Code:
uses Comobj;
procedure TForm1.Button1Click(Sender: TObject);
var
voice: OLEVariant;
begin
voice := CreateOLEObject('
SAPI.SpVoice');
voice.Speak('Hello World!', 0);
end;
Leider nur, wenn man XP besitzt... und wenn man seine Texte mit einem starken englischen Akzent hören möchte. Kurzum, es wird englisch gesprochen
Kann mir mal jemand sagen, wie ich das auf deutsch hinbekomme???