ipad下载雷竞技-雷竞技app苹果下载官方版

本文由  于 2019-12-6 11:51 发布在  Delphi    

 

uses  ComObj;

procedure TForm1.btn1Click(Sender: TObject);
var
  voice: OLEVariant;
begin
  voice := CreateOLEObject('SAPI.SpVoice');
  voice.Speak(Memo1.Text, 0);
end;

 

 

最新评论
网站管理  |  赵猛的个人主页  |  手机版  |  RSS  |  留言建议  |  关于本站  |  联系方式

All Rights Reserved. Powered by emlog Themes by 大智若愚
网站备案号:苏ICP备15011688号-1