template verkettete liste

[JnZn558]

Zitat von ghost007:

Garbage Collection

danke fuer deine tips, himitsu und Khabarakh haben beide wohl recht, bei delphi win32 sehe ich auch nicht ein, dass da kein GC gaebe. schliesslich kein DotNet

im moment sieht mein code folgendes aus

Delphi-Quellcode:

PList = ^vList;
  vList = record
    nCount    : Cardinal;  // number of datas
    pItem    : Pointer;   // data pointer
    pNextItem : PList;     // next item
    pLastItem : PList;     // previous item
  end;

  vArray = class
    m_list : vList;

  public
    constructor Create(pValue: Pointer);
    destructor Destroy; override;
  end;

  constructor ZArray.Create(pValue: Pointer);
  var
    p : Pointer;
  begin
    if Assigned(pValue) then
    begin
      with Self do
      begin
        m_list.nCount    := 1;
        New(m_list.pItem);
        m_list.pItem^     := pValue^; // hier soll der fehler sein
        m_list.pNextItem := nil;
        m_list.pLastItem := nil;
      end
    end;
  end;

folgende fehler spuckt der aus

Zitat:

E2015 Operator not applicable to this operand type

oh Sorry, mir war ein tippfehler unterlaufen.