制作程序时，被Windows的界面色彩弄得头昏眼花，设计时是一种颜色，色彩搭配得挺好的，可是到了用户手里字体却看不清楚，严重影响了程序效果，所以结合操作系统调配颜色将是令用户用得开心的不可多得的步骤：
下面列出了操作系统界面各部位的名称，要取得系统颜色，把参数换一下就可以了。
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;