Проблема с post запросом!

[DKENT]

Здраствуйте!
Написал код,

procedure TForm1.Button1Click(Sender: TObject);
var
StrPage,ssylka:string;
    Data:TstringList;
begin
 idhttp1.HandleRedirects:=true;
 StrPage:=idhttp1.Get('http://wmcasher.ru/');
 ssylka:='<form action="http://wmcasher.ru/bonus/index.php"';
 Data:=TstringList.Create;
 Data.Add('r_purse='+sEdit1.Text);
 Data.Add('number='+sEdit3.Text);
 StrPage:=idhttp1.Post(ssylka, Data);

При попытке послать запрос на сайт выскакивает ошибка!

HTTP/1.1 404 Not Found.

В чем проблемка????

[pesi]

не так ssylka:='<form action="http://wmcasher.ru/bonus/index.php"';
а так
ssylka:='http://wmcasher.ru/bonus/index.php';