markierten Eintrag in ListBox übertragen

[Andromeda]

ich möchte mit einem Mausklick den markierten Eintrag einer ShellListView in eine ListBox übertragen. Das habe ich jetzt so versucht:

Code: Alles auswählen

 
procedure TFormHaupt.ShellListViewSelectItem(Sender: TObject; Item: TListItem;
  Selected: Boolean);
begin
  TListBox.Items.Add(ShellListView.Selected.Caption);
end;
 

Aber das funktioniert nicht, und die Fehlermeldung verstehe ich nicht.

[m.fuchs]

Da wäre es natürlich hilfreich, wenn du uns die Fehlermeldung mitliefern würdest. Ich vermute mal sie lautet

Code: Alles auswählen

Error: Only class methods, class properties and class variables can be referred with class references

Du verwendest TListBox als Bezeichner. Das ist aber die Klasse, nicht das Objekt.

[Andromeda]

ja genau, das war die Fehlermeldung. Und was mache ich jetzt?

[m.fuchs]

Du wirst ja eine Listbox-Komponente auf deinem Formular haben. Benutze ihren Namen und nicht TListBox.