|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Авторизация с капчей и без
На форме есть две кнопки, одна авторизируется без капчи, другая с капчей, от сюда вопрос, как сделать что бы одна кнопка отвечала за авторизацию с капчей и без неё, тоесть если нажал на кнопку, и если на сайте есть капча то дожидается её ввода нажал на кнопку принять и авторизировался, а если нету то сразу авторизируемся. Просто умственно осилить не могу как скрестить.
|
#2
|
||||
|
||||
Код в студию.
От корректности формулировки поставленной задачи зависят: качество, скорость и желание её реализации!
|
#3
|
|||
|
|||
пиши нам свой коД и мы тебе исправим
|
#4
|
|||
|
|||
Код:
procedure TForm11.Button1Click(Sender: TObject); var img: TMemoryStream; png: TPNGObject; s:string; data1:TStringList; begin data1:=tstringlist.create; begin s:=idhttp1.Get('http://' +Edit1.text+'/login.php'); If pos('/image.php?',, s)>0 then begin img:=TMemoryStream.Create; idhttp1.Get('http://'+Edit1.text+'/image.php?',img); img.Position:; png:= TPNGObject.Create; png.LoadFromStream(img); image1.Picture.Assign(png); png.Free; img.Free; Data1.Add('Code=' +Edit4.text);///капча end else Data1.Add('username=' +Edit2.text);///логин Data1.Add('password=' +Edit3.text);///пароль idhttp1.post(''+Edit1.text+'/logincap.php',data); end; end; end. Цитата:
Не пойму как сделать что если есть на сайте капча то показать её ввести и нажать на Button2 для её отправки вместе с логином и пасом, а если нету то просто логин и пасс Цитата:
Последний раз редактировалось bulldog, 27.08.2010 в 12:46. |
#5
|
|||
|
|||
то есть я как ща понимаю, то если капча есть то показываем, вводим в edit4, нажимаю на button2 и передаю вместе с логом и пассом, вопрос тогда, как такое реализовать?
|
#6
|
|||
|
|||
Код:
img.Position:; |
#7
|
|||
|
|||
Цитата:
Код:
img.Position:=0; |
#8
|
||||
|
||||
принцип работы Авторизация с капчей и без.rar
|