Zitat von
agm65:
hilfe ?
Wenn das keine Hilfe ist:
Delphi-Quellcode:
var
bm: Graphics.TBitmap; // nicht verwechseln mit Windows.TBitmap
index: integer;
SmallImages: TImageList;
begin
bm := Graphics.TBitmap.Create;
bm.LoadFromFile(fileName);
// ... small heißt 16x16
SmallImages.InsertMasked(index, bm, bm.TransparentColor);
bm.Free;
// ... nur ein Beispiel
ListView.Columns[index].ImageIndex := index;
end;
marabu