imagelist加入图标问题？？/在线！

[regft]

var
IconIndex : word;
b:ticon;

begin
IconIndex := 0;

if OpenDialog1.Execute then

b.Handle :=ExtractAssociatedIcon(hInstance,PChar(OpenDialog1.FileName),IconIndex);
ImageList1.AddIcon(b);

end;

用这个方法读取exe,DLL文件图标，选中多个文件，为什么只能得到一个图标。

初学者。

[zhlwyy]

你一次读取的是一副当然是一个了

• 打赏
• 举报

回复 赞

[zhlwyy]

ExtractAssociatedIcon这是什么？

• 打赏
• 举报

回复 赞

[zhlwyy]

你为什么不直接导入呢？

• 打赏
• 举报

回复 赞

[regft]

提取图标，有没有其他简单方法？？？

• 打赏
• 举报

回复 赞

[zhlwyy]

你第二个代码你吧mutliselect属性设置为TRUE就可以！
简单方法就是直接双击imagelist 从文件中提取图片

• 打赏
• 举报

回复 赞

[zhlwyy]

代码报错说是未定义的变量你从哪里找来的代码

• 打赏
• 举报

回复 赞

[cjstar]

到网上下载免费的小软件

• 打赏
• 举报

回复 赞