http request

[Alterauge]

wenn der button ausgeführt wird, kommt die fehlermeldung:

'Connection Closed Gracefully'

der compilier gibt keine fehlermeldung raus!

[Alterauge]

oh, habe was vom quelltext nicht mit angegeben!

sorry!

Delphi-Quellcode:

 // http request
   content := 'type=pocsag&function=a&address=1126026&flags=0&message=hallo';
    if Client.Connected then Client.Disconnect;
     Client.Connect;
      nl := AnsiChar(#13) + AnsiChar(#10);
   request := 'POST /telegramin/alarmgeber/index.xml HTTP/1.1' + nl
   + 'Authorization: Basic jhfhuhjjwerjejghjhewjE=' + nl
   + 'Content-Type: application/x-www-form-urlencoded' + nl
   + 'Host: 192.168.0.110' + nl
   + 'Content-Length: ' + IntToStr(length(content)) + nl
   + 'Expect: 100-continue' + nl
   + 'Connection: Keep-Alive'+ nl + nl
   + content;
 Client.IOHandler.WriteLn(request);

verstehe es nicht? wieso da nix raus geht!
die fehlermeldung: 'connection Closed Gracefully' verstehe ich auch nicht??

[Alterauge]

Hallo,

so jetzt bekomme ich über Button1 mein Telegramm gesendet! ( 1 x mal)
Benutze die Indy TCPClient Komponente, ein disconnect ist nicht möglich! (ist ja bekannt bei der Indy Komponente)

Was habe ich jetzt noch für eine Möglichkeit, über den Button1 das Telegramm nochmals zu senden?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
 request, nl, content : string;
 i : integer;
begin
   content := 'type=pocsag&address=1234077&flags=0&function=a&message=hallo';
      nl := AnsiChar(#13) + AnsiChar(#10);
   request := 'POST /telegramin/alarmgeber/input.xml HTTP/1.1' + nl
   + 'Authorization: Basic FtzUjHjUjjJHUJ=' + nl
   + 'Content-Type: application/x-www-form-urlencoded' + nl
   + 'Host: delphi.delphi.de' + nl
   + 'Content-Length: ' + IntToStr(length(content)) + nl
   + 'Expect: 100-continue' + nl
   + 'Connection: Keep-Alive'+ nl + nl
   + content;
 Client.IOHandler.WriteLn(request);
  for I := 1 to 20 do
   Memo1.Lines.Add(Client.IOHandler.ReadLn);
 end

[mjustin]

Zitat von Alterauge:

Benutze die Indy TCPClient Komponente, ein disconnect ist nicht möglich! (ist ja bekannt bei der Indy Komponente)

Bei der TIdTCPClient Komponente kann man Disconnect ausführen. Ich bin mir sicher noch nichts gegenteiliges gehört zu haben ...