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

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



Память: 0.44 MB
Время: 0.01 c