VirtualStringTree - zuweisen von RootNodeCount

[günni0]

Ok hier etwas Pseudocode, ohne Funktionalität, aber hoffentlich verständlich

Delphi-Quellcode:

procedure ErstelleInstanz(SetRootCount: Boolean);
begin
 _UserData := TUserData.Create;
 _UserData.Index := _UserDataClasses.Count;

 _UserData.A := 1;
 _UserData.B := 2;
 ...
 ...

 if SetrootCount then
  _VST.RootNodeCount := _UserDataClasses.Count;
end;

Delphi-Quellcode:

procedure SchnickSchnack_A;
begin
 von 0 bis 100
  begin
   ErstelleInstanz(True);
  end;
end;

// ODER

procedure SchnickSchnack_B;
begin
 von 0 bis 100
  begin
   ErstelleInstanz(False);
  end;

 _VST.RootNodeCount := _UserDataClasses.Count;
end;

Ich hoffe du verstehst was ich meine