![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Center
Bobby Digital © (2005-01-17 01:25:00)Нужно чтоб компонент всегда был в центре окна, есть ли какие-нибудь стандартные методы чтоб сделать это.
Palladin (2005-01-17 02:22:00) [1]Вапрос конечно интересный. Если выставить все Anchors в True и выставить компонент изначально в центре, то он все время будет оставаться в центре. Ведь о размерах сказано ничего не было...
p.s.: не программист ты...
Yanis (2005-01-17 01:48:00) [2]> есть ли какие-нибудь стандартные методы чтоб сделать это
Не знаю. Но можно самому сделать.
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;