[crash94]

Здравствуйте!
Подскажите как сделать вход в программу,только если пользователь зарегистрирован на определенном сайте.
Если авторизация удачная, то его пустит в основное окно программы, а если нет, то шлет на регистрацию.
Если не трудно выложите исходник

[Человек_Борща]

Хм тогда программе нужно иметь БД аккаунтов.
Или как минимум доступ к БД сайта(dle) чтоб узнать зарегестрирован там человек или нет.


Можно пойти другим путём. Изучать исходный html(выводной в браузер) и посылать запросы аавторизации через программу используя запоолнение html формы на сайте. Потом парсить страничку и смотреть что вернул сайт.
Собственнно читай про Indy HTTP компоненты и функции Copy,Pos,PosEx.

Я для себя писал авторизатор для инет-провайдерского сайта(Ну чтоб баланс смотреть) =).



А хорошие готовые исходники врятли найдёшь=)

[MrDiG]

Пример на Delphi для авторизации на DLE сайте с помощью компонента IdHTTP

Код:

var
LoginInfo, Response: TStrings;
begin
LoginInfo := TStringList.Create;
Response := TStringList.Create;
try
LoginInfo.Add('login_name=MyLogin');
LoginInfo.Add('login_password=MyPass');
LoginInfo.Add('login=submit');
LoginInfo.Add('x=50');
LoginInfo.Add('y=11');
Response.Text := IdHTTP.Post('http://delphistudio.ru/index.php',LoginInfo);
if Pos('logout',Response.Text)>0 then
ShowMessage('Авторизовались!')
else
ShowMessage('Авторизация не удалась!');
finally
LoginInfo.Free;
end;
end;

Тыц!