Минимизация формы

← →
sapsi (2004-02-26 10:48) [0]

Как сделать чтоб при минимизации формы она не сворачивалась вниз экрана, а оставалась (в минимизированном виде)на своем месте и той же ширины?

← →
TUser © (2004-02-26 11:02) [1]

> (в минимизированном виде)на своем месте и той же ширины?

Т.е. оставить только кэпшен? Наверное надо прописывать ей свой height. width не менять. А если честно, не очень понятно, что конкретно надо.

← →
sapsi (2004-02-26 11:46) [2]

Именно, caption оставить на месте при сворачивании формы

← →
Skier © (2004-02-26 11:48) [3]

WM_SYSCOMMAND + SC_MAXIMIZE

← →
Skier © (2004-02-26 11:48) [4]

ой, SC_MINIMIZE конечно же.

← →
sapsi (2004-02-26 13:22) [5]

Это (WM_SYSCOMMAND + SC_MAXIMIZE) минимизация.
А отловить минимизацию формы (не главной в приложении)?

← →
TUser © (2004-02-26 13:35) [6]

Ей придет такое сообщение. Его и надо ловить.

← →
sapsi (2004-02-26 14:22) [7]

А какой синтаксис wm_syscommand в случае sc_minimize?

TForm1.Minim(var Msg: TMsg; var Handled: boolean);
if Msg.message = wm_syscommand ?

then
.....

← →
sapsi (2004-02-26 14:28) [8]

Заметил, что при минимизации формы приходят два сообщения (в десятичных числах: 161 и 15), при максимизации 5 сообщений: 161, 15,15,15,15.
Как это отловить.

sapsi (26.02.04 14:28) [8]

161 - WM_NCLBUTTONDOWN - это ты нажимаешь на кнопку в заголовке.
15 - WM_PAINT - окно перерисовывается.

Тебе их не надо отлавливать.

> Как сделать чтоб при минимизации формы она не сворачивалась
> вниз экрана, а оставалась

SetWindowPlacement + F1

← →
sapsi (2004-02-26 15:20) [10]

>Тебе их не надо отлавливать.
Как же отловить минимизацию окна?

например,
var wp: TWindowPlacement;
hform: hwnd;

hform - минимизируемая форма

Делать SetWindowPlacement(hform,@wp) когда?

Минимизация формы Найти похожие ветки