Тема: SpeechKit POST
Показать сообщение отдельно
  #5  
Старый 17.08.2018, 17:41
leonid.molchanow leonid.molchanow вне форума
Прохожий
 
Регистрация: 17.08.2018
Адрес: Новосибирск
Сообщения: 2
Версия Delphi: Delphi 10
Репутация: 10
По умолчанию

Вот такая реализация, получается, ошибочна

Код:
HTTP:= THTTPSend.Create;
  try
    FS := TFileStream.Create('speech.wav', fmOpenRead);
    HTTP.MimeType := 'audio/x-wav';
    FS.Position := 0;
    HTTP.Document.CopyFrom(FS, FS.Size);
    url := 'https://asr.yandex.net/asr_xml?uuid=...&key=...&topic=queries&lang=ru-RU';
    if HTTP.HTTPMethod('POST', url) then
      ServerAnswerResultField.Lines.LoadFromStream(HTTP.Document);
  finally
    FS.Free;
    HTTP.Free;
  end;

А что исправить, непонятно
Ответить с цитированием