Работа с формой.

← →
АлеКо (2003-06-26 08:56) [0]

Привет! А не ответители мне на вопрос как сделать так чтобы окно моего приложения пользователь не смог уменьшить меньше определенного значения. дело в том что на форме много элементов и они привязаны к форме и если ее очень уменьшить элементы заползают друг на друга.

← →
Anatoly Podgoretsky (2003-06-26 08:58) [1]

wm_getminmaxinfo

← →
АлеКо (2003-06-26 08:59) [2]

Это что это где?

← →
Skier (2003-06-26 09:00) [3]

>АлеКо (26.06.03 08:59)
справка по WinAPI

← →
Digitman (2003-06-26 09:00) [4]

на то есть событие TControl.OnResize()

в его обработчике анализируй тек. значения св-в Width, Height, и если они меньше допустимых, устанавливай эти свойства нужным тебе образом

← →
Zacho (2003-06-26 09:01) [5]

В D6 можно и проще - см. св-во Constraints

← →
АлеКо (2003-06-26 09:04) [6]

Спасиба Zacho!

← →
dataMaster (2003-06-26 09:09) [7]

protected
procedure WMGetMinMaxInfo(var Message : TMessage); message WM_GetMinMaxInfo;

procedure TForm1.WMGetMinMaxInfo(var Message : TMessage);
type
PTMinMaxInfo = ^TMinMaxInfo;
begin
with PTMinMaxInfo(Message.LParam)^.ptMinTrackSize do
begin
x := 200;
y := 100;
end;
with PTMinMaxInfo(Message.LParam)^.ptMaxTrackSize do
x := 500;
y := 300;
inherited;
end;

← →
Centurion (2003-06-26 10:43) [8]

Используй Constraint.MinWidth
MinHeight

← →
Ed (2003-06-26 18:01) [9]

> на то есть событие TControl.OnResize()
>
> в его обработчике анализируй тек. значения св-в Width, Height,
> и если они меньше допустимых, устанавливай эти свойства
> нужным тебе образом

Ed
По моему будет вход в цикл,т.к.будет повторный вызов TContro.OnResize при изменении св-ств Width,Height.

← →
BigDAN (2003-07-01 09:49) [10]

> Ed
> По моему будет вход в цикл,т.к.будет повторный вызов TContro.OnResize
> при изменении св-ств Width,Height.

Не будет

Работа с формой. Найти похожие ветки