Question

请问大侠，我学的是delphi。在用SpeedButton控件，我想把ICO格式图标转换到SpeedButton上显示 怎么就不成

procedure TForm1.Button1Click(Sender: TObject);
var
temp: TIcon;
i: Integer;
begin
temp := TIcon.Create;
For i := 0 to controlcount-1 do
begin
if Controls[i] is TSpeedButton then
begin
ImageList1.GetIcon(TSpeedButton(Controls[i]).Tag,temp);
TSpeedButton(Controls[i]).Glyph.Canvas.Draw(1,2,temp);
end;
end;
temp.Free;
end;

我的邮箱444733551@qq.com 请热心人帮帮忙，，自学真烦人啊!!
SpeedButton控制面板上只能显示BMP图标.

Answer 1

只能用BMP格式的。

如果楼主想设置桌面图标。请在project - options - application 设置。

Answer 2

好久么用delphi了，好像这个可以用属性面板设置的，不用自己编吧，
设好看看系统自动生成的代码

Answer 3

ImageList1.GetBitmap

TSpeedButton(Controls[i]).Glyph.Assign(temp);