Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];




Вниз

Люди добрые!!! Как правильно менять разрешение экрана???? 


VEG   (2001-10-13 21:40) [0]

Функция:
function SetFullscreenMode:Boolean;
var DeviceMode : TDevMode;
begin
with DeviceMode do
begin dmSize:=SizeOf(DeviceMode);
dmBitsPerPel:=16;
dmPelsWidth:=640;
dmPelsHeight:=480;
dmFields:=DM_BITSPERPEL or DM_PELSWIDTH or DM_PELSHEIGHT;
result:=False;
if ChangeDisplaySettings(DeviceMode,CDS_TEST or CDS_FULLSCREEN) <> DISP_CHANGE_SUCCESSFUL then Exit;
Result:=ChangeDisplaySettings(DeviceMode,CDS_FULLSCREEN) = DISP_CHANGE_SUCCESSFUL;
end;
end;
procedure RestoreDefaultMode;
var T : TDevMode absolute 0;
begin
ChangeDisplaySettings(T,CDS_FULLSCREEN);
end;
На некоторых компах не работает!! (точнее при возвращении назад частота обновления экрана съезжает на 60 гц).



Anatoly Podgoretsky   (2001-10-14 14:04) [1]

Правильно менять с помощью мышки, пользовательскими функциями или ты выше его Пользователя?



Ray   (2001-10-14 14:10) [2]

у меня на сайте есть мой компонент с исходником для смены разрешения экрана
http://rayadams.r2.ru




Форум: "Система";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.012 c
4-90408           Dufe Rob              2001-11-27 01:03  2002.01.28  
Открытие файла программой...


4-90425           Gennady               2001-11-29 11:25  2002.01.28  
Clipboard снова...


1-90255           Delphimun             2002-01-09 15:00  2002.01.28  
Как искать во вложенных папках файлы?


3-90231           Кнопка                2001-12-07 09:32  2002.01.28  
Поиск в базе данных (Очень срочно!!!)


1-90302           Oleg Fomicheff        2002-01-11 06:20  2002.01.28  
ColorBox с русскими названиями цветов.