Wie kann ich einer ShellListView Komponente neue Columns hinzufügen? Bei dieser Komponente ist diese Eigenschaft nämlich nicht im "Objekt Inspektor". Deshalb wollte ich zur Laufzeit Colums hinzufügen.
..und zwar so:
Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:
| procedure Form1.Button1Click(Sender: TObject); var NewColumn: TListColumn; begin with ShellListView1 do begin; NewColumn := Columns.add; NewColumn.Caption := 'Größe'; NewColumn.Width:=100; end; end; |
Doch bei dem Buttondruck wurde eine Exeption ausgelößt.
[...] Exeption with message 'Delphi: missing call to LoadColumnDetails'
Wie kann ich nun fehlerfrei Columns hinzufügen???