Скачать: CL | DM;

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

← →
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]

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

---

← →
easy ©   (2004-07-22 15:20) [3]

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

---

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

Скачать: CL | DM;



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