Текущий архив: 2007.03.18;
Скачать: CL | DM;
Вниз
Разрешение экрана Найти похожие ветки
← →
МегаПупс (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;
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.034 c