如:
我现在在TImagelist中添加了一组图片,我要根据传入的标识号取得图片的索引,此组图片如何添加????如何获取:
function GetImageIndex(strSign:string):integer;
var i : integer;
begin
   for i:= 0 to ImageList1.count -1 do begin
      ??????????
   end;
end;

解决方案 »

  1.   

    添加图片
    procedure TForm1.Button1Click(Sender: TObject);
    var
      Bitmap : TBitmap;
    begin
      Bitmap := TBitmap.Create;
      try
        Bitmap.LoadFromFile(图片路径);
        ImageList1.Add(Bitmap,Bitmap);
        ImageList1.GetBitmap(0,BitBtn1.Glyph);
      finally
        Bitmap.Free;
      end;
    end;
      

  2.   

    没有标识号啊
    比如说我在一个TListView添加了很多文件名,然后在TImageList里也添加了很多图片,
    每个文件名对应一张图片显示出来,文件名和图片的顺序都是不固定的,如何根据文件
    名来取图片呢?
      

  3.   

    可以和TStringList相结合起来
    不过一开始加的图标的顺序不能随便改动的
    呵呵
      

  4.   

    这样不太可靠吧-----------------------------
    用tstringlist完全可以满足你的要求的