Habe mir die Beispiele angesehen, mache ich doch!
Versehe ich nicht??
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
HTTP: TIdHTTP;
RequestBody: TStream;
ResponseBody:
string;
begin
HTTP := TIdHTTP.Create;
try
try
RequestBody := TStringStream.Create('
{123456789}',TEncoding.UTF8);
try
HTTP.Request.Accept := '
input.xml HTTP/1.0';
HTTP.Request.ContentType := '
application/x-www-form-urlencoded';
ResponseBody := HTTP.Post('
https://login.fireboard.net/api?authkey={123456789}&call=operation_data',RequestBody);
// hier wird der Key doch übermittelt!
finally
RequestBody.Free;
end;