Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.30;
Скачать: CL | DM;

Вниз

Как проверить Show Modal   Найти похожие ветки 

 
BadResult   (2005-10-09 16:15) [0]

Открываю форму Form2.ShowModal; Но если эта форма уже открыта то вылазит ошибка. Как провериь открыта или нет?


 
kami ©   (2005-10-09 16:37) [1]

if not Form2.Visible then
 Form2.ShowModal; // ?


 
Fay ©   (2005-10-09 17:05) [2]

2 BadResult   (09.10.05 16:15)
Что-то я не могу себе представить такую ситуацию... Во всяком случае, для модальной формы.


 
kami ©   (2005-10-09 17:25) [3]

Fay ©   (09.10.05 17:05) [2]
О, очень даже может быть.
Сам до позавчерашнего дня не верил, а оказывается, надо было.
В общем, дело было так :
клиент/сервер в локалке, неблокирующий режим. Доп. потоки не создаю (и ни разу в жизни не создавал).Сервер командует "Регистрация!", клиент показывает модальную форму. Так вот, если сервер пришлет ещё раз "Регистрация!", то клиент попробует снова отобразить форму > осибка.


 
BadResult   (2005-10-09 17:27) [4]


> не могу себе представить такую ситуацию...


Например:

procedure TForm1.Timer1(Sender: TObject);
begin
RegistrationForm.ShowModal;
end;


 
Palladin ©   (2005-10-09 17:29) [5]

Подобное можно организвать с помощью вызова модальной формы из нее же самой (вызов метода, из диалога, который и создал диалог) или же по причине вызова этого метода по таймеру или несколькими потоками. Все вышеперечисленное является грубой ошибкой логики приложения (кроме может быть многопоточности да и то за редким исключением). Собака порылась совсем не там где думает автор поста. Код нужен.


 
kami ©   (2005-10-09 17:32) [6]

BadResult   (09.10.05 17:27) [4]
Кажися, не стоит так делать, даже в триальных прогах.
Очень надоедливая штука заставит юзера выкинуть программу на свалку, очистить корзину и три раза записать что-нибудь сверху.


 
BadResult   (2005-10-09 17:39) [7]


> Очень надоедливая штука


имхо, это зависит от Timer1.Interval


> порылась совсем не там где думает автор поста. Код нужен.


Код в [4]
Да, наверное, if not Form2.Visible then достаточно.


 
Palladin ©   (2005-10-09 17:51) [8]


> BadResult   (09.10.05 17:39) [7]

Когда писал кода не видел. Слишком долго писал.


 
Anatoly Podgoretsky ©   (2005-10-09 18:51) [9]

BadResult   (09.10.05 17:39) [7]
Такого кода быть не должно, это костыль, а лечить надо ногу.



Страницы: 1 вся ветка

Текущий архив: 2005.10.30;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.06 c
14-1128501028
MBo
2005-10-05 12:30
2005.10.30
Ветка об $ALIGN


5-1105586786
Popov Oleg
2005-01-13 06:26
2005.10.30
Многострочный DBGrid


1-1128626395
Kostafey
2005-10-06 23:19
2005.10.30
Получение и использование адреса метода.


4-1124968435
vvvaaa
2005-08-25 15:13
2005.10.30
Перетаскивание формы


14-1128701922
X9
2005-10-07 20:18
2005.10.30
Вопрос знатокам XML (и Delph :) )