вот же исходник:
http://www.delphisources.ru/forum/sh...22&postcount=7
только строчки подредактировать:
Код:
AStrings.Add('login=********');
AStrings.Add('lreseted=1');
AStrings.Add('pass=********');
имя и пароль указать свои. при успехе будет ShowMessage('Ok');
я уже на Windows XP SP3, Windows 7 SP1 32bit and Windows 7 64bit проверил - все работает.