怎样改变标题栏的颜色

Question

有在控制面板－显示器属性下设置
如果要编程改变，用systeminfo函数，不过不能单独改变某个窗口的标题栏

Answer 1

不要标题，自己用控件或者canvas模拟一个标题栏

Answer 2

>>在WM_NCPAINT事件中写代码； 
代码我竹叶有：http://kingron.myetang.com  -->猛料包里面！

Answer 3

谁能给出delphi的代码？
to Kingron，你那个例子是VC的

Answer 4

菜鸟用delphi最合适，开玩笑了。你可以去找个控件，轻松搞顶

Answer 5

procedure TFrmMain.FormCreate(Sender: TObject);
var
  ColorVar:TMSOfficeCaption;
begin
  ColorVar := TMSOfficeCaption.Create(Self);
  ColorVar.Color := clYellow;
end;
还要在单元的调用中加入WORDCAP

Answer 6

to tikkypeng(不知火幻安)　:
怎么我试了一下报告说找不到WORDCAP.dcu呀？难道需要别的控件？

Answer 7

还是费心看一下API吧，也是知识的积累。WM_NCPAINT

Answer 8

我有控件，要的话给我发信：[email protected]