TIcqClient Несколько номерков одновременно
Пользователи, просматривающие топик: none
|
Зашли как: Guest
|
Имя  |
| Сообщение |
<< Старые топики Новые топики >> |
|
|
TIcqClient Несколько номерков одновременно - 2008-01-21 23:37:13.603333
|
|
|
FLIER
Сообщений: 628
Оценки: 0
Присоединился: 2007-08-29 01:31:15.400000
|
использую компонент ICQClient (http://www.cobans.net (C) Alex Demchenko([email=alex@ritlabs.com]alex@ritlabs.com[/email]))
Не получается подключить сразу несколько номерков одновременно
для подключения использую код:
Form1.ICQClient1.ProxyHost := Login.icq.com;
Form1.ICQClient1.ProxyPort := 5190;
Form1.ICQClient1.UIN := StrToInt(Form1.Edit3.Text);
Form1.ICQClient1.Password := Form1.Edit4.Text;
Form1.ICQClient1.Login;
Попытка подключить ещё один выбрасывает первый…
Бросал несколько компонентов на форму…не помогло…помогите разобраться.
|
|
|
|
|
RE: TIcqClient Несколько номерков одновременно - 2008-01-22 00:15:24.820000
|
|
|
blаcksun
Сообщений: 1670
Оценки: 0
Присоединился: 2007-11-19 20:03:45.703333
|
quote:
Бросал несколько компонентов на форму…не помогло…помогите разобраться.
Брось нежнее. Надеюсь ты свойства редактировал у всех компонентов, а не у одного?
|
|
|
|
|
RE: TIcqClient Несколько номерков одновременно - 2008-01-22 00:58:04.150000
|
|
|
furiousangel
Сообщений: 1116
Оценки: 0
Присоединился: 2005-05-28 06:31:47
|
Мда в принципе достаточно кинуть 2 компонента и код поменять на что то типа
Form1.ICQClient1.ProxyHost := Login.icq.com;
Form1.ICQClient1.ProxyPort := 5190;
Form1.ICQClient1.UIN := StrToInt(Form1.Edit3.Text);
Form1.ICQClient1.Password := Form1.Edit4.Text;
Form1.ICQClient1.Login;
Form1.ICQClient2.ProxyHost := Login.icq.com;
Form1.ICQClient2.ProxyPort := 5190;
Form1.ICQClient2.UIN := StrToInt(Form1.Edit4.Text);
Form1.ICQClient2.Password := Form1.Edit4.Text;
Form1.ICQClient2.Login;
и ты по идее сможешь залогинить два уина. НО!!!
Если тебе вдруг надо будет 3? Что опять будешь пересобирать проэкт с уже 3-мя компонентами?
При чем каждый новый компонент создает новый объект. То есть размер памяти, занимаемый прогой будет равен произведению количества созданных объектов на размер памяти, занимаемый одним таким объектом.
Правильней (имхо) создавать объект во время рантайма, а если нужен еще один, то создать его наследие. Это будет прибаввлять всего 30-50 килобайт (может и меньше) на каждый новый экзампл.
|
|
|
|
|
RE: TIcqClient Несколько номерков одновременно - 2008-01-22 01:03:07.980000
|
|
|
blаcksun
Сообщений: 1670
Оценки: 0
Присоединился: 2007-11-19 20:03:45.703333
|
угу
const
ICQsCount = 3;
var
ICQs: array of TICQClient;
I: Integer;
...
SetLength(ICQs, ICQsCount);
for i := 0 to ICQsCount - 1 do
begin
ICQs[i] := TICQClient.Create(Self);
ICQs[i].
// Ставь свои параметры ..
end;
..
|
|
|
|
|
RE: TIcqClient Несколько номерков одновременно - 2008-01-22 02:20:47.620000
|
|
|
FLIER
Сообщений: 628
Оценки: 0
Присоединился: 2007-08-29 01:31:15.400000
|
quote:
ORIGINAL: blаcksun
quote:
Бросал несколько компонентов на форму…не помогло…помогите разобраться.
Брось нежнее
Спасибо,так и сделал,всё работает.(Ох эта невнимательность);
"const
ICQsCount = 3;" - это обязательно должна быть константа? Если пользователь захочет подключить 60,70, или даже 100 номеров?
P.S. Я вообще пишу Flooder, идея заключается в том, что-бы отправлять с разных номеров по 2-3 сообщения поочереди, так-как с одного номера после 15-17 моментальных сообщений выбрасывает с сервера…Я думаю что пока цикл пойдёт заново(если будет достаточно долгий) Сервер не посчитает это флудом..поправте меня если я ошибаюсь…и посоветуйте как сделать его наименнее тяжёлым для системы.Спасибо
|
|
|
|
|
RE: TIcqClient Несколько номерков одновременно - 2008-01-22 03:03:08.090000
|
|
|
furiousangel
Сообщений: 1116
Оценки: 0
Присоединился: 2005-05-28 06:31:47
|
В общем можешь не ограничиваться цифрой 3. Хоч ставь сто тыщ милионов. Но я бы наверно посоветовал бы тебе организовать бесконечный цикл или написать рекурсивную функцию (и то и другое опасно при неправильном обращении). Например пока есть номерки в текстовом файле, конектится, делать поставленную задачу и в офф после н сообщений. И еще задержку надо бы поставить секунд на 5. На ICQ я точно не помню. Вроде дисконект при >20 сообщений за минуту или 8 сообщений за 10 секунд(или что-то около того). Тут лучше не спешить. Другой вопрос. После нескольких логинов с одного ИП серв скажет сильно много подключений. И откажется конектить новые УИНы. Выход конектится через проксики. Благо TICQClient как я помню поддерживает эту опцию. Короче больше организационных вопросов чем кодинга. Будут результаты дай взглянуть а?
|
|
|
|
|
|
