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

Minimize OnClose   Найти похожие ветки 

← →
Minimize OnClose   (2004-01-20 14:28) [0]

Помогите пожалуйста минимизировать приложение при нажатии на "Х"...

---

← →
MBo ©   (2004-01-20 14:34) [1]

Параметр Action в хелпе

---

← →
TUser ©   (2004-01-20 14:35) [2]

Если этот Х живет на неглавной форме - тогда минимизируй при дестрое этой неглавной формы. А если он живет на главной форме - тогда выхода 2 (наверное больше, конечно). Можно сделать эту форму неглавной, а главной формой объявить, скажем логотипчик, который показывается при запуске приложения. А лучше так - убрать из главной формы этот Х (borderIcons = []), кинуть туды компонент jvCaptionIcon, нарисовать ему нужный тебе глиф (скажем, идентичный стандартному иксу - а, по-моему, там стандартно есть такой, точно не помню) и обработать соотвествующим образом нажатие на этот глиф.

---

← →
TUser ©   (2004-01-20 14:36) [3]

Кажись я намудрил. :))

---

← →
stone ©   (2004-01-20 14:38) [4]

procedure TForm.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
Action := caMinimize;
end;

---

← →
Плохиш_   (2004-01-20 14:42) [5]

>stone © (20.01.04 14:38) [4]

При нажатии на "X" OnClose не вызывается

procedure TForm.FormCloseQuery(...);
begin
CanClose := false;
ShowWindow(Application.Handle, SW_MINIMIZE);
end;

---

← →
Юрий Зотов ©   (2004-01-20 15:21) [6]

Предвижу следующий вопрос: программа не дает Windows нормально завершить свою работу...

---

← →
Плохиш_   (2004-01-20 15:23) [7]

>Юрий Зотов © (20.01.04 15:21) [6]

Подождём ;-))
Он до этого ещё не дошёл ;-)

---

← →
AKul ©   (2004-01-20 15:26) [8]

Наверное с главной формой еще не экспериментировал...

---

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

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



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