00 Stimmen

Delphi/Lazarus: Mehrere Objekte in For-Schleife erstellen

Frage von Gast | 25.04.2015 um 20:52

Ich benötige in meinem Programm eine große Anzahl von Objekten, die ich aktuell mit einzelnen Variablen folgendermaßen erstelle:

Tile0 := THexagone.Create;
Tile1 := THexagone.Create;
Tile2 := THexagone.Create;
Tile3 := THexagone.Create;
Tile4 := THexagone.Create;
Tile5 := THexagone.Create;
Tile6 := THexagone.Create;
Tile7 := THexagone.Create; 

Jede Variable einzeln zu schreiben ist allerdings recht umständlich. Ist es möglich dieselbe Sache mit einer For-Schleife zu lösen?

for i:=1 to 7 do
  Tile(i) := THexagone.Create; 

Das ist mein bisheriger Versuch, aber leider funktioniert es so nicht. Hat jemand eine Idee?

AntwortenPositivNegativ
0Beste Antwort0 Stimmen

Ja, es ist möglich mehrere Objekte mit einer Schleife zu durchlaufen.

Allerdings solltest du statt einzelnen Variablen einen Array benutzen, damit kannst du die Objekte viel besser verwalten. Schau dir das folgende Beispiel an:

var
  Tiles: array of THexagone;
  i: integer;
begin
  SetLength(Tiles, 7);

  for i:= 0 to 7 do begin
    Tiles[i] := THexagone.Create;
  end;
end;

Anstatt die Variablen Tile0 bis Tile7 zu verwenden, deklarieren wir einen Array mit dem Objekt, das du erstellen möchtest. Anschließend setzten wir die Länge auf 7 und durchlaufen den Array um die Hexagone Objekte zu erstellen.
25.04.2015 um 23:16

AntwortenPositiv Negativ
Antworten

Ähnliche Themen

Wichtiger Hinweis

Bitte beachten Sie: Die Beiträge auf askingbox.de sind Beiträge von Nutzern und sollen keine professionelle Beratung ersetzen. Sie werden nicht von Unabhängigen geprüft und spiegeln nicht zwingend die Meinung von askingbox.de wieder. Mehr erfahren.

Jetzt mitmachen

Stellen Sie Ihre eigene Frage oder schreiben Sie Ihren eigenen Artikel auf askingbox.de. So gehts.