![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как прикрутить TIdConnectionIntercept к TIdTCPClient?
Орион © (2006-09-24 23:04:00)Собственно сабж. В упор не пойму как.
TrafficCounter:=TDemiurgeIntercept.Create;
Tunnel:=TIdTCPClient.Create;
Tunnel.ConnectTimeout:=60000;
Tunnel.IOHandler.Intercept:=TrafficCounter;
На последней строчке AV :(
TDemiurgeIntercept - наследник TIdConnectionIntercept с перекрытыми Receive и Send;
Орион (2006-09-25 19:09:00) [1]> [1] Сергей М. © (25.09.06 09:44)
> [2] umbra © (25.09.06 11:08)
Спасибо. Я даже не подумал об этом ;)
umbra (2006-09-25 11:08:00) [2]
IOHandlerможет не существовать до попытки соединения. Его надо явно создать
tunnel.CreateIOHandler;
Сергей М. (2006-09-25 09:44:00) [3]Потому что IOHandler = nil.