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

Вниз

Закрытие главной формы из модальной   Найти похожие ветки 

 
INTAARI   (2004-06-24 10:41) [0]

Добрый день господа!!!
При нажатие на копку Cancel в модальной форме (ввод пароля)должна закрыться главная форма но этого не происходит.

function TfrmPasswordDlg.Execute: boolean;
begin
 if ShowModal = mrOk
 then
    if edtPassword.Text="12345"
    then result := true
    else result := false;
 else
   begin
    result := false;//нажато все осальное
    frmGMP.Close;//закрытие главной формы
   end;
end;


 
Плохиш ©   (2004-06-24 10:44) [1]

Application.Terminate


 
имя   (2004-06-24 10:47) [2]

Удалено модератором


 
Yakudza ©   (2004-06-24 10:49) [3]

У тебя же функция возарвщает значение здесь result := false;//нажато все осальное

А чего не закрываться из главной формы ?


 
INTAARI   (2004-06-24 10:49) [4]


> Application.Terminate

не срабатывает


 
Ega23 ©   (2004-06-24 10:53) [5]

не срабатывает

Да ну нафиг!


 
INTAARI   (2004-06-24 10:56) [6]

Сработало после изменния на

> ShowModal;
> if ModalResult = mrOk

и замещение frmGMP.Close на Application.Terminate


 
имя   (2004-06-24 10:57) [7]

Удалено модератором


 
имя   (2004-06-24 11:01) [8]

Удалено модератором


 
Плохиш ©   (2004-06-24 11:06) [9]


> www.shegeda.by.ru   (24.06.04 11:01) [8]

Где Вы только такую траву берёте? 8-O

PS. Может в справку глянешь для начала и не путай с Halt.


 
Yakudza ©   (2004-06-24 11:09) [10]

И вообще, зачем так тупо прибивать приложение !?


 
INTAARI   (2004-06-24 11:16) [11]

Гуманее всего
PostMessage(frmGMP.Handle,WM_CLOSE,0,0);
если я правильно понял?


 
имя   (2004-06-24 11:24) [12]

Удалено модератором


 
Плохиш ©   (2004-06-24 11:48) [13]

>www.shegeda.by.ru   (24.06.04 11:24) [12]

Как на счёт события FormDestroy?


 
имя   (2004-06-24 11:51) [14]

Удалено модератором



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

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

Наверх




Память: 0.49 MB
Время: 0.055 c
3-1087221491
Bless
2004-06-14 17:58
2004.07.11
Как работать с полями типа Varbinary в Делфи


1-1088486764
ABL
2004-06-29 09:26
2004.07.11
Как из одного richedita передать часть текста в другой


1-1088595153
Wadim
2004-06-30 15:32
2004.07.11
Приближение просмотра картинки в программе


1-1088344540
Demion
2004-06-27 17:55
2004.07.11
доступ к объектам


4-1086200321
adler
2004-06-02 22:18
2004.07.11
Как установить программно необходимый формат времяни в Win2000