Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Media";
Текущий архив: 2004.05.16;
Скачать: [xml.tar.bz2];

Вниз

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

 
dwUser   (2004-02-24 18:46) [0]

Подскажите, пожалуйста, как правильно задать параметр dwRefreshRate (так, кажется) функции SetDisplayMode, а еще - как правильно пользоваться функцией EnumDisplayModes (и чтобы различать режимы с разной кадровой частотой). Заранее благодарю.


 
miek ©   (2004-02-24 21:41) [1]

with SurfaceDescription do
 begin
   dwSize:= sizeof( SurfaceDescription);
   dwFlags:= DDSD_CAPS{ or DDSD_BACKBUFFERCOUNT} or DDSD_REFRESHRATE;
   dwRefreshRate:= 80;

   ddsCaps.dwCaps:= DDSCAPS_PRIMARYSURFACE or DDSCAPS_FLIP or DDSCAPS_COMPLEX;
   DwBackBufferCount:= 1;
 end;

DDrawObject.CreateSurface( SurfaceDescription, PrimarySurface, nil);


 
Sapersky ©   (2004-02-26 12:09) [2]

Гм... а просто задать 4-й (или 5-й, не помню точно) параметр SetDisplayMode нельзя (DirectDraw должен быть начиная с 3-го, вообще лучше 7-й)?

По поводу EnumDisplayModes:

Var VModes : array [0..63] of TDDSurfaceDesc2;
   VModeCount : Integer = 0;

function EnumModesCallback(const lpDDSurfaceDesc: TDDSurfaceDesc2;
     lpContext: Pointer) : HResult;
Var BDepth : DWord;
begin
With lpDDSurfaceDesc do
 If (dwWidth=0) or (dwHeight=0) then begin
   Dec(VModeCount); Result:=DDENUMRET_CANCEL;
 end else begin
   Result:=DDENUMRET_OK;
   BDepth:=ddpfPixelFormat.dwRGBBitCount;

   If (dwWidth>=640) and (dwHeight>=480) and
      (BDepth>=16) and (dwRefreshRate>=75) then // например
   begin
       VModes[VModeCount]:=lpDDSurfaceDesc; Inc(VModeCount);
   end;
 end;
end;

DD7.EnumDisplayModes(DDEDM_REFRESHRATES, nil, nil, EnumModesCallBack);



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

Форум: "Media";
Текущий архив: 2004.05.16;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.517 c
1-1083133377
Ivolg
2004-04-28 10:22
2004.05.16
Сливание


14-1083060913
syte_ser78
2004-04-27 14:15
2004.05.16
ping


1-1083220223
Svetka*
2004-04-29 10:30
2004.05.16
??????????


8-1077199677
Bmouradov
2004-02-19 17:07
2004.05.16
Как на Canvas рисовать сглаженные прямые, окружности и т.п.?


1-1083509511
Pensioner
2004-05-02 18:51
2004.05.16
GetCurrentDir, а может что нибудь другое





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский