Delphi-PRAXiS
Seite 2 von 3     12 3      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   Delphi eigene Klasse als array (https://www.delphipraxis.net/152220-eigene-klasse-als-array.html)

ichhabeeinproblem 15. Jun 2010 16:31

AW: eigene Klasse als array
 
Code:
//Initialisierung des Arrays ganz zu beginn:
SetLength(MeineKlassen,0);

//Initialisierung eines neuen Array-Elementes:
SetLength(MeineKlassen,Length(MeineKlassen)+1); //Array um ein Feld erweitern
Meineklassen[High(MeineKlassen)]:=TMeineKlasse.create; //Instanz erzeugen
kommt das alles in den TForm1.FormCreate Teil?

DenSchub 15. Jun 2010 16:32

AW: eigene Klasse als array
 
Oder in jeder anderen procedure, ja ;-)

implementation 15. Jun 2010 16:33

AW: eigene Klasse als array
 
:wall:
Denk doch mal nach...
Der erste Teil kann in OnCreate, initialization oder was auch immer.
Der zweite Teil kommt dann dahin, wo du eine Einheit hinzufügen willst.

ichhabeeinproblem 15. Jun 2010 16:44

AW: eigene Klasse als array
 
jaja, ist jetzt so halbwegs klar, nur eine Fehlermeldung kommt: Inkompatible Typen: 'String' und 'Einheitenlisten'
dass kommt bei der zeile: SetLength(Einheitenliste1,0);
ich hab eigentlich den code aus dem dritten post nachgebaut mit meinen Bezeichnungen.

scrat1979 15. Jun 2010 16:51

AW: eigene Klasse als array
 
Warum statt einem Array nicht einfach eine ObjectList nehmen?!? Die ist doch genau für so einen Zweck gemacht (oder gabs die bei D2 nicht? Bin erst bei D7+ eingestiegen :) )

SCRaT

ichhabeeinproblem 15. Jun 2010 16:53

AW: eigene Klasse als array
 
was weiß ich obs die gibt... ich hab doch keine ahnung, aber ich such mal danach^^

scrat1979 15. Jun 2010 16:56

AW: eigene Klasse als array
 
Delphi-Quellcode:
  MeineObjectList : TObjectList;

  [...]

  MeineObjectList := TObjectList.Create;
  MeineObjectList.Add(MeineKlasse.Create);

  { Hier kann man zugreifen }
  TMeineKlasse(MeineObjectList[0]).Feldname := 'sdfsdf';

  { und zum schluß alles freigeben }
  for i := 0 to MeineObjectList.Count-1 do
    TMeineKlasse(MeineObjectList[i]).Free;

 MeineObjectList.Free;
... zumindest so ähnlich :)

ichhabeeinproblem 15. Jun 2010 17:07

AW: eigene Klasse als array
 
Weiß jemand obs das in Delphi 3 gibt? Ich habs gerade ausprobiert und da kam: Undefinierter Bezeichner: TObjectList . Heißt das die Idee mit Objectlist kann ich vergessen oder mir nen neueres Delphi besorgen?

DenSchub 15. Jun 2010 17:09

AW: eigene Klasse als array
 
Bei Google suchenTObjectList delphi3 ERSTES Ergebnis:
Zitat:

for example because you have Delphi 3 or 4, that don't know TObjectList

implementation 15. Jun 2010 17:50

AW: eigene Klasse als array
 
Zitat:

Zitat von ichhabeeinproblem (Beitrag 1029093)
Weiß jemand obs das in Delphi 3 gibt? Ich habs gerade ausprobiert und da kam: Undefinierter Bezeichner: TObjectList . Heißt das die Idee mit Objectlist kann ich vergessen oder mir nen neueres Delphi besorgen?

hmmm, du könntest dir TObjectList auch selber implementieren....:gruebel:


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:06 Uhr.
Seite 2 von 3     12 3      

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-2025 by Thomas Breitkreuz