方法一:将icon转换成bmp文件后加载。
方法二:自己写代码装载,主要使用ExtractIcon、DrawIcon这两个函数即可。
方法二:自己写代码装载,主要使用ExtractIcon、DrawIcon这两个函数即可。
解决方案 »
- 动态生成的控件如何让它处理消息??
- 两个问题:(变频)男声变女声,监视麦克风使用?
- 在Delphi怎么将图片存入SQL Server 2000中
- delphi 怎么一复制代码就卡掉啊
- 怎么把tab从8格改为4格
- 您好,请问怎样才能在private中定义控件和控件的方法?
- 急!将HWND类型的数据转换成STRING,类似INTTOSTR的功能
- 怎样实现这样的循环?
- 如何在QickReport報表中制做網格線???
- 高分寻找DES加密算法的Delphi/Pascal源程序
- 打开汉字命名的VF表的时候报错:Could not find launguage driver.怎么解决?
- 一个比这个再菜的问题都没有了的问题
icon:TIcon;
begin
icon:=TIcon.Create;
icon.LoadFromFile('f:\windows\system\icon.ico');
image1.Height :=icon.Height;
image1.Width :=icon.Width;
image1.Canvas.Draw(0,0,icon);
speedbutton1.Glyph.Assign(image1.picture);
icon.free;
end;