SpeedButton图标问题(30分)

  • 主题发起人 主题发起人 hrp123
  • 开始时间 开始时间
H

hrp123

Unregistered / Unconfirmed
GUEST, unregistred user!
根据菜单我动态建立TSpeedButton,并设置Action。这样的话,SpeedButton的图标也就是来源于对应的Action的图标。可是图标太小,怎么样才能使SpeedButton的图标与之相适应。我实在没办法了! 恳切请教用什么方法简单易行?
附注:1:ActionList中的图标用的是16*16在SpeedButton中显的太小了。

 
你可以在动态创建时对所产生的TSpeedButton规定其大小,你首先在设计程序时把图标大小设为统一的,然后在产生TSpeedButton时,将设置大小。
 
我不是很清楚,不过顶一下,
 
SetLength(Spb,nCount);
For nTemp := 0 to Menu.Count - 1 do
Begin
If Menu.Items[nTemp].Caption='-' Then Continue;
Spb[n] := TSpeedButton.Create(pnlMain);
Spb[n].Parent := pnlMain;
Spb[n].Action := Menu.Items[nTemp].Action;
Spb[n].Flat := True;
Spb[n].Layout := blGlyphTop;
Spb[n].CurSor := crHandPoint;
Inc(n);
End;
//这样建立的怎么释放?
 
老是有重影!
 
TO: :独星之闪
然后在产生TSpeedButton时,将设置大小。 //请问怎么样设置大小呀?设置Actin后,TSpeedButton中图像的大小就是Action中对应图像的大小。TSpeedButton没有调图像大小的属性或过程呀?
请明显,不甚感激!
 
图标多大显示就是多大,最多用两套图标,菜单一套,SP一套
 
后退
顶部