Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.01.22;
Скачать: 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 вся ветка

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

Наверх




Память: 0.48 MB
Время: 0.045 c
11-1097922134
Владимир Кладов
2004-10-16 14:22
2006.01.22
KOLOLERE2


2-1136287686
Officeman
2006-01-03 14:28
2006.01.22
Как програмно закрасить кнопку (TButton) красным ?


2-1136292867
helga
2006-01-03 15:54
2006.01.22
QRCompositeReport


1-1134988402
КодеКорешь
2005-12-19 13:33
2006.01.22
Как узнать сколько эзепляров данной формы уже создано


1-1134721882
Alex_KV
2005-12-16 11:31
2006.01.22
Перевод заголовочного файла С