Вниз
Скачать: CL | DM;

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

 
DSKalugin ©   (2004-11-02 17:29) [0]

При старте ТВТюнера сбрасывается частота видеоадаптера до 60Гц.
Как программно изменить частоту видеоадаптера?
хочу написать обертку для этого долбаного тюнера, чтобы при выходе восстанавливал частоту и выключал ПК. С остальным - все ясно


 
clickmaker ©   (2004-11-02 18:34) [1]

ChangeDisplaySettings()


 
DSKalugin ©   (2004-11-03 13:48) [2]

Спасибо за наводку, там столько параметров, что аж глаза разбегаются... указатели на структуры... и прочая фантастика Попробую разобраться


 
FRick ©   (2004-11-07 20:44) [3]

uses ..., ShellApi, ...;

procedure SetScreen(BPP:byte;width,height,FR:integer);
var
 D: TDevMode;
 h: HWND;

begin
 h:=0;
 D.dmDeviceName:="DISPLAY";
 D.dmBitsPerPel:=BPP;
 D.dmDisplayFrequency:=FR;
 D.dmPelsWidth:=Width;
 D.dmPelsHeight:=Height;
 D.dmFields:=DM_BITSPERPEL+DM_PELSWIDTH+DM_PELSHEIGHT+DM_DISPLAYFREQUENCY;
 D.dmSize:=SizeOf(D);
if ChangeDisplaySettings(D,CDS_TEST)=DISP_CHANGE_SUCCESSFUL then
   ChangeDisplaySettings(D,CDS_UPDATEREGISTRY)
else begin
 showmessage("Монитор не поддерживает выбраный вами видео режим");
Form1.Close; //При ощибке выходит

end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin

SetScreen(32,1024,768,60); {Бит,Width,Height,Гц.}

end;


Напищи помогло или непомогло или сам разобрался!



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

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



Память: 0.45 MB
Время: 0.027 c
11-1084284543
Sakr
2004-05-11 18:09
2004.12.19
Вызов процедуры сразу после Unit1_1.inc


6-1097132350
The X
2004-10-07 10:59
2004.12.19
Проблема с NMPOP3.Connected


14-1101720792
_1008_
2004-11-29 12:33
2004.12.19
Вопрос жителям востока Украины


9-1085669345
Micah'GF
2004-05-27 18:49
2004.12.19
DelphiX: А вы не верили!?!


6-1096999715
santey
2004-10-05 22:08
2004.12.19
как поменять ip local host




   Наверх