Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.02 c