FMX Imagelist PNG zufügen

[mmw]

Hallo,
so sollte es funktionieren -

Delphi-Quellcode:

var
  myBitmap:TCustomBitmapitem;
  mysize:Tsize;
  indx:Integer;
begin

myBitmap:=TCustomBitmapitem.Create(nil);

 try
  ImageList1.BitmapItemByName('Image',myBitmap,mysize);
  indx:=mybitmap.Index;

 finally
  myBitmap.Free;
 end; 
end;

Gruß