向虾哥请教,怎么给button或speedbutton加icon型的图标 方法一:将icon转换成bmp文件后加载。方法二:自己写代码装载,主要使用ExtractIcon、DrawIcon这两个函数即可。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用Acdsee将icon转换成bmp即可,不要说你没有Acdsee!! var 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; Delphi6制作报表 将参数改为数组 FR3 动态创建柱状图问题 小弟想学习delphy,有些问题请教。 ?改变状态栏颜色产生的问题!! 超级难题:如何将TWebBrowser 里显示的页面转成图片格式? 超级菜鸟问题!在线等答案,马上给分!!! 很简单VCL控件问题 (50分) 1小时后结帐^^ 弱智问题,Delphi6中如何激活Invokable向导? 缺省菜单项为何双击没有反应?PageControl双击事件如何响应? 打开汉字命名的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;