Mega Code Archive

 

Categories / Delphi / Multimedia

 

Ms speech örneği

uses Comobj; procedure TForm1.Button1Click(Sender: TObject); var voice: OLEVariant; begin voice := CreateOLEObject('SAPI.SpVoice'); voice.Speak('Hello World!', 0); end;