Отправляет email-рассылки с помощью сервиса Sendsay

Delphi. Уроки

Подписаться Бесплатная «Серебряная» новостная рассылка . Подписчиков 8.314 RSS
←   Сентябрь 2003   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30


За последние 60 дней ни разу не выходила


Сайт рассылки: http://progs.biz
Открыта: 19-12-2001

Автор
Алексеев Игорь

Статистика

8.314 подписчиков
0 за неделю
←   Все выпуски   →

Delphi. Уроки


Информационный Канал Subscribe.Ru

Delphi. VCL. Уроки с сайта http://progs.biz

Рассылка №37

Delphi. VCL. Урок 40. Получаем характеристики экрана через объект Screen.
Полные версии уроков (с картинками) можно найти по адресам:
Урок 40. Получаем характеристики экрана через объект Screen.
А. Я. Архангельский. Приемы программирования в Delphi.

Заказать на Озоне

Подробнее
Рассылки сайта progs.biz через subscribe.ru
Уроки по ассемблеру
Уроки по ассемблеру. Использование MASM, примеры, FAQ.

Изучаем Delphi. Библиотека VCL. Урок 40. Получаем характеристики экрана через объект Screen

В каждом приложении присутствует объект Screen типа TScreen. Его не надо специально объявлять - он и так доступен.

Вот так, например, с помощью объекта Screen можно выяснить текущие размеры экрана:

var
  Width, Height: Integer;
  ...
begin
  Width:=Screen.Width;
  Height:=Screen.Height;
  ShowMessage('Ширина экрана: ' + IntToStr(Width) +
  ', Высота экрана: ' + IntToStr(Height));

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

Это можно использовать, например, для расположения формы точно по центру экрана (хотя это можно сделать и более простым способом):

procedure TForm1.FormCreate(Sender: TObject);
begin
  Form1.Left:=(Screen.Width - Form1.Width) div 2;
  Form1.Top:=(Screen.Height - Form1.Height) div 2;
end;

Все свойства объекта Screen доступны только для чтения. Кроме того, они не доступны на этапе разработки программы - вы можете их использовать только на этапе выполнения.

Наверх
Copyright Алексеев Игорь, 2002-2003
Copyright Шмидт Отто, 2002-2003
Copyright сайт progs.biz, 2002-2003
Распространение материалов без разрешения владельцев авторских прав запрещено.
http://subscribe.ru/
E-mail: ask@subscribe.ru 		Отписаться
Убрать рекламу
В избранное