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?

[himitsu]

FindComponent / FindComponent, aber nur für Objekte, welche sich in/auf einem anderem objekt (z.B. einer TForm) befinden ... Owner-Beziehung.


Eine Frage pro Thread, vorallem wenn die Fragen nichts miteinander zu tun haben.
Die Standardsichtbarkeit ist public, aber da es sich hier um einen TPersistent-Nachfahren handelt, ist hier der Standard published, wegen dem {$M+} .

[roboter202]

Danke

Zitat:

Eine Frage pro Thread, vorallem wenn die Fragen nichts miteinander zu tun haben.

Sorry tut mir Leid, ich hielt es nur für etwas Unsinnig für so etwas banales einen 2. Thread aufzumachen

[mjustin]

...