我的应用程序使用的TImage及TImageList

Question

我的应用程序使用的TImage及TImageList组件，基中用了大量的bitmap文件作为图标及底色，但用installShell打包时，如果没有选中这些bitmap文件，应用程序安装后运行报错：缺小这些文件；但在打包时如果选取这些文件，安装解压时这些bitmap文件也被解压出来。我看别人的应用程序目录都没有图标文件的，如何做到？？？小弟在此先谢了

Answer 1

Installshield 没有选中这个包

Answer 2

复：zxthello(万有斥力) 
      TImage中如何引入资源文件中的图标？？

Answer 3

做的时候把图标和bmp文件分别放在不不同的ImageList里面。然后用的时候这样来操作：procedure TForm1.Button1Click(Sender: TObject);
begin
  ImageList1.GetBitmap(0,Image1.Picture.Bitmap);
end;procedure TForm1.Button2Click(Sender: TObject);
begin
  ImageList2.GetIcon(1,Image1.Picture.Icon);
end;

Answer 4

可以使用RC资源啊,载入RC中的图片:
......
{$R *.dfm}
{$R MyPicture.res}//编译后的资源文件包含进去;
......
var
Bp:TBitmap;
begin
Bp :=TBitmap.Create ;
Bp.LoadFromResourceName(Hinstance,'BMP001');//载入对应的图片;
Image1.Picture.Bitmap :=Bp;//在Image1中显示图片;
Bp.Free;//释放系统占用;
...
end;

Answer 5

如果是ICON,则要将:
Bp:TIcon;
而且,Image1载入的类型也要修改下就行了;

Answer 6

我要将多个bitmap引入imagelist，该如何办？