Авторизация на одноклассниках - Общие вопросы Delphi

freest · 26.12.2009, 17:35

Сайт не как не хочет реагировать

Код:

procedure TForm1.button1Click(Sender: TObject);
var params,responseres:tstringlist;
begin
params:=TStringList.Create;
responseres:=TStringList.Create;
params.Add(AnsitoUtf8('fr.posted=')+AnsitoUtf8('set'));
params.Add(AnsitoUtf8('fr.login=')+AnsitoUtf8('Login'));
params.Add(AnsitoUtf8('fr.password=')+AnsitoUtf8('Password'));
params.Add(AnsitoUtf8('login_button=')+AnsitoUtf8('Вход'));
responseres.Text:=http1.Post('http://m.odnoklassniki.ru',params);
Memo1.Lines.Text:=UTF8toAnsi(responseres.Text);
if Pos('Выход',UTF8toAnsi(responseres.Text))>0 then
ShowMessage('Àâòîðèçîâàëèñü!');
end;

У нас принято оформлять код специальным тэгом - кнопочка "#".
Модератор

mihali4 · 26.12.2009, 17:57

Ну как же так ? Ай-я-яй...
Вы же в аналогичной теме во фрилансе уже пообещали решение...
Хотите на нас деньги зарабатывать?
Не выйдет.
Разбирайтесь сами.
Модератор.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Законна ли вставка логотипа на фотографиях в одноклассниках?	Snoopy	Свободное общение	12	12.08.2009 10:38
Авторизация?	Gromsky	PHP	5	07.08.2009 19:27
Авторизация.	Jjoker	Общие вопросы C/C++	4	28.01.2009 23:17
Авторизация	AIst	PHP	5	03.12.2008 20:57
Авторизация	justas	Работа с сетью в Delphi	0	21.12.2007 16:16

26.12.2009, 17:57	#2
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	Ну как же так ? Ай-я-яй... Вы же в аналогичной теме во фрилансе уже пообещали решение... Хотите на нас деньги зарабатывать? Не выйдет. Разбирайтесь сами. Модератор.