есть код на дельфи для баттона) ... procedure TForm1.Button1Click(Sender: TObject); var data:tstringlist; PageProfile:string; error:boolean; begin IdHTTP1.AllowCookies:=true; IdHTTP1.HandleRedirects:=false; data:=tstringlist.create; data.Add('act=login'); data.Add('expire=1'); data.Add('vk='); data.Add('email=//////@rambler.ru'); // логин для авторизации data.Add('pass=//////'); // пароль для авторизации data.Add('success_url=http://vkontakte.ru/share.php?act=logged'); error:=false; try PageProfile:=IdHTTP1.Post('http://login.vk.com/', data); except error:=true; end; if not(error) then begin data.Clear; data.Add('s='+Copy(PageProfile, Pos('value', PageProfile)+7, 56)); data.Add('op=slogin'); data.Add('redirect=1'); data.Add('expire=1'); data.Add('to='); IdHTTP1.HandleRedirects:=true; try IdHTTP1.Post('http://vkontakte.ru/share.php?act=logged', data); except end; PageProfile:=IdHTTP1.get('http://vkontakte.ru'); Edit1.Text:='Авторизация удалась'; end else ShowMessage('неверно'); Data.Free; end; end. ... при верном емайл/пасс все ок При неверном: ошибка: В дельфи совсем недавно, так что многого не знаю.
Убери галочку Intergrated debugging в окне Tools => Debugger Options... и можешь запускать прожку. Позже не забудь восстановить ее. Исключение, которое у тебя вызывается есть на самом деле нормальным.