ganz easy geht das .... zieh dir nen idhttpclienten aufs form und nen coockiemanager

Code:
function SendPostData(Ahttp: TIdHTTP; const AtoURL: String; const aParams: TStrings): String; //Funktion zum senden von Postdaten mit den Indys
  //Ahttp: Die HTTP Komponente von Indy 8.0 bzw. 9.0
  //AtoURL: An diese URL werden die Informationen gesendet
  //Result: HTML-Ergebnis (Antwort des Scripts)
Var
  lStream: TMemoryStream; //HTML-Result des PHP-Scripts
  lParams: TStringStream;
  I: Integer;
begin
  Result:='';
  if not Assigned(aHttp) then
    exit;
  lStream := TMemoryStream.create;
  lParams := TStringStream.create('');
  try
    AHTTP.Request.ContentType := 'application/x-www-form-urlencoded';

    //Dieser Stream wird letztendlich gesendet
    //Stream mit Werten füllen
    for I:=0 to aParams.Count-1 do
      lParams.WriteString(aParams[I] + '&');

    try
      //Stream an das PHP-Script senden
      AHTTP.Post(AtoURL,
                 lParams,
                 lStream);
    except
      on E: Exception do
        showmessage('Fehler bei der Übertragung: ' + E.Message);
    end;
    SetLength(Result,lStream.Size);
    lStream.Position:=0;
    lStream.ReadBuffer(Result[1],lStream.Size);
  finally
    lParams.Free;
    lStream.Free;
  end;
end;
schreib diese funktion in die unit ...



und dann hier so wird das gepostet ... die wete musste dann halt selber anpassen bei fragen pm

[code] http := TidHTTP.create(idhttp1);
//cookie := TidCookieManager.create(idcookiemanager1);
list := TStringList.create;
try
http.Request.UserAgent:='Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)';
http.cookiemanager := IdCookieManager1;
http.AllowCookies := true; //wenn dann auch einschalten Wink
http.HandleRedirects := true; //um weiterleitungen zu folgen
list.add('page=index.php?action=login');
list.add('benutzer='+edit1.Text);
list.add('passwort='+edit2.Text);
s := SendPostData(http,'http://www.yooliety.de/index.php?action=login',list);
// s := http.post('https://www.yooliety.de/index.php?action=login',list);
//nun sollte in "s" der quellcode von
memo2.Text:= http.Get('http://www.yooliety.de/nickpage.php?nick=seppi_tm&open=guestbook');
//deiner site sein nachdem du dich eingeloggt hast
finally
http.free;
cookie.free;
list.free;
end;
memo1.Text:=s;
end;