delphi中要如何实现按钮的图片变换效果

Question

delphi中要如何实现按钮的图片变换效果
就是鼠标没有放上去是一个图片背景，放上去换成另一个背景？如果要用皮肤控件，哪种控件好？有没有简单的方法？

Answer 1

皮膚 VclSkin
實現你上面的效果，建議用IMAGELIST與BUTTON關聯。 來調用IMAGELIST管理的圖標。

Answer 2

参考代码 private
    { Private declarations }
    procedure   CMMOUSEENTER(var   msg:   TMessage);   message   CM_MOUSEENTER;procedure TForm1.CMMOUSEENTER(var msg: TMessage);
begin
  if   integer(self.BitBtn2)   =   msg.LParam   then
    self.BitBtn2.Glyph.LoadFromFile('F:\常用图标\BMP16\确定16.bmp')
  else
    self.BitBtn2.Glyph.LoadFromFile('F:\常用图标\BMP16\查询16.bmp')
end;

Answer 3

VclSkin界面太土了
用IMAGELIST与BUTTON怎么实现，能否给个简单示列，初级新手，谢谢了

Answer 4

我试试
我看过还有一种用Image来实现的，但是不知道怎么实现鼠标移动变换图片