发信人: redfox (Z掉了几乎所有的版...), 信区: BorlandDev
标  题: Delphi编程 -- 4.10 取系统颜色
发信站: 哈工大紫丁香 (2000年09月01日16:07:06 星期五), 站内信件

取系统颜色 

要取得系统颜色，把参数换一下就可以
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);
end;


 

--
※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.227.107]