TreeNodes in TList

SteheAufDerLeitung · Beiträge: 104

G'Morgen!!

Ich möchte die selektierten Nodes einer TreeView in eine TList speichern, damit ich sie beim erneuten Aufruf wieder selektieren lasse..

In einer TList werden ja pointer gespeichert, richtig?
Von daher dachte ich dies würde funzen:

markieren

Delphi-Quelltext

1:
2:
3:

for i := 0 to TreeView.Items.Count-1 do 
if Treeview.Items[i].selected then
TList.add(pointer(TreeView.Items[i]));

Jedoch erscheint beim Ausführen:
Exception der Klasse EAccessViolation, Zugriffsverletzung bei Adresse... Lesen von Adresse xyz..

Was mach ich denn falsch?

Euch allen erstmal nen guten Start in den Tag! ;-)

Lecker Kaffee!! :-D

wwwdirk · Beiträge: 38 D6 Prof / D2005 Prof

Hast du ne TList-Instanz erstellt?

Martin1966 · Beiträge: 1068 Win 2000, Win XP Delphi 7, Delphi 2005

Wie wwwdirk schon geschrieben hat: TList ist eine Klasse. Du benötigst aber eine Instanz einer Klasse. So in etwa:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

var
  SelItems: TList;
begin
  SelItems := TList.Create;
  try
    for i := 0 to TreeView.Items.Count-1 do 
      if Treeview.Items[i].selected then
        SelItems.add(TreeView.Items[i]);

    { mach etwas mit SelItems ... }
  finally
    SelItems.Free;
  end;
end;

Lg, Martin

_________________
Ein Nutzer der Ecke ;-)

SteheAufDerLeitung · Beiträge: 104

Ahh!! daran hab ich noch nicht gedacht, werd es bei Gelegenheit mal ausprobieren.. Vielen Dank schon mal!

Yogu · Verfasst: Sa 14.07.07 12:21

Das mit dem Pointer-Zeugs kannst du meines Wissens weglassen.
Ich füge immer so neue Einträge in eine TList hinzu:

markieren

Delphi-Quelltext

1:	List.Add(Klasse);

Beim Zugreifen musst du entweder TKlasse(List[Index]) davorhängen, oder mit Item := List[Index]; Item.Selected ... erst eine Variable setzen.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme