Hallo Wissende,

folgende Routine habe ich bisher mit der Indykomponente IdHttp benutzt, um Daten an ein php-Script zu senden und von diesem eine Antwort zu erhalten. Leider funktioniert das nur mit Delphi 2005, da meine Indy-Version des Delphi 6 nen Fehler hat und ein Update derzeit nicht möglich ist.

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
   Response:String;
   LParams: TStringlist;
begin
  LParams := TStringlist.Create;
  LParams.Add('parameter=wert');
  LParams.Add('param2=wert2');
  Response := IdHTTP1.Pos('http://www.domain.de/test.php', LParams);
  mem_feedback.Lines.Add(Response);
  LParams.Free;
end;

Wer kann mir schreiben, ob und wie das mit einer der ICS-Komponenten möglich ist. Ich habe schon ICS installiert einige Demo-Projekte geöffnet - darunter auch die HTTPGet, aber leider weiss ich einfach nicht weiter, wie ich mir das Umschreiben muss, damit es funzt.

du könntest mit Delphi2005 eine DLL erzeugen und diese einfach in dein Delphi6-Projekt einbinden. Dann erspaarst du dir das einarbeiten in die neue Komponente

ich denke mal, dass jetzt ein offenbarungseid kommt, aber ich habe noch keine dll erzeugt und in eine eigene applikation eingebunden und bin damit sicher überfordert, obwohl es vielleicht profan ist...!? kannst du helfen?

Aber so schwer ist das doch nicht.

markieren

Delphi-Quellcode:

    
HttpCli1.SendStream := TStringStream.Create(LParams.Text);
HttpCli1.RcvdStream := TStringStream.Create; // Hier war ein Schreibfehler 'TString.Create'...
HttpCli1.URL := Trim('http://www.domain.de/test.php');
HttpCli1.Post;
Response := HttpCli1.RcvdStream.DataStream;

Ungetestet, aber theoretisch müsse es so gehen.

ok, danke, ich checks mal

ich habe es hinbekommen - danke