Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.18;
Скачать: CL | DM;

Вниз

Как изменить разрешение монитора.   Найти похожие ветки 

 
Radgar ©   (2005-03-19 16:46) [0]

Доброго времени суток.
Проблема в том, что мне нужно изменить (програмно) разрешение монитора, подскажите, пожлуйста, как это сделать.


 
AlterEgo of WondeRu ©   (2005-03-19 16:57) [1]

Узнать можно так:

Screen.Width;
Screen.Height;


А поменять можно с помощью следующей процердуры:

procedure ChangeDisplayResolution(x, y: word);
var
 dm: TDEVMODE;
begin
 ZeroMemory(@dm, sizeof(TDEVMODE));
 dm.dmSize := sizeof(TDEVMODE);
 dm.dmPelsWidth := x;
 dm.dmPelsHeight := y;
 dm.dmFields := DM_PELSWIDTH or DM_PELSHEIGHT;
 ChangeDisplaySettings(dm, 0);
end;


(c) delphiworld.narod.ru



Страницы: 1 вся ветка

Текущий архив: 2005.07.18;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.034 c
10-1096808482
SMT
2004-10-03 17:01
2005.07.18
Работа с компонентами ExcelApplication и другими со страницы Serv


14-1119712856
lookin
2005-06-25 19:20
2005.07.18
Открытая страница и дополнительный трафик...


3-1118144276
Juice
2005-06-07 15:37
2005.07.18
Обработка ошибок - код


1-1119719649
NightStranger
2005-06-25 21:14
2005.07.18
Не могу закрыть Excel


14-1119527005
NewWonder
2005-06-23 15:43
2005.07.18
Что должно быть в ТЗ для программы средней сложности?