Очередной глюк в Делфи чтоли?

← →
alt7 (2003-10-20 12:32) [0]

D7. Компонент TTCPClient. Событие OnReceive.

Выдержка из исходника:

if <условие> then
begin
while not TCPCHist.Connected do
begin
try
TCPCHist.Connect;
except on ESocketError do begin Writeln(vLogFile,"Failed to connect to history server... ("+DateTimeToStr(Now)+")"); continue; end;
end;
end;
if TCPCHist.Connected then EvClass.History_get_quote1(vLastBuffer);
TCPCHist.Disconnect;
...
end;

Так вот, коннекчусь, while завершается, запускается процедура EvClass.History_get_quote1(vLastBuffer), из соответ. класса EventClass.
Потом она отрабатывается и, УПРАВЛЕНИЕ ОПЯТЬ ПЕРЕДАЕТСЯ НА WHILE, и все зацикливается. Где копать, на что грешить?

Уже все заремарил, отставил только Connect и вызов процедуры, так после ее отработки, переходим опять на коннект, бред какой-то.

← →
Е-Моё имя (2003-10-20 13:09) [1]

неа
внеочередной

← →
Ihor Osov'yak (2003-10-20 14:11) [2]

неа.. Глюк в 17 строке твоего кода..

Поставь точку прерывания на
if <условие> then
и
if TCPCHist.Connected then EvClass.History_get_quote1(vLastBuffer);

удивишся..

← →
alt7 (2003-10-20 14:16) [3]

Да я уже разобрался ;))
Не в 17 строке дело, а в склерозе, забыл таймер убрать ;))
Тема закрыта.

← →
Ihor Osov'yak (2003-10-20 14:30) [4]

2 [3] alt7 (20.10.03 14:16)

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

← →
Palladin (2003-10-20 15:02) [5]

да уж... пионеры-первооткрыватели, млин...

Очередной глюк в Делфи чтоли? Найти похожие ветки