per Script erstellte Images in eine Array eingliedern

[Mortex]

Ok, aber es hat auch mit [1..20] in anderen Projekten funktioniert...

[Glados]

Dass das funktioniert ist klar. Aber es ist falsch denn ein Array hat eine 0-basierte Zählung. Ein Array fängt bei 0 an, nicht bei 1.

Charakter[0] => erster Eintrag
Charakter[1] => zweiter Eintrag
Charakter[2] => dritter Eintrag
usw

[mkinzler]

Zitat von Glados:

Dass das funktioniert ist klar. Aber es ist falsch denn ein Array hat eine 0-basierte Zählung. Ein Array fängt bei 0 an, nicht bei 1.

Ein dynamischer Array ja; ein statischer kann jede beliebige Grenzen haben.

Zitat:

Für dein Vorhaben brauchst du gar kein Array. Du kannst doch direkt auf "Spieler" und "GegnerX" zugreifen.

Wenn es auch Ziel ist, möglichst viel Performance zu verbraten.

[Glados]

Zitat:

ein statischer kann jede beliebige Grenzen haben.

Verstehe ich nicht. Ich habe doch gar nicht von einer Grenze geschrieben sondern nur davon, dass ein Array (Zählung) bei 0 anfängt, nicht bei 1.

[mkinzler]

Charakter: array [1..20] of TImage: Untere Grenze: 1 Obere Grenze: 20

Charakter: array [0..19] of TImage: Untere Grenze: 0 Obere Grenze: 19

Die Grenzen sind frei wählbar. Der resultierende Maschinencode ist sowieso identisch.

[Redeemer]

Was sollen denn diese ganzen Zuweisungen am Ende des "Scripts"? Derzeit funktionieren sie nicht, weil du den Array-Einträgen einfach irgendwelche Bezeichner zuweist, die gar nicht existieren.

[Mortex]

Wie ich es schon erklärt habe: Die Images werden erstellt und bekommen einen Namen. Und mit diesem Namen Sollen sie in der Array zugeteilt werden. Wie mache ich das, dass die Namen gefunden werden...sie sind da...aber nicht ganz. Und das verstehe ich als Anfänger nicht.

[Glados]

Für dein Vorhaben brauchst du gar kein Array. Du kannst doch direkt auf "Spieler" und "GegnerX" zugreifen.

Delphi-Quellcode:

(FindComponent('Spieler') as TImage). .....
(FindComponent('Gegner2') as TImage). .....

Oder halt so. Guck dir den Code genau an und lerne die Unterschiede zu deinem kennen!

Delphi-Quellcode:

var
 bit: TImage;
 i, AnzahlCharakter: Integer;
 Charakter: array [0 .. 19] of TImage;
begin
 AnzahlCharakter := Length(Charakter);

 bit := TImage.Create(GroupBoxSpielfeld);
 bit.Parent := GroupBoxSpielfeld;
 bit.Name := 'Spieler';
 bit.left := 0;
 bit.top := 10;
 bit.width := 50;
 bit.height := 50;
 bit.picture.LoadFromFile('Daten/Texturen/Leer.bmp');

 Charakter[0] := bit;

 For i := 1 to AnzahlCharakter - 1 do
  begin
   bit := TImage.Create(GroupBoxSpielfeld);
   bit.Parent := GroupBoxSpielfeld;
   bit.Name := 'Gegner' + InttoStr(i + 1);
   bit.left := 50 + i * 50;
   bit.top := 0;
   bit.width := 50;
   bit.height := 50;
   bit.picture.LoadFromFile('Daten/Texturen/Leer.bmp');

   Charakter[i] := bit;
  end;
end;

Kleiner Tipp: Delphi verzeiht viel. Aber lerne schon jetzt, dass man Groß- und Kleinschreibung respektieren sollte.

[Mortex]

Ok. Danke erstmal

[Redeemer]

Ach so der Name. Den spricht man aber so an:
(Self.FindComponent('Name') as TImage)