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

Как сделать форму, не сворачиваемую кнопкой   Найти похожие ветки 

← →
Алексей К.   (2002-07-30 22:31) [0]

Как сделать форму, не сворачиваемую кнопкой "Свернуть все окна" на панели задач и горячими клавишами. Форма должна только закрываться и ничем не сворачиваться. Либо видна, либо закрыта.

---

← →
Eugene Lachinov ©   (2002-07-30 22:56) [1]

procedure TForm1.WMQueryEndSession(var Message : TMessage);
begin
FShutdown := True;
inherited
end;

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose := FShutdown
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
FShutdown := True;
Close
end;

procedure TForm1.FormShow(Sender: TObject);
begin
ShowWindow(Application.Handle, SW_HIDE)
end;

---

← →
Song ©   (2002-07-31 09:47) [2]

2Eugene Lachinov © (30.07.02 22:56)
А при чём тут завершение Windows?

---

← →
Eugene Lachinov ©   (2002-07-31 14:38) [3]

>Song
Потому что это был бы следующий вопрос :)

---

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

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



Память: 0.45 MB
Время: 0.011 c