Зависание программы при попытки получения сообщения.

[Lokos]

Здравствуйте.
Программа вешается напроч если попытаться получить сообщение которое не было отправлено. получаю так

procedure TForm1.Button5Click(Sender: TObject);
var 
   s:TStringStream;
begin
   s:=TStringStream.Create;
   try
      idtcpc.IOHandler.ReadStream(s);
      s.Position:=0;
      memo1.Lines.LoadFromStream(s);
   finally
      s.Free;
end;
end;

То есть если сервер отправляет какое либо сообщение, клацаем по данной кнопочки сообщение появляется в memo, а если сервер не чего не отправляет и клацнуть по кнопочке то программа встает в ступор, как этого можно избежать. Я так понимаю висеть она будет пока ей все такие не прийдет сообщение.

[Stilet]

Вообще-то получение данных делается в особом событии, а не по клику кнопки.
Почитай про TIDTCP событие OnWork

[Lokos]

Сообщение от Stilet

Вообще-то получение данных делается в особом событии, а не по клику кнопки.
Почитай про TIDTCP событие OnWork

можно пример небольшей

[Stilet]

Увы я не дружу с ИНДИ. Просто читал в хелпе про это событие.

[Terikon]

Кинь на форму TidAntiFreeze с вкладки Indy Misc

[Lokos]

Сообщение от Terikon

Кинь на форму TidAntiFreeze с вкладки Indy Misc

это конечно поможет но не совсем, тупит с антифризом тоже не по детски. у idTCPclient'a не как нельзя определить что пришло сообщение. как у сервера в методе onExecute

[bulldog5293]

почему? перенеси в поток то что у тебя вызывает зависания и при каждом запросе выводи результат в label

[Lokos]

Сообщение от bulldog5293

почему? перенеси в поток то что у тебя вызывает зависания и при каждом запросе выводи результат в label

можно пример кода, только начал работать с инди много не понятно а с инфой по нему крайне туго(((

[Seven[up]]

ClientSocket и ServerSocket событие OnClientRead