Center

← →
Bobby Digital © (2005-01-17 01:25) [0]

Нужно чтоб компонент всегда был в центре окна, есть ли какие-нибудь стандартные методы чтоб сделать это.

← →
Yanis © (2005-01-17 01:48) [1]

> есть ли какие-нибудь стандартные методы чтоб сделать это

Не знаю. Но можно самому сделать.
procedure TForm1.FormCanResize(Sender: TObject; var NewWidth, NewHeight: Integer; var Resize: Boolean); begin Button1.Left := (Form1.ClientWidth - Button1.Width) div 2; Button1.Top := (Form1.ClientHeight - Button1.Height) div 2 ; end;

Вапрос конечно интересный. Если выставить все Anchors в True и выставить компонент изначально в центре, то он все время будет оставаться в центре. Ведь о размерах сказано ничего не было...

p.s.: не программист ты...

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