Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.05.2010, 18:34   #1
=LeonZone=
Форумчанин
 
Аватар для =LeonZone=
 
Регистрация: 15.08.2007
Сообщений: 118
По умолчанию TICQClient - Отправка ДЛИННЫХ сообщений

Если вопрос тупой - не пинайте плиз

Использую версию 1.35a от Царя (http://progs.volkov.spb.su/ticqclient/)

Как отправить длинное сообщение? Напиример, 10000 символов?
Пробовал в цикле резать текст по 3000 символов и отправлять кусками, но в этом случае приходит лишь последний кусок
Код:
if length(Text)>3000 then
   begin
   repeat
   t:=copy(Text,1,3000);
   Delete(Text,1,3000);
   ICQ.SendMessage(strtoint(UIN),t);
   Sleep(1000);//пауза
   until length(Text)<3000;
   ICQ.SendMessage(strtoint(UIN),Text);
   end;
Где я не прав? Кто-нибудь поможет?...
Заранее благодарен!
=LeonZone= вне форума Ответить с цитированием
Старый 11.05.2010, 21:16   #2
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,742
По умолчанию

1- не стоит использовать sleep, сделайте поток или таймером
2- есть событие компонента ICQClient1MsgAck()
3- достаточно в таймере, а лучше по событию ICQClient1MsgAck -> inc(i); sendtext := copy(text, i, 3000)

смысл ясен?
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation

Последний раз редактировалось raxp; 11.05.2010 в 21:19.
raxp вне форума Ответить с цитированием
Старый 11.05.2010, 21:59   #3
=LeonZone=
Форумчанин
 
Аватар для =LeonZone=
 
Регистрация: 15.08.2007
Сообщений: 118
По умолчанию

Хм.. С потоком и таймером ясно..
А можно по подробнее про событие MsgAck? Там же в параметрах только UIN и ID..

Просто хотелось бы реализовать всё это как одну функцию, чтобы ею можно было пользоваться из других юнитов..
=LeonZone= вне форума Ответить с цитированием
Старый 11.05.2010, 22:44   #4
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,742
По умолчанию

вы еще скажите, что не обрабатываете, кроме ICQClient1MsgAck(), например еще событие подключения OnLogin()...
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 11.05.2010, 23:28   #5
=LeonZone=
Форумчанин
 
Аватар для =LeonZone=
 
Регистрация: 15.08.2007
Сообщений: 118
По умолчанию

В событии OnMsgAck не нуждался, поэтому и не знаю как его использовать. Помогите
=LeonZone= вне форума Ответить с цитированием
Старый 11.05.2010, 23:47   #6
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,742
По умолчанию

ммм... а вы читали help к компоненту?
Вложения
Тип файла: html HelpRus.html (23.2 Кб, 38 просмотров)
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 15.05.2010, 00:36   #7
=LeonZone=
Форумчанин
 
Аватар для =LeonZone=
 
Регистрация: 15.08.2007
Сообщений: 118
По умолчанию

raxp
Спасибо Вам огромное! Всё сделал

Тему можно закрывать
=LeonZone= вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Отправка СМС сообщений Rek322 Помощь студентам 7 12.03.2010 21:18
Отправка сообщений CalvinKlein Работа с сетью в Delphi 1 27.01.2010 20:46
Прием оффлайн сообщений c помощью TICQClient S@fer Компоненты Delphi 1 22.04.2009 13:36
автоматическая отправка сообщений DeDoK Общие вопросы Delphi 3 16.10.2008 08:50
отправка сообщений Pitbull Работа с сетью в Delphi 6 03.08.2007 17:06