Интервал ответа - Работа с сетью в Delphi

Pavelok · 16.05.2009, 14:17

Привет!
Вот имеется код:

Код:

procedure TForm1.ICQClientMessageRecv(Sender: TObject; Msg, UIN: String);
var
 LogFile: TextFile;
begin
  ICQClient.SendMessage(StrToInt(UIN),'Привет');
end;

Как зделать чтоб он отвечал н сразу а через 1 или 2 секунды??но только на процедуре ICQClientMessageRecv

Пепел Феникса · 16.05.2009, 20:45

Код:

Sleep(1000);

Pavelok · 16.05.2009, 21:45

Про слип я знаю, тем более когда программе указать спасть то она начинает виснуть и когда слип закончилось то перестает виснуть. А других способов нет?

DomiNick · 16.05.2009, 22:08

Sleep() кажется просто останавливает поток в котором вызван...

Может таймером тогда..?

16.05.2009, 14:17	#1
Pavelok Подтвердите свой е-майл Регистрация: 02.04.2009 Сообщений: 48	Интервал ответа Привет! Вот имеется код: Код: `procedure TForm1.ICQClientMessageRecv(Sender: TObject; Msg, UIN: String); var LogFile: TextFile; begin ICQClient.SendMessage(StrToInt(UIN),'Привет'); end;` Как зделать чтоб он отвечал н сразу а через 1 или 2 секунды??но только на процедуре ICQClientMessageRecv

16.05.2009, 20:45	#2
Пепел Феникса Старожил Регистрация: 28.01.2009 Сообщений: 21,000	Код: `Sleep(1000);` Хорошо поставленный вопрос это уже половина ответа. \| Каков вопрос, таков ответ. Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.

16.05.2009, 22:08	#4
DomiNick Студент, не Старожил Регистрация: 29.01.2009 Сообщений: 2,067	Sleep() кажется просто останавливает поток в котором вызван... Может таймером тогда..? I am the First of Cyber Evolution... I am the First to Program your Future...

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Как ввести в Edit интервал?	Котакот	Общие вопросы Delphi	5	19.04.2009 17:39
Как задать интервал между датами в фильтре	Леон	Microsoft Office Access	2	22.10.2008 11:16
Интервал Таймера...	Roof	Общие вопросы Delphi	27	08.07.2008 20:19
Как поменять интервал между буквами в поле Acces?	xruss	Microsoft Office Access	9	08.05.2008 11:32
межстрочный интервал в excel	KorvinZ	Microsoft Office Excel	2	16.01.2008 17:40

16.05.2009, 21:45	#3
Pavelok Подтвердите свой е-майл Регистрация: 02.04.2009 Сообщений: 48	Про слип я знаю, тем более когда программе указать спасть то она начинает виснуть и когда слип закончилось то перестает виснуть. А других способов нет?