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

Как запретить и перехватить выход из программы верхним крестиком?   Найти похожие ветки 

← →
KvORubin ©   (2006-01-01 22:44) [0]

желательно чтобы выход был исключительно через моё CLOSE;

---

← →
KvORubin ©   (2006-01-01 23:53) [1]

Удалено модератором
Примечание: Создание пустых сообщений

---

← →
Джо ©   (2006-01-02 00:02) [2]

Что такое "моё CLOSE"? Кстати, не лучше ли убрать тогда этот "крестик"?

---

← →
ArtemESC ©   (2006-01-02 00:28) [3]

Наверное так:
   Object Inspector |Events|OnCloseQuery : CloseQuery
 ...
 procedure TForm1.CloseQuery(Sender: TObject; var CanClose: Boolean);
   begin
     ...
      //если после окончания процедуры CanClose = False значит прога не
      //    закроется, CanClose = True закроется.      ...
   end;

---

← →
Джо ©   (2006-01-02 00:29) [4]

Точно... Самый верный рецепт против закрывания "крестиком". Лучше только лампадка на грудь :)

---

← →
Чародей ©   (2006-01-03 12:19) [5]

> Джо ©   (02.01.06 00:02) [2]
> Что такое "моё CLOSE"? Кстати, не лучше ли убрать тогда
> этот "крестик"?

Если просто убрать крестик это не отменит Alt+F4. А CloseQuery CanClose:=False запрещает любое закрытие, даже снятие задачи проходит не мгновенно.

---

← →
Джо ©   (2006-01-03 15:19) [6]

[5] Чародей ©  
> Если просто убрать крестик это не отменит Alt+F4.

А никто и не просил отменять Alt+F4, просили, цитирую:
> Как запретить и перехватить выход из программы верхним крестиком?

Так вот: нет "крестика", нет и "проблемы". Не нужно ничего "перехватывать" и "запрещать". Не так ли?

---

← →
Джо ©   (2006-01-03 15:20) [7]

[5] Чародей ©  
> А CloseQuery CanClose:=False запрещает любое закрытие,


А разве где-то требовалось "запрещать любое закрытие"?

---

← →
Leonid Troyanovsky ©   (2006-01-03 16:12) [8]

> KvORubin ©   (01.01.06 22:44)  
> желательно чтобы выход был исключительно через моё CLOSE;


http://groups.google.com/group/fido7.ru.delphi.chainik/msg/77b9e4561f64d7df

--
Regards, LVT.

---

← →
!Han! ©   (2006-01-04 00:04) [9]

В обьктном инспекторе убираеш с формы єтот крестик (надеюсь ты знаеш как это делаеться)и создаеш обработчик событий на событие  Onclik и прописуеш кнопке этот код
begin
form1.close;
end;

---

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

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



Память: 0.47 MB
Время: -0.971 c