Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  AW: Fehler beim Programm beenden

    Delphi
    by bcvs, 11. Nov 2015
  Vergiss diesen Record!!
  Das vermischt Datenhaltung mit visueller Darstellung, da deine Daten im Control gespeichert werden. Nicht gut.
  
  Ich würde mir eine Datenstruktur überlegen, die zuerst einmal komplett außerhab dem VST stattfindet.
  
  z.B.
  TKunde = class
  Name : String;
  Nr : String;
  Objects: TObjectList;
• Forum: Programmieren allgemein

  AW: Fehler beim Programm beenden

    Delphi
    by bcvs, 30. Okt 2015
  Ich mache es mal anhand von deinem Beispiel. Ist doch ganz einfach:
  
  Du definiert die eine ObjectList. Da ich Delphi 2007 habe, nehme ich zwangsläufig die einfache TOjectList aus der Unit Contnrs;
  
  type
  TForm1 = class(TForm)
  vstKunden: TVirtualStringTree;
  procedure FormCreate(Sender: TObject);
  procedure FormDestroy(Sender: TObject);
  private
• Forum: Programmieren allgemein

  AW: Fehler beim Programm beenden

    Delphi
    by bcvs, 28. Okt 2015
  Zwei Sachen sind mir aufgefallen:
  
  1.
  vstKunden.NodeDataSize := SizeOf(TRKundenDaten); muss vor dem ersten AddChild stehen, sonst weiß der VST ja nicht, wie groß der Node sein soll und nachfolgende Speicheroperationen laufen ins (n)irgendwo.
  
  2.
  Wie schon gesagt, solltest du die Objekte in einer separaten Liste speichern und diese selbst wieder freigeben. Dann ist die Zuständigkeit sauber...
• Forum: Programmieren allgemein

  AW: Fehler beim Programm beenden

    Delphi
    by bcvs, 23. Okt 2015
  Ergänzung:
  
  Das OnFreeNode des VST brauchst du dann nicht mehr, da du die Freigabe selbst machst.
  
  Ist doch auch irgendwie logischer: Du erzeugst die Objekte, übergibst sie dem VST zur Anzeige, und zerstörst sie selbst wieder.