Einzelnen Beitrag anzeigen

Benutzerbild von Wusel
Wusel

Registriert seit: 27. Sep 2003
Ort: Riesa
54 Beiträge
 
Delphi 6 Personal
 
#1

TList ... eine andere Welt

  Alt 13. Jan 2004, 22:44
hi an alle euch da
Ich habe ein paar kleine Problemchen mit der TList. Hier erstmal der Code:
Delphi-Quellcode:
type
  THanoiList = class
  private
    wClusterSize : Word;
    oCluster : TList;
    procedure AddCluster;
  public
    constructor Create(awClusterSize : Word);
    ...
  end;

implementation

constructor THanoiList.Create(awClusterSize : Word);
begin
  wClusterSize := awClusterSize; // 1. EAccessViolent
  AddCluster;
end;

procedure THanoiList.AddCluster;
var
  pNew : Pointer;
begin
  oCluster := TList.Create; // 2. EAccessViolent
  GetMem(pNew, wClusterSize);
  oCluster.Add(pNew);
end;

end.
Das 1. EAccessViolent hat zwar nichts direkt mit der TList zu tun, aber ich weiß trotzdem nicht warum dort eine Exception kommt.
Beim 2. EAccessViolent liegt es irgendwie am oCluster, weil wenn ich oCluster dorekt in AddCluster deklariere, funktioniert es.
Ich hoffe ihr könnt mir helfen.

Wusel
  Mit Zitat antworten Zitat