Учебник по Delphi 4


Height и Width



Это наиболее полезные свойства, возвращающие высоту и ширину экрана в пикселях. Они могут применяться во многих ситуациях, например при определении местоположения формы. Вот как поместить форму в центре экрана.

    Left:= (Screen.Width - Width) div 2;


   Top:= (Screen.Height - Height) div 2;



Эти свойства определяют высоту и ширину формы в пикселях и обычно используются для изменения размеров формы во время работы на дисплеях разной разрешающей способности. Вот пример увеличения размеров формы до размеров всего экрана.

    {Перемещаем форму в верхний левый угол экрана.}


    Left:= 0;


    Тор:= 0;


    (Изменяем размеры формы.)


    Width:= Screen.Width;


    Height:= Screen.Height;


 


    (Класс TScreen, о котором будет сказано ниже, и его экземпляр Screen предоставляют доступ к информации о размерах всего экрана.)


    Приведенный код, конечно, работает, но плохо, так как требуется четыре обновления формы. На самом деле лучше использовать метод SetBounds, определенный у потомков TWinControl:


 


    SetBounds(0, 0, Screen.Width, Screen.Height);



Содержание раздела