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