Форум: "Начинающим";
Текущий архив: 2007.03.18;
Скачать: [xml.tar.bz2];

Вниз

Разрешение экрана   Найти похожие ветки 

← →
МегаПупс   (2007-02-22 21:07) [0]

Скажите пожалуйста,
Как в Delphi узнать текущее разрешение экрана пользователя?
И как его можно программно изменить?

---

← →
begin...end ©   (2007-02-22 21:14) [1]

EnumDisplaySettings
ChangeDisplaySettings

---

← →
iXT ©   (2007-02-23 09:35) [2]

Не пиши такие программы.
> разрешение экрана пользователя

Если он захочет, то сам поменяет.

---

← →
Steep ©   (2007-02-23 12:40) [3]

function SetFullscreenMode(PelsWidth, PelsHeight, BitsPerPixel,
DisplayFrequency: Integer):Boolean;
var
 DeviceMode : TDevMode;
begin
 with DeviceMode do
 begin
   dmSize:=SizeOf(DeviceMode);
   dmBitsPerPel:=BitsPerPixel;
   dmPelsWidth:=PelsWidth;
   dmPelsHeight:=PelsHeight;
   dmDisplayFrequency:=DisplayFrequency;
   dmFields:=DM_BITSPERPEL or DM_PELSWIDTH or DM_PELSHEIGHT or DM_DISPLAYFREQUENCY;
   Result:=ChangeDisplaySettings(DeviceMode,CDS_UPDATEREGISTRY) = DISP_CHANGE_SUCCESSFUL;
 end;
end;

---

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

Форум: "Начинающим";
Текущий архив: 2007.03.18;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 2.441 c