Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

главная форма ровно по центру монитора [D7, WinXP]


Sash ©   (2004-10-01 12:31:00) 

Здравствуйте! Подскажите плиз, как сделать , чтобы форма появлялась ровно по центру монитора?


Mihey_temporary   (2004-10-01 15:27:00) [1]


>  Left:=Screen.WorkAreaLeft+Screen.WorkAreaWidth div 2-Width
> div 2;
>  Top:=Screen.WorkAreaTop+Screen.WorkAreaHeight div 2-Height
> div 2


Быстрее:

Left:=Screen.WorkAreaLeft+(Screen.WorkAreaWidth-Width) div 2;
Top:=Screen.WorkAreaTop+(Screen.WorkAreaHeight-Height) div 2


TUser   (2004-10-01 13:53:00) [2]

2 [3]
poDesctopCenter

Тут кто-то жаловался, что в таком режиме на компах с двумя мониторами форма разрывается пополам, так что осторожнее, если у твоих пользователей по 2 экрана.


Sash   (2004-10-01 12:46:00) [3]

2 trofimich
Понятно! и Вам спасибо!


trofimich   (2004-10-01 12:44:00) [4]

Учти, что poScreenCenter не учитывает панель задач. Если надо с учётом панели задач, то я пишу в конструкторе так:

 Left:=Screen.WorkAreaLeft+Screen.WorkAreaWidth div 2-Width div 2;
 Top:=Screen.WorkAreaTop+Screen.WorkAreaHeight div 2-Height div 2


Sash   (2004-10-01 12:40:00) [5]

2PVOzerski ©   (01.10.04 12:34) [1]
спасибо!


PVOzerski   (2004-10-01 12:34:00) [6]

Свойство формы Position:=poScreenCenter; Прямо в design-time, из инспектора объектов.


Наверх

Титульная страница Поиск, карта сайта Написать письмо