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

Программирование. Форум !!!

Подписаться Бесплатный дискуссионный лист Подписчиков 308
←   Август 2004   →
 1
 2
 3
 4
 5
 6
 7
 8
08.08.2004
19:22:17
21:01:43
 9
09.08.2004
00:31:24
16:37:28
10
11
12
13
13.08.2004
09:24:38
11:41:31
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31


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


Сайт листа: http://codeguru.ru
Открыт: 21-09-2003
Пре-модерация: Нет
Адрес для писем в лист: comp.soft.prog.prog-list@subscribe.ru
Адрес модератора: comp.soft.prog.prog-owner@subscribe.ru

Модератор
3V

Статистика

308 подписчиков
0 за неделю

Разрешение экрана [Delphi]

Hello All!
Как в Delphi узнать, какое сейчас разрешение экрана у пользователя? Получить
Width и height.
Пока!
С уважением Lakmus
http://www.nvkz.kuzbass.net/lakmus

Номер выпуска : 3452
Возраст листа : 319 (дней)
Количество подписчиков : 455
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/206813
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog-unsub@subscribe.ru

http://subscribe.ru/ http://subscribe.ru/feedback
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

-*Информационный канал Subscribe.Ru
Адрес подписки:
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ http://subscribe.ru/feedback

Ответить  
"Lakmus"
Fri, 6 Aug 2004 14:01:04 +0700 (#206813)

 

Ответы:

Hello Lakmus,

Width of the screen:
scr_width = GetSystemMetrics(SM_CXSCREEN);

Height of the screen:
scr_height = GetSystemMetrics(SM_CYSCREEN);

Ответить   Cyberbob Fri, 6 Aug 2004 11:24:12 +0400 (#206869)

 

Здравствуйте, Lakmus.

Вы писали 6 августа 2004 г., 13:01:04:

Вроде:

Screen.Width
Screen.Height

Ответить  
misha
Fri, 6 Aug 2004 13:34:48 +0600 (#207045)

 

Здравствуйте, Lakmus.

Вы писали 6 августа 2004 г. в 10:01:04 [GMT +2:00]:

Самый простой способ - через Screen:
Screen.Width и Screen.Hеight
Но можно еще через АПИ или через реестр.

Ответить   Feniks Fri, 6 Aug 2004 10:07:13 +0300 (#207046)

 

Здравствуйте !

Мои 5 копеек :

Через API :

1). Функция :

int GetSystemMetrics(int nIndex);

Вызывать с параметрами SM_CXSCREEN и SM_CYSCREEN.
Вернет ширину и высоту соответственно.

2). Функция

int GetDeviceCaps(HDC hdc, // handle to DC
int nIndex // index of capability);

Тут нужен дескриптор контекста устройства окна десктопа.
Получить его можно через GetDC.
То есть код (извиняйте, что на C, для делфи аналогично будет) :

HDC hDC = ::GetDC(NULL);

if(hDC)
{
int cx = GetDeviceCaps(hDC, HORZRES);
int cy = GetDeviceCaps(hDC, VERTRES);

::ReleaseDC(NULL, hDC);
}

3). Функция

BOOL GetMonitorInfo(HMONITOR hMonitor, // handle to display monitor
LPMONITORINFO lpmi // display monitor
information);

Вобщем то, эта функция дает гораздо больше информации, чем в данной
задаче
требуется, и создана для работы в системах с несколькими мониторами.
И в Win 95 ее нет (только начиная с 98-й), но можно и ее использовать.

--
С уважением, Вахтуров Виктор.
Информационный сайт для программистов http://SoftMaker.com.ru

Номер выпуска : 3458
Возраст листа : 319 (дней)
Количество подписчиков : 455
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/207113
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog-unsub@subscribe.ru

http://subscribe.ru/ http://subscribe.ru/feedback
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

-*Информационный канал Subscribe.Ru
Адрес подписки:
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписать: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ http://subscribe.ru/feedback

Ответить  
"Victor V. Vakchturov"
Fri, 6 Aug 2004 17:28:06 +0400 (#207113)

 

Доброе утро, день, вечер, ночь (ненужное затереть) Lakmus!!!
ЗЕ МЫШЬ 2.11 нашептал что сейчас: 11:41:52, 6 августа 2004 г.,
Вы писали 6 августа 2004 г., 11:01:04, что:

s_hg:=Screen.Height;
s_wd:=Screen.Width;

Ответить   Rio Fri, 6 Aug 2004 11:43:25 +0400 (#207065)