PHP Formular ausfüllen

[alcaeus]

Hallo marciboy,

also, der folgende Code zeigt dir, wie du ein Formular mit TIdHTTP absenden kannst.
Die Komponente findest du auf der Palette "Indy Clients".

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  SL: TStringList;
begin
  SL := TStringList.Create;
  try
    SL.Add('mode=login');
    SL.Add('user='+Edit1.Text);
    SL.Add('pass='+Edit2.Text);
    IdHTTP1.Post('http://www.deineseite.de/login.php', SL);
  finally
    SL.Free;
  end;
end;

Zur Erklärung. Zuerst wird eine Stringliste erstellt, welche alle Parameter enthält. Die Parameter werden wie bei PHP mit name=wert eingetragen, und zwar als einzelne Zeile. Die Indy-Komponente kümmert sich dann darum:

Meine OH schreibt:

When ASource is a TStrings instance, Post will replace all occurrences of the End-Of-Line (EOL) character in ASource with the value '&' prior to transfer to the HTTP server.

Anschließend wird das Formular abgeschickt und du bist angemeldet. Natürlich wird das Ganze etwas komplexer, aber das Grundprinzip sollte verständlich sein.

Greetz
alcaeus