ClientRect

← →
DevilDevil © (2007-01-11 20:05) [0]

В моём приложении множество компонентов, часть из воторых имеет Align-ы: alLeft, alRight, alTop, alBottom. Неужели нет нормальных стандартных средств вычислить действительную клиентскую область?

← →
Loginov Dmitry © (2007-01-11 20:07) [1]

А ненормальные чем не устраивают?

← →
DevilDevil © (2007-01-11 20:17) [2]

ClientRect = (0, 0, 1280, 968) при Maximize естественно, иными словами:

ClientRect = Rect(0, 0, ClientWidth, ClientHeight);

← →
Desdechado © (2007-01-11 20:25) [3]

> (0, 0, 1280, 968)
это не клиентская область, это размеры формы

← →
DevilDevil © (2007-01-11 20:37) [4]

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); var R : TRect; begin R := ClientRect; Caption := Format("ClientRect = (%d, %d, %d, %d) !!!", [R.left, R.top, R.right, R.bottom ]); end;

← →
DevilDevil © (2007-01-12 12:23) [5]

← →
umbra © (2007-01-12 12:29) [6]

а что нужно то?

Поясню: если на форме куча Align-утых компонентов, то истинная клиентская область формы изменится. Вопрос: есть ли стандартный способ нахождения истинной клиентской области?

← →
Правильный Вася (2007-01-12 12:44) [8]

у Кришны спроси про истину

> DevilDevil © (12.01.07 12:38) [7]
>
> Поясню: если на форме куча Align-утых компонентов, то истинная
> клиентская область формы изменится.

С чего она вдруг изменится?
В справку смотрел? Насчет ClientWidth,ClientHeight?
Это те же Width и Height только без учета рамки

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