Знаю что вопрос уже задавали, но ответа вразумительного я здесь не нашел.. В общем пишу программу используя TICQClient задача загрузить из файла uins.ini юины и подключиться ко всем. В файле uin и pass такого вида: 22222;frejkre То что 22222 это юин, а frejkre это пароль я обьяснил программе следующим образом: var Strings: TStringList; begin i:=TStringList.Create; i.LoadFromFile('uins.ini'); i.NameValueSeparator:=';'; ICQClient1.UIN := StrToInt(i.Names[1]); ICQClient1.Password := i.ValueFromIndex[1]; // тут обьяснил программе что до ";" это uin, а после пароль procedure TForm1.Button1Click(Sender: TObject); var i:Tstrings; begin i:=TStringList.Create; i.LoadFromFile('uins.ini'); i.NameValueSeparator:=';'; ICQClient1.UIN := StrToInt(ss.Names[1]); ICQClient1.Password := i.ValueFromIndex[1]; ICQClient1.Login(); // тут я подключился к первому номеру в списке procedure TForm1.FormCreate(Sender: TObject); begin Strings := TStringList.Create; Strings.LoadFromFile('uins.ini'); label.caption:=(IntToStr(Strings.Count)); // тут я посчитал сколько строк в файле uins.ini и ывел их в label А вот как создать столько же компонентов сколько и uinов вызывает затруднение, вручную накидать штук 30 компонентов влом, плюс нужно прописывать чтобы каждый подключался, интересует как программно создать столько компонентов, сколько у меня в label написано и вызвать подключение к ним всем.
lex(SL), прочитай пару статей, которые найдешь в Google по таким запросам: динамические массивы в delphi создание компонентов во время выполнения Сразу найдешь самостоятельно ответ на свой вопрос.
Создавай вручную компоненты TIcqClient (т.е. динамически). Пример(писал прямо тут, так что мог где то ошибиться): Code: var icq_nums: array [0..30] of integer; icq_arr: array [0..30] of ticqclient; icq_arr_in: integer; begin icq_nums[0] := 123429; //И так далее for icq_arr_int:=0 to 30 do begin icq_arr[icq_arr_int] := TIcqClient.Create; icq_arr[icq_arr_int].UIN := StrToInt(icq_nums[icq_arr_int]); //Аналогично присваиваем пароль icq_arr[icq_arr_int].Login(); end; end; Единственный тут ньюанс - все номера стартуют по очереди. Чтобы стартовали одновременно - используй потоки.
Скорее у тебя мало опыта, что бы понять... Мог бы взглянуть хотя бы. Как раз с помощью динамических массивов и создания компонентов в реальном времени ты сможешь создать не только 30 компонентов, а даже 1000, или столько, сколько написано в Label (Edit), имея ко всем доступ и не заморачиваясь с ручным добавлением на форму.
Chrome~ когда динамически создаешь компоненты и сразу же к ним подключаешься то глючить начинае, но это уже не важно, я флудер уже сделал Еще вопрос будет по поводу отправки sms: В общем стандартно подключаюсь к какому - нибудь номеру ICQ Далее в обработчик кнопки вешаю: ICQClient1.SendSMS('+7950xxxxxxx', 'текст мессага'); Но по нажатию на эту кнопку sms не приходит, по идее из рамблер ICQ на этот номер отправлять мессаги можно(тестил - приходят) использую компонент TICQClient v 1.34.1.
Бред. Обращайся к автору компонента. А вообще оно тебе надо, зависеть от самопального компонента? В ICQ что-либо изменят и всё программа перестанет работать, а автор может забить на обновление. Такое уже на ачате было, и не раз. Всякие говнокодеры понаделают спамеры на чужих компонентах, понапродают, а потом изменения и все, пока автор либы не исправит программы не работают, а сами ни хера не шарят. Пздц короче, так дела не делаются.
GhostOnline Ты думаешь о чем говоришь? По твоим словам мне нужно договор заключить с операторами чтобы спамер написать, по моему оно того не стоит... Да и по твоим словам... Может вообще написать свой компилятор и вообще не зависеть ни от кого, хотя не, возьмем выше, надо еще свой комп сделать, а не покупать готовый....
Сори что создаю второй посто, но не могу успокоиться... GhostOnline А зачем по твоему создаются какие - то там ICQ клиенты типа QIP миранда, а оутлук экспресс? По твоему авторы этих программ гавнокодеры только потому что их программы зависят от e-mail аккуантов или ICQ? Или ты предлагаешь свой компонент создать? Хотя не, он же тоже будет от ICQ зависеть..
Ты абсолютно не так все понял. Имелось ввиду, что лучше и правильней(для самообразования в первую очередь) написать свой компонент для ICQ(или для других целей), и тогда не нужно будет задавать вопросов типа: "Почему компонент хххх не работает как надо".
Да, конечно. Нет конечно, но есть способы понадежней чем компонент который завтра перестанет работать/уже не работает. Что за бред вообще? Ты думаешь я любитель велосипедов? Может поспорим на ящик коньяка что разработчики перечисленных тобою программ не используют компоненты а-ля TICQClient? Что-то я ни разу не видел чтобы обновления этих программ задерживались на месяц, а с использованием вышеназванного компонента бывали задержки и куда больше. Я тебе хотел дать совет по-человечески, что это ненадежный вариант, а ты в штыки все. Вот ты почему этот вопрос задаешь здесь?(и ты кстати далеко не первый) Может потому что поддержка на высоком уровне и обновления регулярно выходят? И заканчиваем флеймить. На этот раз я думаю вполне доходчиво объяснил свою позицию.
Вопрос по TwebBrowser и TidHTTPserver в связке. Собственно 2 вопроса по работе компонентов TwebBrowser и TidHTTPserver в связке: Сделаны 2 программы TwebBrowser (программа клиент) и TidHTTPserver (программа сервер) 1. Как из программы TwebBrowser передать на TidHTTPserver произвольный файл. 2. Существует ли возможность обратной передачи файла, но только, что бы со стороны клиента не выдавался запрос на сохранение файла, а программа сохраняла файл в нужное место автоматически. --- Заранее благодарен за ответы. Компонент TidHTTP использовать вместо TwebBrowser не хотелось бы, так как он будет работать в локальной сети за роутером, а что там внутри бог его знает... но точно неизвестны настройки интернета со стороны клиента (прокся с NTLM, просто прокся, NAT...), а IE автоматом уже настроен и выход в инет присутствует.
В смысле? Если инет на машине есть то TidHTTP будет работать без проблем. Или тебе нужно настройки прокси от IE использовать? (о_О зачем?) К тому же с Inby идут примеры именно в связке TIdHTTP + TidHTTPserver Вообще передать файл элементарно - TFileStream и у TIdHTTP есть метод Post принимающий парметр типа TStream вот файловый поток туда и передавай.
Поправил вопрос, для большей точности. В TidHTTP надо настройки интернета (той же прокси) индивидуально прописать ведь.
знаю что на гугл мне надо, но у меня с ним прохие отношения(с ранних лет), короч как разделить строку на массив слов(по пробелу делить), на делфях вреде есть такая процедура.и работает ли она в паскале?
