Sprachausgabe von Texten

[hathor]

http://www.delphipraxis.net/internal...492&highlight=

[sventeq]

Zitat:

Zitat von hathor

http://www.delphipraxis.net/internal_redirect.php?t=136492&highlight=

da gab es dann den Link zur Steffi...juhu...endlich in deutsch. Es hieß zwar "Steffi für Vista", aber sie ließ sich auch auf XP installieren und funktioniert einwandfrei.

Schönen Dank an alle

[sventeq]

Eine Kleinigkeit wär da noch. Sobald ich den Kopf drücke und die Sprachausgabe erfolgt, steht in der Titelleiste des Fensters der Text den ich ausgebe. Kann man das irgendwie abschalten?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  voice: OLEVariant;
begin
  text:='Autofahrt';
  voice := CreateOLEObject('SAPI.SpVoice');
  voice.Speak(text, 0);
end;

danke nochmal für Hilfe
Sven