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

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文件图标，选中多个文件，为什么只能得到一个图标。  
   
  初学者。 问题点数：20、回复次数：7Top

1 楼zhlwyy（生活很累，但是因为生活才有意义。）回复于 2004-05-03 15:43:14 得分 10

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

2 楼zhlwyy（生活很累，但是因为生活才有意义。）回复于 2004-05-03 15:54:06 得分 0

ExtractAssociatedIcon这是什么？Top

3 楼zhlwyy（生活很累，但是因为生活才有意义。）回复于 2004-05-03 16:07:41 得分 0

你为什么不直接导入呢？Top

4 楼regft（）回复于 2004-05-03 16:24:45 得分 0

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

5 楼zhlwyy（生活很累，但是因为生活才有意义。）回复于 2004-05-03 16:33:38 得分 10

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

6 楼zhlwyy（生活很累，但是因为生活才有意义。）回复于 2004-05-03 16:56:44 得分 0

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

7 楼cjstar（ミ★木木ミ）回复于 2004-09-24 15:28:56 得分 0

到网上下载免费的小软件Top

相关问题

• 代码
• 文件
• 图标
• imagelist
• iconindex
• opendialog1
• extractassociatedicon
• 方法

• 帖主：regft
• zhlwyy
• zhlwyy

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载