Spracherkennung via Google

[erich.wanker]

.. ich vermute mal, das hier der fehler liegen könnte ..

Delphi-Quellcode:

  SendStream:=TFileStream.Create(GetTempDirectory + RandomQ + 'Record.flac', fmOpenRead);
  SendStream.Position:=0;
  sResponse:=TStringStream.Create;
  IdHTTP:=TIdHttp.Create(nil);
  try
    IdHTTP.Request.accept:='*/*';
    IdHTTP.Request.ContentType:='audio/x-flac; rate=16000';
    IdHTTP.Request.Connection:='Keep-Alive';
    IdHTTP.Request.ContentLength:=SendStream.Size;
    IdHTTP.Post('https://speech.googleapis.com/v1beta1/speech:syncrecognize?key=AI***********************************uA', SendStream, sResponse);
             

    sResponse.Position:=0;
    szResponse:=sResponse.ReadString(sResponse.Size);

  except
    szResponse:='ERROR';
  end;

szResponse ist immer 'ERROR' ...

Der SendStream passt..
Die Temp-Ordner-Angaben passen auch ...
Die FLAC-Datei (bei mir "C:\Users\erich\AppData\Local\Temp\48446178_Record .flac") existiert und funktioniert ...
hmmmm ....




p.S.: Ein Perl-Example wäre hier: http://pastebin.com/iqnEdS4p


LiGrü
erich