WinAPI: GetSystemMetrics – 擷取系統度量等數值資訊

來源:互聯網
上載者:User
聲明:
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;

參數詳解:


聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.