Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Частота монитора [D5, Win95/98, Win2k]


_Andy ©   (2003-04-29 13:08:00) 

Подскажите как узнать/установить частоту монитора.
Заранее Фенкс.


aan   (2003-05-04 13:33:00) [1]

// Кусок одной из моих прог.
Function ChangeScreenMode(Mode: TDevMode; VRef: DWORD): Boolean;
Var
NewMode : TDevMode;
ChResult: LongInt;
begin
NewMode:= TDevMode(Mode); // <<<---- надо выбрать режим! NewMode.dmDisplayFrequency:= VRef; // <<<---- Частота
NewMode.dmDisplayFlags:= DM_BITSPERPEL and DM_PELSWIDTH and DM_PELSHEIGHT
and DM_DISPLAYFLAGS and DM_DISPLAYFREQUENCY;
{ Изменение графического режима }
ChResult:= ChangeDisplaySettings(NewMode, 0);
Result:= ChResult = DISP_CHANGE_SUCCESSFUL;
end;

===================================
Определить чатоту можно так:
VRef:= GetDeviceCaps(DC, VREFRESH);
Про VREFRESH в HelpAPI написано - "Windows NT only..."

http://rc4wa.narod.ru


jonni   (2003-05-04 00:10:00) [2]

EnumDisplaySettings(nil,ENUM_CURRENT_SETTINGS,CurrentDeviceMode);

const
ENUM_CURRENT_SETTINGS = DWORD(-1);
ENUM_REGISTRY_SETTINGS = DWORD(-2);

dlya win 98 chastota wsegda =0 libo 1
chitayte msdn


handra   (2003-04-30 17:34:00) [3]

описано как ее установить, а как узнать текущую?


Sergey   (2003-04-30 12:21:00) [4]

ChangeDisplaySettings


wal   (2003-04-29 18:02:00) [5]

Почитай в статьях на етом сайте - где-то было.


Xeon   (2003-04-29 16:00:00) [6]

Слушь - как те ответят - кинь мне на было ответ. Заранее спасибо.


Наверх

Титульная страница Поиск, карта сайта Написать письмо