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

Вниз

не опходимо перехватить событие закрытия окна идля закрытия запр   Найти похожие ветки 

← →
alexsandri ©   (2002-08-07 18:10) [0]

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

---

← →
Вечно молодой ©   (2002-08-07 19:44) [1]

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
{ Здесь выводишь окно для ввода пароля }
if { пароль введён неверно } then CanClose := False;
end;

---

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

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

Наверх

Память: 0.46 MB
Время: 0.016 c