默认的按钮是灰色的，那怎样给按钮变色？

谢谢！

解决方案 »

  1.   

    一般的按钮是不能变色的,除非是自定义的按钮..或者用Speedbutton按钮,再往上面放一个图片..
      

  2.   

    是啊,按钮的Font.Color好像也改不了,怎么才能改啊?不好意思,借个地方顺便问一下呀!
      

  3.   

    可能是改不了吧你可以换一个另外的按钮控件啊，比如说flat系列的！
      

  4.   

    我认为这是delphi做的不好的地方，既然有了这个属性，为什么又不让它产生效果呢
      

  5.   

    可以改的请参考下面的代码：{摘自超级猛料}禁止一个控件而不变灰procedure EnableControl(AControl: TWinControl; Enable: Boolean);beginwith AControl doif Enable thenSetWindowLong(Handle, GWL_STYLE, (not WS_DISABLED) and GetWindowLong(Handle, GWL_STYLE))elseSetWindowLong(Handle, GWL_STYLE, WS_DISABLED + GetWindowLong(Handle, GWL_STYLE));end;procedure TForm1.Button1Click(Sender: TObject);beginEnableControl(BitBtn1,False);BitBtn1.Font.Color := clGreen;end;
     
      

  6.   

    好像响应：WM_CTLCOLOR 消息
    nCtlColor等于 CTLCOLOR_BTN   
    然后……摘自MSDN  不过好像效果不好