Delphi Image使用ImageList中的图片

最新推荐文章于 2024-08-16 08:21:50 发布

liang08114

最新推荐文章于 2024-08-16 08:21:50 发布

阅读量7.9k

点赞数 1

分类专栏： delphi

本文链接：https://blog.csdn.net/liang08114/article/details/78413475

版权

delphi 专栏收录该内容

51 篇文章

订阅专栏

var
  bmp: Tbitmap;
begin
  bmp := Tbitmap.Create;
  try
    if Rlt then
    begin
      imagelist1.GetBitmap(1, bmp);
      img1.Picture.Assign(bmp);
    end
    else
    begin            imagelist1.GetBitmap(0, bmp); img1.Picture.Assign(bmp); end; finally bmp.Free; end;