SetLength / Getmem / AllocMem out of memory Problem

[himitsu]

verkettete Liste

das ganze nochmal kurz als Array ... zum Vergleich

Delphi-Quellcode:

TData = record
  name: String;
  typ:  Integer;
  ...
end;

TAsArray = Array of TData;

eine einfach verkettete Liste

Delphi-Quellcode:

PListe = ^TListe;
TListe = record
  next: PListe;

  name: String;
  typ:  Integer;
end;

var myList: PListe;

bei dieser verketten Liste ist es so, daß nur der Zeiger auf das erste Element in der Liste bekannt ist
und jede Element kennt dann seinen Nachfolger ... du kannst dich also vom ersten element aus zu allen anderen Elementen durchhangeln


und das wäre dann eine doppelt verkettete Liste

Delphi-Quellcode:

PListe = ^TListe;
TListe = record
  prev: PListe;
  next: PListe;

  name: String;
  typ:  Integer;
end;

var myList_first: PListe;
    myList_last:  PListe;

hier kennt dann jedes Element auch noch seinen Vorgänger ... das macht es dann einfacher diese Liste zu "editieren" (zu verändern, wie z.B. Einträge einzufügen oder zu entfernen)


Der Vorteil gegenüber dem Array ist dann einfach, daß diese Daten nicht stur alle in einer Reihe angeordnet sein müssen ... sie können sich also frei im verfügbaren Speicher verteilen und brauchen keinen gemeinsamen Speicherblock.


Was jetzt aber für dich eine "gute" Lösung wäre, das kommt darauf an, wie der Zugriff auf deine Daten aussieht, wie/ob diese auch mal verändert werden und vorallem welche und wieviele Daten du in jedem Element drinnen hast.

z.B. bei einem Array of String wäre es Schwachsinn dieses als verkettete Liste verwalten zu wollen, da so der Speicherverbrauch und auch der Verwaltungsaufwand wesentlich höher wäre, als beim Array.