版权声明:本文为博主原创文章,未经博主允许不得转载。 https://blog.csdn.net/Cubar/article/details/2068531
首先是要做RES文件,刚刚转帖的RES文件制作方法我不敢苟同!因为我用他的方法做出来的RES文件,最后编译成DLL文件后,读取不了图片!用VS查看RES文件,在VS里查看不到图片,全是些二进制代码!但是查看系统的RES文件(在我这里查看的就是程序本身的RES文件,与自己的程序同名),则可以查看到Delphi的经典图标:)。
然后我直接用VS制作RES,用导入方式:在Icon上右键->添加资源->选择Icon,点击导入,选择要导入的ico图标。导入后要注意:图标的ID要用“”来标识,不然不能通过这个ID来LoadIcon。
制作好RES文件后,就可以在Delphi里制作DLL了,引用该RES文件,Ctrl+F9生成DLL。
var
t_Icon : TIcon;
hDll : Hmodule;
i_imageIndex : integer;
begin
ImageList1 . Clear();
hDll := LoadLibrary( ' dll/img/icon.dll ' );
t_Icon := TIcon . Create;
t_Icon . Handle := LoadIcon(hDll , ' 0 ' );
i_imageIndex := ImageList1 . AddIcon(t_Icon);
dxNavI_Display . LargeImageIndex := i_imageIndex;
end;
t_Icon : TIcon;
hDll : Hmodule;
i_imageIndex : integer;
begin
ImageList1 . Clear();
hDll := LoadLibrary( ' dll/img/icon.dll ' );
t_Icon := TIcon . Create;
t_Icon . Handle := LoadIcon(hDll , ' 0 ' );
i_imageIndex := ImageList1 . AddIcon(t_Icon);
dxNavI_Display . LargeImageIndex := i_imageIndex;
end;