線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:102
推到 Plurk!
推到 Facebook!

有關speech to text的問題

尚未結案
angellin0524
一般會員


發表:1
回覆:0
積分:0
註冊:2017-09-28

發送簡訊給我
#1 引用回覆 回覆 發表時間:2017-09-28 20:59:51 IP:112.105.xxx.xxx 未訂閱
請問
我要做一個speech to text的功能
打算用Microsoft 的 bing speech處理
現在已經連好token
目前遇到的問題是
怎麼取得語音 上傳語音至API 轉為文字 回傳下來

不好意思
因為這個課題卡了很久 也上網爬過很多文 還是沒有處理的方法
只好上來問
還請大家多多幫忙
Delphi新手
------
yuchieh
andy424345
一般會員


發表:2
回覆:9
積分:12
註冊:2011-03-29

發送簡訊給我
#2 引用回覆 回覆 發表時間:2017-10-03 13:47:32 IP:60.251.xxx.xxx 未訂閱
Berlin VCL跟FMX測試都OK

[code delphi]
const
C_URL = 'https://speech.platform.bing.com/speech/recognition/interactive/cognitiveservices/v1';
var
MS : TMemoryStream;
SS: TStringStream;
FileName: string;
URL: string;
begin
FileName := 'D:\TEST.wav';
if not FileExists(FileName) then exit;
MS:= TMemoryStream.Create;
MS.LoadFromFile(FileName);
URL := C_URL '?language=zh-TW&locale=zh-TW&format=simple&requestid=MyAPP'; //requestid隨便打
IdHttp1.Request.Accept := 'application/json; text/xml';
IdHttp1.Request.ContentType := 'audio/wav; codec: ''audio/pcm''; samplerate=16000';
IdHTTP1.Request.CustomHeaders.Values['Authorization'] := 'Bearer ' access_token;
SS := TStringStream.Create('', TEncoding.UTF8); //回傳有中文
IdHTTP1.Post(URL, MS, SS);
Showmessage(SS.DataString);
SS.Free;
MS.Free;
end;
[/code]
系統時間:2017-11-20 15:25:35
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!