Текущий архив: 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.43 MB
Время: 0.008 c