Дописываю icq брут - нужна помощь [delphi]
Пользователи, просматривающие топик: none
|
Зашли как: Guest
|
Имя  |
| Сообщение |
<< Старые топики Новые топики >> |
|
|
Дописываю icq брут - нужна помощь [delphi] - 2010-05-28 08:49:31.506666
|
|
|
kakawkin
Сообщений: 71
Оценки: 0
Присоединился: 2009-09-23 14:42:05.220000
|
Как сделать "не в один поток" ?
У меня массик из компонентов TICQClient - неполучается в 1 массив.
Т.к. если запустить все сразу то вылазиет ошибка и программа закрывается а если поставить после ICQClient1.Login комманду sleep(1000); то будет долго.
Какими еще способами можно подключить несколько компонентов TICQClient к работе ?
|
|
|
|
|
RE: Дописываю icq брут - нужна помощь [delphi] - 2010-05-28 11:20:28.113333
|
|
|
winac1
Сообщений: 22
Оценки: 0
Присоединился: 2010-05-27 11:32:25.756666
|
Создававй потоки.
|
|
|
|
|
RE: Дописываю icq брут - нужна помощь [delphi] - 2010-05-28 11:25:48.093333
|
|
|
winac1
Сообщений: 22
Оценки: 0
Присоединился: 2010-05-27 11:32:25.756666
|
да, и зачем ты вообще спиш то? sleep* не проще написать к примеру по нажатию кнопки ICQClient1.login();
а у асикюклиента есть обработчик ICQClient1.loggedin
т.е.
if ICQClient1.LoggedIn=true then
begin
{…..}
{…..}
{Код Брута}
end
else
ShowMessage('Не подключено'); настрой под себя.
|
|
|
|
|
RE: Дописываю icq брут - нужна помощь [delphi] - 2010-05-28 12:08:11.526666
|
|
|
_SaZ_
Сообщений: 4329
Оценки: 398
Присоединился: 2008-01-30 02:18:05.553333
|
Только за сильно быстрый перебор тебя забанят ;)
|
|
|
|
|
RE: Дописываю icq брут - нужна помощь [delphi] - 2010-05-28 14:20:06.900000
|
|
|
kakawkin
Сообщений: 71
Оценки: 0
Присоединился: 2009-09-23 14:42:05.220000
|
quote:
да, и зачем ты вообще спиш то? sleep* не проще написать к примеру по нажатию кнопки ICQClient1.login();
а у асикюклиента есть обработчик ICQClient1.loggedin
т.е.
if ICQClient1.LoggedIn=true then
begin
{…..}
{…..}
{Код Брута}
end
else
ShowMessage('Не подключено'); настрой под себя.
так смотри.
Предположим у нас есть массив из компонентов TICQClient
(1)for i:=1 to 2 do
(2)begin
(3) ......
(4) ICQCLient1.Login;
(5) if ICQCLient1.LoggedIn=true then showmessage('YES');
(6)end;
вот я цифрами пометил строки.
возникает вопрос о том - как наступит строка с номером 5 если надо подождать пока подключиться.
когда выполняется строка 4 ты ж не будешь мнгновенно подключен за считанные милисекунды.
Т.е. у теб яобразуется так что подключаются сразу компонентов 5-6 и происходит ошибка программы и закрыватся.
|
|
|
|
|
RE: Дописываю icq брут - нужна помощь [delphi] - 2010-05-28 15:09:44.026666
|
|
|
winac1
Сообщений: 22
Оценки: 0
Присоединился: 2010-05-27 11:32:25.756666
|
Тык есть же в Обжект Инспекторе обработчик)
Смотри:
http://i032.radikal.ru/1005/2f/7b647706c212.png
p.s. если будут проблемы стучи в асеку 610452804
|
|
|
|
|
RE: Дописываю icq брут - нужна помощь [delphi] - 2010-05-28 16:39:05.276666
|
|
|
Як Истребитель
Сообщений: 410
Оценки: 0
Присоединился: 2010-01-27 19:48:58.473333
|
quote:
Тык есть же в Обжект Инспекторе обработчик)
Ты наверное хотел сказать, что у класса TIcqClient есть событие OnLogin?
Вообще, автор кажется плохо понимает, каким образом должен работать брут. Подключения ни за что не будет за миллисекунду, обычно на это уходит 2-3 сек. Да это и не нужно. Можно заряжать массив из 15 TIcqClient'ов, в секунду попробовать их все подключить, потом ждать 3 секунды, если произойдёт событие OnLogin - поздравляю, что-то сбрутилось. Но вот безпроксевый брут это как-то бредово, да и действительно, лимит подключений с одного IP никто не отменял (или это лимит подключений на 1 уин? Вообще, брут по диапазону или как?).
|
|
|
|
|
RE: Дописываю icq брут - нужна помощь [delphi] - 2010-05-28 17:04:40.110000
|
|
|
winac1
Сообщений: 22
Оценки: 0
Присоединился: 2010-05-27 11:32:25.756666
|
quote:
ORIGINAL: Як Истребитель
quote:
Тык есть же в Обжект Инспекторе обработчик)
Ты наверное хотел сказать, что у класса TIcqClient есть событие OnLogin?
Вообще, автор кажется плохо понимает, каким образом должен работать брут. Подключения ни за что не будет за миллисекунду, обычно на это уходит 2-3 сек. Да это и не нужно. Можно заряжать массив из 15 TIcqClient'ов, в секунду попробовать их все подключить, потом ждать 3 секунды, если произойдёт событие OnLogin - поздравляю, что-то сбрутилось. Но вот безпроксевый брут это как-то бредово, да и действительно, лимит подключений с одного IP никто не отменял (или это лимит подключений на 1 уин? Вообще, брут по диапазону или как?).
)да все правильно) но дело скорее всего как бывает у школоты) услышали про делфи сразу же давай брять книжку не просто книжку а Для Хацкиров и из этой книжки та что флеонова. сразу же давай делать своего долюанного не домагающего "трояна" и все теперь они кодеры-хацкеры……
…имхо я лично начинал с нормального софта :)
|
|
|
|
|
RE: Дописываю icq брут - нужна помощь [delphi] - 2010-05-29 00:48:12.466666
|
|
|
Genco
Сообщений: 1662
Оценки: 90
Присоединился: 2007-12-16 23:11:22.003333
|
quote:
)да все правильно) но дело скорее всего как бывает у школоты) услышали про делфи сразу же давай брять книжку не просто книжку а Для Хацкиров и из этой книжки та что флеонова. сразу же давай делать своего долюанного не домагающего "трояна" и все теперь они кодеры-хацкеры……
…имхо я лично начинал с нормального софта :) Какое зрелое,авторитетное мнение). Поделись, это с какого же софта,если не секрет?)
|
|
|
|
|
|
