mit ObjektGruppe arbeiten

[roboter202]

Hallo,

ich hab das Problem das wenn viele Proceduren von viele (VCL)-Objekte ausgeführt werden.
Das bedeutet ich habe Code der Sich Wiederholt. Eine For Schleife und ein Array wären hier wohl die richte Lösung. Aber der müsste doch auch erst einmal Initialisiert werden. Kann man nicht den Namen der Objektreferenz aus Strings ähnlich wie in PHP zusammenbauen?

Oder gibt es da noch andere Lösungen.

Delphi-Quellcode:

  Field00.Picture.Bitmap := FTexture[0];
  Field01.Picture.Bitmap := FTexture[0];
  Field02.Picture.Bitmap := FTexture[0];
  Field10.Picture.Bitmap := FTexture[0];
  Field11.Picture.Bitmap := FTexture[0];
  Field12.Picture.Bitmap := FTexture[0];
  Field20.Picture.Bitmap := FTexture[0];
  Field21.Picture.Bitmap := FTexture[0];
  Field22.Picture.Bitmap := FTexture[0];

Und dann hätte ich da noch eine Frage

Delphi-Quellcode:

TForm1 = class(TForm)
    Button1: TButton;
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

Ist so ein Button jetzt eigentlich Public, Private, Protected, oder was?