Größe von TBitmap für TImageList anpassen

**Leanahtan**

Ich lade in einem Tool mehrere Bitmaps aus einem Archiv, und möchte diese anschließend als Icons in einer TListView verwenden. Also hab ich eine entsprechende TImageList angelegt, in die die benötigten Bilder eingefügt werden. Das klappt soweit auch, allerdings sind mir die Bilder etwas zu groß. Jetzt suche ich nach einer möglichst einfachen (und performanten) Methode, die Bilder für die ImageListe zu verkleinern.

Bisher läuft das ganze so ab:

markieren

Delphi-Quellcode:

			GetImageByIDStr(Image,TGroundTile(TileSet.GTList[i]).Img0);

j:=SmallGroundTilesImageList.AddMasked(Image,clfuchsia);

Mit GetImageByIDStr wird das Bild aus einem Archiv geladen, und dem TBitmap Image zugewiesen. Nur wie kann ich das TBitmap jetzt verkleinern, bevor ich es an SmallGroundTilesImageList übergebe?

Größe von TBitmap für TImageList anpassen

Größe von TBitmap für TImageList anpassen

Forumregeln