Показать сообщение отдельно
  #4  
Старый 19.03.2010, 10:28
Аватар для friz
friz friz вне форума
Местный
 
Регистрация: 04.04.2008
Адрес: Минск
Сообщения: 596
Версия Delphi: 2007 & JAVA EE
Репутация: 10670
По умолчанию

Кидаешь на форму кнопку и idHTTP (закладка indy client)
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
post:TStringList;
begin
post:=TStringList.Create;                     //формируем пост запрос
post.Add('vb_login_username=admin');   // вводим данные, у тебя что-то такое username=buben
post.Add('cookieuser=1');                    // данного поля вроде у тебя нету
post.Add('vb_login_password=qwerty'); // у тебя password=qqqqq
post.Add('submit=Вход');                    // submit=Авторизоваться

memo1.Text:=IdHTTP1.Post('http://www.delphisources.ru/',post); 
// первый параметр это сайт (твой сайт/auth.php?action=doauth), второй это наш пост запрос.
// если все гуд, то в мемо ты увидишь код страницы. Ну а код можно впихнуть в браузер
end;
Ответить с цитированием