var
Icon:hicon;
begin
Icon:=GetIconFromFile('c:\777.ico', 0); 图标大小为128*128
DrawIcon(image2.Canvas.Handle, 10, 10, Icon);
end;显示出来为什么不是128*128呢?如何设置才能正确显示该图标呢?
Icon:hicon;
begin
Icon:=GetIconFromFile('c:\777.ico', 0); 图标大小为128*128
DrawIcon(image2.Canvas.Handle, 10, 10, Icon);
end;显示出来为什么不是128*128呢?如何设置才能正确显示该图标呢?
解决方案 »
- 执行查询出现符号问题
- ADODataSet1.Recordset赋给一个OleVariant变量后转成Stream出错,大家帮看看
- 公司要写客户关系关系系统,哪个能提供点业务需求方面的资料
- 如何更改DBGRID的TITLE的高度?
- 为什么在Delphi里的所有控件的Caption属性不能输入特殊符号呢???
- 一个编译错误.................
- 关于对dbgrid表的操作
- 请大虾一定帮忙呀,小的我有礼了!
- Delphi如何得到网页中的链接 , 又如何得到网页中的 任意一句<a></>之间的非链接文字?
- Delphi7写的ocx控件无法由powerbuilder9调用
- 请问如何控制MDI子窗体的位置!!求助!
- 使用TListView控件时发生屏蔽键盘的怪现象,请高手指教。
http://www.netgocn.com/UseIcon.htm
var Icon:TIcon;
begin
ICon:=TIcon.Create;
Icon.LoadFromFile(路径);
Image1.Canvas.Draw(10,10,Icon);
Icon.Free;
end;