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

Вниз

не получается закрыть форму с 1го раза ???   Найти похожие ветки 

 
Byka (345-824-826)   (2007-12-02 21:53) [0]

активирую форму как пологается

 NewForm2( Form2, Pointer( Form1.Form ) );
 form2.Form.showmodal;

она открывается как пологается но закрыть её получается тока тнажав два раза на клавишу

form2.Form.Close;

подскажите как вырубить форму с одного норм нажатия ???


 
Yury Sidorov   (2007-12-02 21:59) [1]

Модальные формы закрываются установкой ModalResult.
Например, в обработчике кнопки ОК напиши:

Form.ModalResult:=IDOK;

P.S. Form.Close; тоже, наверное, должно работать, но ModalResult "правильнее".


 
Byka (345-824-826)   (2007-12-02 22:08) [2]

спасиб Yury Sidorov  mожеш сказать свою аську просто иногда возникают вопросы  ...


 
Byka (345-824-826)   (2007-12-02 22:49) [3]

Form.ModalResult:=IDOK; вообще ноль реакции

     интересно то что когда я использую Form.Close;  на 1 форме она норм вырубается с 1го раза , есле я правлеьно делаю вывод то вторая форма запускается дважды ?


 
Compiler ©   (2007-12-02 23:57) [4]

Form.Free


 
Byka (345-824-826)   (2007-12-03 00:59) [5]


> Form.Free


ок  а почуму я не могу как в норм делфи не выключая окна переключать из  командой showmodal   просто допустим я открываю второе окно

NewForm2( Form2, Pointer( Form1.Form ) );
 form2.Form.showmodal;

а из второго окна когда пытаюсь сделать  form1.Form.showmodal;  она не открывается ???


 
Byka (345-824-826)   (2007-12-03 01:09) [6]

тему можно закрыть уже доперло , как всегда все баги скрывались в полуметрах от манитора



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

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

Наверх




Память: 0.47 MB
Время: 0.015 c
2-1227865339
oracled
2008-11-28 12:42
2009.01.11
Консольное приложение, пытаюсь создать объект TString


1-1205387717
Maxick
2008-03-13 08:55
2009.01.11
TIBataBase и DLL


2-1227711457
ekto
2008-11-26 17:57
2009.01.11
запрос


15-1226908281
AIK
2008-11-17 10:51
2009.01.11
Чё то непонятно с округлением round


15-1226741443
timekiller
2008-11-15 12:30
2009.01.11
Мобильная Delphi