Как задать частоту монитора?

← →
Chery (2004-07-22 13:48) [0]

Меняю разрешение экрана(код ниже) частота сама устанавливается в 60. Как задать частоту монитора или оставить её прежней?
function TForm1.SetFullscreenMode:Boolean;
var DeviceMode : TDevMode;
begin
with DeviceMode do
begin dmSize:=SizeOf(DeviceMode);
dmBitsPerPel:=16;
dmPelsWidth:=800;
dmPelsHeight:=600;
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;

← →
GrigP © (2004-07-22 15:02) [1]

статья была на эту тему с хорошим примером, у меня работает в приложении этот пример уже больше года

← →
Chery (2004-07-22 15:11) [2]

Спасибо за ответ, он мне очень помог...
Частота?

http://delphimaster.ru/articles/display/index.html

Как задать частоту монитора? Найти похожие ветки