Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2005.10.30;
Скачать: [xml.tar.bz2];

Вниз

Как проверить 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.038 c
5-1105706773
Aleksandr.
2005-01-14 15:46
2005.10.30
Как у потомков TCustomEdit назначать свое свойство text?


14-1129048573
Santyago
2005-10-11 20:36
2005.10.30
Что пожелать начальнице?


9-1118591031
germany
2005-06-12 19:43
2005.10.30
Помогите с установкай GlScene


2-1128883044
redlord
2005-10-09 22:37
2005.10.30
из dataset в listbox


14-1128803817
raiks
2005-10-09 00:36
2005.10.30
Access Violation при использовании StrUpper





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский