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

События на "Развернуть" и "свернуть в окно" форму   Найти похожие ветки 

← →
Dmitry_04   (2005-02-15 16:20) [0]

Как поймать события на "Развернуть" и "свернуть в окно" форму?

---

← →
Джинн   (2005-02-15 16:42) [1]

type
 TMyForm = class(TForm)
 private
   procedure WMSysCommand(var a_Msg: TWMSysCommand); message WM_SYSCOMMAND;
 end;

implementation

procedure TForm1.WMSysCommand(var a_Msg: TWMSysCommand);
begin
 inherited;
 case a_Msg.CmdType of
   SC_MAXIMIZE: {action on maximize};
   SC_MINIMIZE: {action on minimize};
   SC_RESTORE: {action on restore};
 end;
end;

---

← →
Джинн   (2005-02-15 16:47) [2]

кхм...
 TForm1 ≡ TMyForm

---

← →
Юрий Зотов ©   (2005-02-15 18:27) [3]

Маленькая поправочка:
case a_Msg.CmdType and $FFF0 of

---

← →
Dmitry_04   (2005-02-15 18:42) [4]

Юрий Зотов а у меня и без and $FFF0

---

← →
Dmitry_04   (2005-02-15 18:43) [5]

работает хотел сказать...

---

← →
esu ©   (2005-02-15 19:03) [6]

напиши, придет час и там вместо ноликов денть единичка появится и работать перестанет :)

---

← →
Anatoly Podgoretsky ©   (2005-02-15 19:34) [7]

Мужики ну чего вы стараетесь, он же ответы не читает, уже создал новую тему. http://delphimaster.net/view/1-1108479880/

---

← →
Юрий Зотов ©   (2005-02-16 10:10) [8]

> Dmitry_04   (15.02.05 18:42) [4]

До поры, до времени - работает. Но в любую секунду может и не сработать.

---

← →
Dmitry_04   (2005-02-17 20:03) [9]

а почему когда я программно меняю "WindowState", события эти не работают? and $FFF0 я дописал...

---

← →
Dmitry_04   (2005-02-18 14:16) [10]

Помогите плиз

---

← →
begin...end ©   (2005-02-18 14:31) [11]

> Dmitry_04   (17.02.05 20:03) [9]

А почему эти события должны обрабатываться, если окно не получает сообщения WM_SYSCOMMAND?

A window receives this message when the user chooses a command from the window menu (also known as the System menu or Control menu) or when the user chooses the Maximize button or Minimize button.

Хотите, чтобы при программном изменении состояния окна эти события обрабатывались - значит, не используйте свойство WindowState, а посылайте соответствующее сообщение, т.е. WM_SYSCOMMAND, с нужными параметрами.

---

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

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



Память: 0.47 MB
Время: 0.023 c