02-05-2014, 09:29 AM
السلام عليكم
طود بسيط لانشاء برنامج ينطق الكلمات بأستخام Microsoft Speech API
الكود كما يلي
طود بسيط لانشاء برنامج ينطق الكلمات بأستخام Microsoft Speech API
الكود كما يلي
كود :
uses Comobj;
procedure TForm1.Button1Click(Sender: TObject);
var
voice: OLEVariant;
begin
voice := CreateOLEObject('SAPI.SpVoice');
voice.Speak('Hello World!', 0);
end;