Delphi 取得系統介面顏色：GetSysColor 完整常數對照表

製作程式時若能配合作業系統配色，使用者體驗會更好。以下列出系統介面各部位顏色常數，呼叫 GetSysColor 即可取得對應色彩值：

COLOR_SCROLLBAR           捲軸
COLOR_BACKGROUND          桌面背景
COLOR_ACTIVECAPTION       作用中視窗標題列
COLOR_INACTIVECAPTION     非作用中視窗標題列
COLOR_MENU                選單
COLOR_WINDOW              視窗背景
COLOR_WINDOWFRAME         視窗框架
COLOR_MENUTEXT            選單文字
COLOR_WINDOWTEXT          3D 陰影 (Win95)
COLOR_CAPTIONTEXT         標題文字
COLOR_ACTIVEBORDER        作用中視窗邊框
COLOR_INACTIVEBORDER      非作用中視窗邊框
COLOR_APPWORKSPACE        MDI 工作區背景
COLOR_HIGHLIGHT           選取列背景
COLOR_HIGHLIGHTTEXT       選取列文字
COLOR_BTNFACE             按鈕面
COLOR_BTNSHADOW           3D 按鈕陰影
COLOR_GRAYTEXT            灰色文字
COLOR_BTNTEXT             按鈕文字
COLOR_INACTIVECAPTIONTEXT 非作用中視窗文字
COLOR_BTNHIGHLIGHT        3D 選取按鈕高光

範例：取得作用中視窗標題列顏色

var i: Integer;
begin
  i := GetSysColor(COLOR_ACTIVECAPTION);
  Label1.Caption := '顏色代碼: ' + IntToStr(i);
end;

將參數換成上表其他常數即可取得對應系統顏色。