如何获取系统颜色

  • 主题发起人 主题发起人 import
  • 开始时间 开始时间
I

import

Unregistered / Unconfirmed
GUEST, unregistred user!
所谓系统颜色就相当于在Windows控制面板的显示中的外观选项卡中设置的系统颜色。在应用程序中使用系统颜色能使你的应用程序在任何情况下都能与系统保持一到的颜色,能更进一步体现你的应用程序与操作系统的高度集成化。使用GetSysColor()函数可获取系统颜色。具体使用方法如下:
var i:integer;
begin
//取得系统桌面背景颜色
i :=GetSysColor(COLOR_BACKGROUND);
end;
要取得其它系统颜色,只要把参数换一下就可以了,其它系统颜色的索引号如下:
COLOR_BACKGROUND      桌面背景
COLOR_SCROLLBAR      滚动条
COLOR_ACTIVECAPTION     活动窗口标题
COLOR_INACTIVECAPTION   非活动窗口标题
COLOR_MENU         菜单
COLOR_WINDOW        窗口背景
COLOR_WINDOWFRAME     窗口框
COLOR_MENUTEXT       窗口文字
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 选择按钮
 
 

Similar threads

D
回复
0
查看
825
DelphiTeacher的专栏
D
D
回复
0
查看
831
DelphiTeacher的专栏
D
D
回复
0
查看
664
DelphiTeacher的专栏
D
后退
顶部