[DelphiX] - Zur Laufzeit in ImageList einfügen

[Airblader]

War auch schon eine meiner Ideen

Problem:
- Ich kann keinen Namen geben
- Wie lade ich dann das Image?

Die Add()-Funktion hat übrigens keine Parameter.

air

Edit: Nun hab ichs hinbekommen:

Delphi-Quellcode:

var
  NewBM: TPictureCollectionItem;

...

NewBM := TPictureCollectionItem.Create(Form1.DXImageList1.Items);
//NewBM.Picture.Create;
//NewBM.Picture.Bitmap.Create;
NewBM.Picture.Bitmap.LoadFromFile(FN);
Form1.DXImageList1.Items.Find('Szene').Assign(NewBM);

NewBM.Free;

Mal schauen, obs auch ohne Creates geht.
Edit: Geht auch ohne.
Edit2: Und natürlich wieder freigeben