Natürlich ist Bitmap ungültig - wollte nur sehen, ob du das Zeug auch liest, was ich hier schreibe:
Delphi-Quellcode:
procedure TForm1.DemoButtonClick(Sender: TObject);
var
icon: TIcon;
index: integer;
fileName: string;
begin
// ... index, filename initialisieren
icon := TIcon.Create;
icon.LoadFromFile(fileName);
SmallImages.InsertIcon(index, icon);
icon.Free;
ListView.Column[index].ImageIndex := index;
end;
marabu