Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Текст [D7, WinXP]

Ламерок © (2005-08-10 23:42:00)
Как сделать чтобы Label отображался по центру экрана независимо от разрешения?

boalse (2005-08-11 09:38:00) [1]

> label1.left:=round(form1.width-label1.width)/2

Лучше так:

procedure TForm1.FormResize(Sender: TObject);
begin
Label1.left:=Round(form1.clientWidth/2 - Label1.Width/2) ;
Label1.top:=Round(form1.clientheight/2 - Label1.Height/2);
end;

Label будет точно посередине формы.

Если всё-таки хочется, чтобы метка была посреди экрана, делай так:
procedure TForm1.FormConstrainedResize(Sender: TObject; var MinWidth,
MinHeight, MaxWidth, MaxHeight: Integer);
begin
Label1.left:=Round(Screen.Width / 2 - Label1.Width / 2 -Form1.Left);
Label1.top:=Round(Screen.Height / 2 - Label1.Height / 2-Form1.top);
end;

Думкин (2005-08-11 09:26:00) [2]
> [8] syte_ser78 © (11.08.05 09:13)

clientwidth

syte_ser78 (2005-08-11 09:13:00) [3]
Когда я первый раз делал такое то сделал немного тупо но сработало.
label1.left:=round(form1.width-label1.width)/2
Аналогично для высоты

Наиль (2005-08-11 00:35:00) [4]
Заранее ставишь label в центр. Делаешь инспекторе WindowState=wsNormal и Label1.Anchors=[].
А в FormCreate (чтобы уж наверняка) пишешь WindowState:=wsMaximized;
Должно получиться.

Ламерок (2005-08-11 00:23:00) [5]
Таже самая фигня!

Наиль (2005-08-11 00:19:00) [6]
Кажется, если WindowState формы задавать заранее, то [3] работает глючно.
Если задавать в onCreate, то нормально.

Ламерок (2005-08-11 00:17:00) [7]
Не получилось!
Вообще текста не видно!
Может есть другой способ?

jack128 (2005-08-11 00:10:00) [8]
Ламерок (11.08.05 0:03) [2]
У меня форма на весь экран и размер её не изменяется.
Ну-ну...
Label1.Anchors := [];

Ламерок (2005-08-11 00:03:00) [9]
У меня форма на весь экран и размер её не изменяется.

jack128 (2005-08-10 23:58:00) [10]
а если юзер передвинет форму так, что центр экрана будет вне приделов это формы, то метка где должна находится ??

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »