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

Не закрывабшася программа?   Найти похожие ветки 

← →
Vag   (2004-02-13 22:10) [0]

Какой код нужен чтобы при нажатии на значок крестика она не закрыалась?
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
{А дальше что?}
end;

---

← →
Unax ©   (2004-02-13 22:11) [1]

Action := caNone;

---

← →
Khabibulin   (2004-02-13 22:12) [2]

FormClose(Self, False);

---

← →
Vag   (2004-02-13 22:15) [3]

Спасибо!!!

---

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

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



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