T tgangt Unregistered / Unconfirmed GUEST, unregistred user! 2002-02-10 #1 请问，如何取得当前分辨率和颜色的值呢？有什么函数？？谢谢
B beta Unregistered / Unconfirmed GUEST, unregistred user! 2002-02-10 #2 前分辨率简单，用 Delphi 提供的全局变量： Screen.Width 和 Screen.Height 分别表示当前水平和垂直分辨率 颜色值我不太清楚，也许注册表里有
K kthy Unregistered / Unconfirmed GUEST, unregistred user! 2002-02-10 #3 function GetColorDepth: integer var dc: HDC; begin dc := GetDC(0); Result := GetDeviceCaps(dc, BITSPIXEL); ReleaseDC(0, dc); end;
function GetColorDepth: integer var dc: HDC; begin dc := GetDC(0); Result := GetDeviceCaps(dc, BITSPIXEL); ReleaseDC(0, dc); end;
Z zhihuali Unregistered / Unconfirmed GUEST, unregistred user! 2002-02-10 #4 var DevMode : TDevMode; begin EnumDisplaySettings(Nil, 0, DevMode); with DevMode do begin dmPelsWidth // 宽度 dmPelsHeight // 高度 dmDisplayFrequency // 刷新频率 dmBitsPerpel // 颜色 end;
var DevMode : TDevMode; begin EnumDisplaySettings(Nil, 0, DevMode); with DevMode do begin dmPelsWidth // 宽度 dmPelsHeight // 高度 dmDisplayFrequency // 刷新频率 dmBitsPerpel // 颜色 end;
卷 卷起千堆雪tyn Unregistered / Unconfirmed GUEST, unregistred user! 2002-02-19 #6 给你详细的回答 ：?http://www.delphibbs.com/delphibbs/dispq.asp?lid=842491
