Einzelnen Beitrag anzeigen

tobif

Registriert seit: 11. Jul 2003
27 Beiträge
 
#1

MS Agent Sprache ändern und aufnehemen

  Alt 7. Nov 2005, 21:20
Hallo,

eigentlich hab ich geleich 2 Fragen:

Mit dem MS Agent kann ich ja Text ausgeben
Agent.Characters.Item['Merlin'].Speak('Test','');

soweit klappt ja auch alles. Leider hab ich aber Deutsch zuerst installiert, aber will jetzt Englisch ausgeben. Die Engine und die Sprachdatei sind auch installiert. Aber wie ändere ich nun die Sprache oder wenigstens die Stimme (männlich, weiblich) in Delphi.

Von einer
VB-Seite
erhalte ich folgendes, wie kann ich dies nun in Delpie umschreiben

Agent1.Characters("Peedy").LanguageID = &H809

vielleicht &H809 strtoint('$H809'); Das klappt aber nicht

Agent1.Characters("Peedy").TTSModeID = _"{227A0E40-A92A-11D1-B17B-0020AFED142E}"
wird zu
Agent1.Characters("Peedy").TTSModeID := '{227A0E40-A92A-11D1-B17B-0020AFED142E}';

das klappt aber auch nciht.
Wei jemand wie das funktionert, bzw wie sin die ID codes.

Mein zweites Problem ist wahrschienlich einfacher:
wie kann ich mit delphi, das gesprochene des agenten in datei speichern bzw. alles von der soundkarte mitschneiden?

cu
tf
  Mit Zitat antworten Zitat