Вот такая реализация, получается, ошибочна
Код:
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;
А что исправить, непонятно