Dyn Array in der Klasse ...

[m0sch3r]

Die Klasse sol eine anzahl von Usern menagern...
dazu wird ein dyn Array verwendet...

Delphi-Quellcode:

Tusers = class(Tobject)
      protected
      users     : array of Tuser;
      public
      constructor Create(Chuwak : Tuser);          
      function Getbighash():Tuser;                 // Findet die Groste Hash
      function Getindex(chuwak : Tuser): integer;  // Bekommt als Argument einen Sockethandle und liefer seinen Index im Usersarray zuruck

jedoch beim erzeugen eines neuen eintrags im array kommt ein Speicherzugrifsfehler...

Delphi-Quellcode:

constructor Tusers.Create(Chuwak : Tuser);
var
   i, n  : integer;
begin
    inherited Create;
    setlength(users, high(users) + 1);
    users[high(users)] := Chuwak;

end; // Create

was ist falsh......!?