template verkettete liste

[Khabarakh]

Du musst himi wahrscheinlich nicht die Funktionsweise eines GCs erklären. Eher deine Idee, dass es sowas unter Delphi.Win32 gäbe .

[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.

[daywalker9]

Wo den?

Also in welcher Zeile?

[DeddyH]

Ich steig da nicht mehr durch: PList, ZList, vList, m_list, was ist was? Mir scheint, da ist die Zuordnung durcheinander geraten.

[Khabarakh]

Zitat von DeddyH:

Ich steig da nicht mehr durch: PList, ZList, vList, m_list, was ist was?

dito, aber es muss auf jeden Fall
m_list.pItem := pValue; heißen.
Und ein with self bewirkt nicht wirklich viel .

[JnZn558]

ein tippfehler war mir unterlaufen, ich hab es nun geaendert.

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;

Zitat von Khabarakh:

Zitat von DeddyH:

Ich steig da nicht mehr durch: PList, ZList, vList, m_list, was ist was?

dito, aber es muss auf jeden Fall
m_list.pItem := pValue; heißen.
Und ein with self bewirkt nicht wirklich viel .

ich moechte den wert kopieren, nicht der adresse von pValue, denn wenn die pValue im fall auf NIL gesetzt wird, dann schmiert pItem auch ab, is doch so nicht?

[Khabarakh]

Zitat von JnZn558:

ein tippfehler war mir unterlaufen, ich hab es nun geaendert.

Für Records und Klassen aber bitte einen T-Präfix benutzen. Und für den Rest keine ungarische Notation .

Zitat:

ich moechte den wert kopieren, nicht der adresse von pValue

Damit kopierst du die Adresse in pValue. Den referenzierten Wert kannst du schlecht kopieren, wenn du nicht einmal seine Größe kennst.

Zitat:

denn wenn die pValue im fall auf NIL gesetzt wird, dann schmiert pItem auch ab, is doch so nicht?

Nach dem Aufruf? Nein, es ist eben der Wert von (= die Adresse in) pValue.

[JnZn558]

Zitat von Khabarakh:

Zitat von JnZn558:

ein tippfehler war mir unterlaufen, ich hab es nun geaendert.

Für Records und Klassen aber bitte einen T-Präfix benutzen. Und für den Rest keine ungarische Notation .

Zitat:

ich moechte den wert kopieren, nicht der adresse von pValue

Damit kopierst du die Adresse in pValue. Den referenzierten Wert kannst du schlecht kopieren, wenn du nicht einmal seine Größe kennst.

Zitat:

denn wenn die pValue im fall auf NIL gesetzt wird, dann schmiert pItem auch ab, is doch so nicht?

Nach dem Aufruf? Nein, es ist eben der Wert von (= die Adresse in) pValue.

danke sehr fuer deine hilfe, da der wert nicht schlecht kopieren laesst, is dann nix mehr zu machen. hehe
ich muss damit wohl leben, was delphi zu bieten hat