Текущий архив: 2005.09.18;
Скачать: CL | DM;

Вниз

Изменение частоты обновления экрана ?   Найти похожие ветки 

← →
chili   (2005-07-28 12:02) [0]

Добрый день...

Подскажите как изменить частоту обновления экрана???

---

← →
chili   (2005-07-28 13:11) [1]

Вобщем сам разобрался
если кто не знает или просто интересно :)

function TMainForm.ChangeResolution(XResolution, YResolution, Depth: DWORD; Frequency: Cardinal): BOOL;
var
   DevMode: TDeviceMode;
   i: Integer;
begin
   Result := False;
   i := 0;
   while EnumDisplaySettings(nil, i, DevMode) do
       with DevMode do
       begin
           if (dmPelsWidth = XResolution) and (dmPelsHeight = YResolution) and (dmBitsPerPel = Depth) and (dmDisplayFrequency = Frequency) then
               if ChangeDisplaySettings(DevMode, CDS_UPDATEREGISTRY) = DISP_CHANGE_SUCCESSFUL then
               begin
                   Result := True;
                   SendMessage(HWND_BROADCAST, WM_DISPLAYCHANGE, SPI_SETNONCLIENTMETRICS, 0);
                   Break;
               end;
           Inc(i);
       end;
end;


---

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

Текущий архив: 2005.09.18;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.16 c