Thema: FreePascal Sprachsteuerung

Einzelnen Beitrag anzeigen

alexkneo

Registriert seit: 12. Feb 2016
11 Beiträge
 
#1

Sprachsteuerung

  Alt 12. Feb 2016, 14:21
Hallo, ich arbeite mit der neusten Version von Lazarus da ich kein Delphi habe, ich möchte mein Programm sprachsteuern, z.B sage ich:"Hallo" und der Pc (Lazarus) antwortet mir:"Hallo User" oder ähnliches. Wie ich eine den Pc zum sprechen bringe habe ich schon herausgefunden.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
   SpVoice := CreateOleObject('SAPI.SpVoice');

  SavedCW := Get8087CW;
  try
    Set8087CW(SavedCW or $4);
    SpVoice.Speak('Hallo',0);
  finally

    Set8087CW(SavedCW);
end;
Das Problem ist wie der Pc(Lazarus) meine Stimme erkennt oder das Wort erkennt und mir dann was zurücksagt.
Ich will das ganze nicht per Microsoft Speech oder so machen sondern wirklich mit Pascal(Lazarus). Danke im vorraus

Da ich noch nicht gerade der Pro in Pascal bin (ich hab es jetzt seid einem halben Jahr in der Schule, bin 9.Klasse) wäre es nett wenn ihr das ganze ausführlich erklärt, da ich es ansonsten vielleicht nicht verstehe. Danke

Geändert von TBx (13. Feb 2016 um 13:46 Uhr) Grund: Zwei aufeinanderfolgende Postst concateniert und Delphi-Tags eingefügt
  Mit Zitat antworten Zitat