Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Dyn Array in der Klasse ... (https://www.delphipraxis.net/26664-dyn-array-der-klasse.html)

Jelly 27. Jul 2004 13:43

Re: Dyn Array in der Klasse ...
 
Hallo,

was ist den TUser... Falls ebenfalls eine Klasse, musst du jedes einzelne Element noch instanzieren.

Gruß,
Tom

Luckie 27. Jul 2004 13:49

Re: Dyn Array in der Klasse ...
 
Hat er doch geschrieben. TUser ist ein Record.

Was heißt "Leider ohne Erfolg"? Ein konkrete Fehlermeldung wäre etwas hilfreicher. Btw. funktioniert meine Demo einwandfrei. :roll:

Jelly 27. Jul 2004 13:54

Re: Dyn Array in der Klasse ...
 
Zitat:

Zitat von Luckie
Hat er doch geschrieben. TUser ist ein Record.

Der Post vor mir war wohl zeitgleich :?

Tom

Luckie 27. Jul 2004 13:57

Re: Dyn Array in der Klasse ...
 
Liste der Anhänge anzeigen (Anzahl: 1)
OK, da es wohl einige Probleme gibt, hier das gesamte Projekt.

Union 28. Jul 2004 23:42

Re: Dyn Array in der Klasse ...
 
Hier ein Beispiel wie's funktioniert, allerdings mit einer Klasse zur Verwaltung von SAP-IDocs:

Delphi-Quellcode:
procedure TIdocRecord.Add(FieldDef: tIDocField);
begin
   if high(FFields) = -1 then
      SetLength(FFields, 1)
   else
      SetLength(FFields,high(FFields)+2);

   SetFields(High(FFields),FieldDef);
end;
Das Array heisst hier anstelle von Users FFields und der Datentyp ist TIdocField, bei Dir wäre das Tuser.

scp 29. Jul 2004 00:19

Re: Dyn Array in der Klasse ...
 
Ich glaube hier liegt das Problem:

Delphi-Quellcode:
Tusers = class(Tobject)
      protected
      users    : array of Tuser;
Delphi-Quellcode:
users.Adduser(temp);
Du hast anscheinend eine globale Variable vom Typ Tusers die "users" heisst, die array heisst aber auch "users".
Benenne die Array am besten mal in "FUsers" um, damit Konflikte vermieden werden.


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:42 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz