Daten-Rekord zu TreeView hinzufügen - Problem/AV

[Jim Carrey]

Ok jetzt bin ich total raus, da ich definitiv nichts mehr verstehe. Genau deswegen hasse ich dieses Control, da die Handhabung völlig unnütz kompliziert ist.

Mein Ziel war es eigentlich Nodes erstellen zu können (ich mache das mit einer TObjectList), die im VST anzeigen zu lassen und dann abspeichern zu können, indem ich durch jedes Node gehe.

Ich glaube ich gebe mich geschlagen. Denn wozu etwas verwenden, wenn ich kein Wort davon verstehe.

So mache ich es übrigens

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
 aVSTData: TVSTData;
 i: Integer;
begin
 aVSTDataClasses := TVSTDataClasses.Create;

 for i := 0 to 1 do
  begin
   aVSTData := TVSTData.Create;
   aVSTData.sTitle := 'Title ' + IntToStr(i);
   aVSTData.sInformation := IntToStr(i) + ' #2';
   aVSTData.sInformation2 := IntToStr(i) + ' #3';

   aVSTDataClasses.Add(aVSTData);
  end;

 VirtualStringTree1.RootNodeCount := aVSTDataClasses.Count;
end;