ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование_OLD > С/С++, C#, Delphi, .NET, Asm
   
 
 
Опции темы Поиск в этой теме Опции просмотра

Delphi POST Запрос
  #1  
Старый 23.11.2009, 17:06
Nelzone
Постоянный
Регистрация: 12.04.2008
Сообщений: 403
Провел на форуме:
4700216

Репутация: 261
По умолчанию Delphi POST Запрос

http://forum.antichat.ru/thread129613.html

смарел на эту тему и чтот не пойму делал все как надо

сорцы который я криво делал помойму
slil.ru/28241279

вчем проблема?
 

  #2  
Старый 23.11.2009, 17:25
Linkus
Участник форума
Регистрация: 20.12.2008
Сообщений: 130
Провел на форуме:
436500

Репутация: 11
По умолчанию

Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
procedure TForm1.Button1Click(Sender: TObject);
почему идёт объявление процедуры, потом begin, потом опять объявление той же процедуры?
 

  #3  
Старый 23.11.2009, 17:41
Пуховой
Banned
Регистрация: 25.11.2007
Сообщений: 62
Провел на форуме:
1702086

Репутация: 89
По умолчанию

http://slil.ru/28241548

Переделал.

Что у вас конкретно-то не работает?
 

  #4  
Старый 23.11.2009, 18:08
Vlad3d
Участник форума
Регистрация: 18.01.2008
Сообщений: 158
Провел на форуме:
2441184

Репутация: 106
По умолчанию

Код:
procedure TForm1.Button1Click(Sender: TObject);
var
 PostData:TStringList;
begin
    PostData:= TStringList.Create;
    PostData.Add('email=ololo@mail.ru');
    PostData.Add('pass=mypass');
    IdHTTP1.Post('http://sait.ru/login.php', PostData);
end;

end.
вот так вроде все верно....
и еще скорее всего тебе понадобиться компонент idCookieManager(он стандартный уже стоит в делфи)

Последний раз редактировалось Vlad3d; 23.11.2009 в 18:11..
 

  #5  
Старый 23.11.2009, 18:16
yfet
Познающий
Регистрация: 11.07.2009
Сообщений: 83
Провел на форуме:
279987

Репутация: 30
Отправить сообщение для yfet с помощью ICQ
По умолчанию

можно еще и idAntiFreeze кинуть - непомешает
 

  #6  
Старый 23.11.2009, 18:48
Nelzone
Постоянный
Регистрация: 12.04.2008
Сообщений: 403
Провел на форуме:
4700216

Репутация: 261
По умолчанию

Пух ошибка там coo := tidcookiemanager.create;

Последний раз редактировалось Nelzone; 23.11.2009 в 18:53..
 

  #7  
Старый 23.11.2009, 19:00
Пуховой
Banned
Регистрация: 25.11.2007
Сообщений: 62
Провел на форуме:
1702086

Репутация: 89
По умолчанию

Nelzone, да нет, я протестировал.

Версия Delphi, indy?
 

  #8  
Старый 23.11.2009, 20:35
Nelzone
Постоянный
Регистрация: 12.04.2008
Сообщений: 403
Провел на форуме:
4700216

Репутация: 261
По умолчанию

Цитата:
Сообщение от Пуховой  
Nelzone, да нет, я протестировал.

Версия Delphi, indy?
версия 7 интерпрайз..если честно я чайник в делф..какой инди?
 

  #9  
Старый 23.11.2009, 20:55
~Shapaev~
Новичок
Регистрация: 24.10.2009
Сообщений: 26
Провел на форуме:
306200

Репутация: 10
По умолчанию

http://sait.ru/login.php - вы сюда пост запрос делаете?) лично у меня просто host not found(сама программа значит нормально работает и компилируется , когда убрать лишную строчку Tform1.button1click) и через браузер тоже не конектится к этому сайту так что попробуйте другой сайт(например http://win.mail.ru/cgi-bin/auth - не выдает ошибки) . Пуховой в твоей версии tidcookiemanager.create; - пишет недостаточно обязательных параметров

Последний раз редактировалось ~Shapaev~; 23.11.2009 в 20:58..
 

  #10  
Старый 23.11.2009, 20:58
Nelzone
Постоянный
Регистрация: 12.04.2008
Сообщений: 403
Провел на форуме:
4700216

Репутация: 261
По умолчанию

дел
 
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Books PSalm69 Избранное 248 27.10.2009 04:52



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ