Rapidshare Premium Login - Wie?

[schismatic1]

Hm... irgendwie komm ich so nicht weiter.

Ich habe mir im Forum für eine Anmeldung mittels der Methode Post folgenden Quelltext entdeckt:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  data: TIdMultiPartFormDataStream;
begin
  data := TIdMultiPartFormDataStream.Create;
  IdHTTP1.ProtocolVersion:=pv1_1;
  IdHTTP1.Request.UserAgent:='null';
  IdHTTP1.Request.Accept:='eins';
  IdHTTP1.Request.AcceptCharSet:='zwei';
  IdHTTP1.Request.AcceptLanguage:='drei';
  try
    { add the used parameters for the script }
    data.AddFormField('param1', 'value1');
    data.AddFormField('param2', 'value2');
    data.AddFormField('param3', 'value3');
    { Call the Post method of TIdHTTP and read the result into TMemo }
    Memo1.Lines.Text := IdHTTP1.Post('http://www.delphipraxis.net', data);
  finally
    data.Free;
  end;
end;

Für Rapidshare würde der angepasst ja theoretisch so ausschauen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  data: TIdMultiPartFormDataStream;
begin
  data := TIdMultiPartFormDataStream.Create;
  try
    { add the used parameters for the script }
    data.AddFormField('login', edit1.Text);
    data.AddFormField('password', edit2.Text);
    { Call the Post method of TIdHTTP and read the result into TMemo }
    Memo1.Lines.Text := IdHTTP1.Post('https://ssl.rapidshare.com/premiumzone.html', data);
  finally
    data.Free;
  end;
end;

Wenn das soweit stimmt, dann ist mein Problem dabei nur, dass ich beim Einfügen dieses Quelltextes (egal ob "Formular - Delphi für Win 32" oder "VLC Formularanwendung - Delphi für Win 32") entweder ich überhaupt nicht compilieren kann oder der alles als Syntaxfehler rot unterwellt ist.

Vielleicht kannst du mir ja etwas mehr von deinem Wissen preisgeben. Denn bis jetzt tappe ich noch gut im Dunkeln

EDIT MEINT: kann sein das ich ersteinmal das indy10 installieren muss, oder?