声明:
GetSystemMetrics(
nIndex: Integer {参数, 详见下表}
): Integer;
举例 - 获取屏幕分辨率:var
cx,cy: Integer;
begin
{通过 GetSystemMetrics 函数获取屏幕分辨率}
cx := GetSystemMetrics(SM_CXSCREEN);
cy := GetSystemMetrics(SM_CYSCREEN);
ShowMessageFmt('Width:%d; Height:%d', [cx,cy]);
{通过 Screen 对象获取屏幕分辨率}
cx := Screen.Width;
cy := Screen.Height;
ShowMessageFmt('Width:%d; Height:%d', [cx,cy]);
end;
可选参数:SM_CXSCREEN = 0; SM_CYSCREEN = 1; SM_CXVSCROLL = 2; SM_CYHSCROLL = 3; SM_CYCAPTION = 4; SM_CXBORDER = 5; SM_CYBORDER = 6; SM_CXDLGFRAME = 7; SM_CYDLGFRAME = 8; SM_CYVTHUMB = 9; SM_CXHTHUMB = 10; SM_CXICON = 11; SM_CYICON = 12; SM_CXCURSOR = 13; SM_CYCURSOR = 14; SM_CYMENU = 15; SM_CXFULLSCREEN = $10; SM_CYFULLSCREEN = 17; SM_CYKANJIWINDOW = 18; SM_MOUSEPRESENT = 19; SM_CYVSCROLL = 20; SM_CXHSCROLL = 21; SM_DEBUG = 22; SM_SWAPBUTTON = 23; SM_RESERVED1 = 24; SM_RESERVED2 = 25; SM_RESERVED3 = 26; SM_RESERVED4 = 27; SM_CXMIN = 28; SM_CYMIN = 29; SM_CXSIZE = 30; SM_CYSIZE = 31; SM_CXFRAME = $20; SM_CYFRAME = 33; SM_CXMINTRACK = 34; SM_CYMINTRACK = 35; SM_CXDOUBLECLK = 36; SM_CYDOUBLECLK = 37; SM_CXICONSPACING = 38; SM_CYICONSPACING = 39; SM_MENUDROPALIGNMENT = 40; SM_PENWINDOWS = 41; SM_DBCSENABLED = 42; SM_CMOUSEBUTTONS = 43; SM_SECURE = 44; SM_CXEDGE = 45; SM_CYEDGE = 46; SM_CXMINSPACING = 47; SM_CYMINSPACING = 48; SM_CXSMICON = 49; SM_CYSMICON = 50; SM_CYSMCAPTION = 51; SM_CXSMSIZE = 52; SM_CYSMSIZE = 53; SM_CXMENUSIZE = 54; SM_CYMENUSIZE = 55; SM_ARRANGE = 56; SM_CXMINIMIZED = 57; SM_CYMINIMIZED = 58; SM_CXMAXTRACK = 59; SM_CYMAXTRACK = 60; SM_CXMAXIMIZED = 61; SM_CYMAXIMIZED = 62; SM_NETWORK = 63; SM_CLEANBOOT = 67; SM_CXDRAG = 68; SM_CYDRAG = 69; SM_SHOWSOUNDS = 70; SM_CXMENUCHECK = 71; SM_CYMENUCHECK = 72; SM_SLOWMACHINE = 73; SM_MIDEASTENABLED = 74; SM_MOUSEWHEELPRESENT = 75; SM_CMETRICS = 76; SM_XVIRTUALSCREEN = 76; SM_YVIRTUALSCREEN = 77; SM_CXVIRTUALSCREEN = 78; SM_CYVIRTUALSCREEN = 79; SM_CMONITORS = 80; SM_SAMEDISPLAYFORMAT = 81; SM_IMMENABLED = 82; SM_CXFOCUSBORDER = 83; SM_CYFOCUSBORDER = 84; SM_REMOTESESSION = $1000;参数详解:
