用idhttp post 方法发送数据到服务器上。实现数据和网页的交互。

//网页代码；

Soweit bin ich mit Hilfe der anderen artikel schon gekommen:

var
   IdHTTP: TIdHTTP;
   PostDataStream : TStringStream;
   ParamData : TStringStream;
begin
   IdHTTP:= TIdHTTP.Create(nil);
   PostDataStream := TStringStream.Create('');
   ParamData := TStringStream.Create('');
   ParamData.WriteString('nick=name&passwort=pass');
   IdHTTP.Post('http://www.blabla.com/login.php' , ParamData, PostDataStream);
   postdatastream.Position:=0;
   memo1.Text:=postdatastream.DataString;
end;

aber es funktioniert trozdem nicht. Der Fehler muss irgend wo bei den
übergebenen Daten liegen, weil als Antwort eine vernünftige HTML seite
kommt, nur eben das er mir sagt das pass und username nicht zusammen stimmen.

=====================================

response := TStringList.create;
POSTData := TStringList.create;
POSTData.text := 'add=1&cmd=_cart&business="[email protected]"&item_number=1&...etc etc etc';
HTTP1.Post('http://www.paypal.com/cgi-bin/webscr' ,POSTData.text, response);