Доброе время суток всем. Уже неделю бьюсь над вопросом... И решил обратится к Вам.
Есть код:
Код:
procedure TMainForm.IdTCPServerExecute(AContext: TIdContext);
begin
MessageForm:=TMessageForm.Create(Application);
...
MessageForm.Show;
end;
Как видите, должна создаваться и появляться форма в приложении когда Сервер получает некое сообщение. Но форма появляется ровно на "секунду" и исчезает. Тогда я сделал так:
И форма нормально появляется и я могу с ней работать, но когда я её закрою и придёт новое сообщение на сервер и форма должна опять создасться, вылетает ошибка:
http://www.delphisources.ru/forum/at...d=135258537 6
А вот при нажатии на кнопку этот код работает нормально. Как нужно.
Подскажите как обойтись без "ShowModal"?
Вообще не представляю почему так происходит. Помогите уважаемые прогеры. Неделю бьюсь над проблемой.