9 Label.Caption von 9 Frames umbenennen

[Kralle]

Moin,

ich habe auf einem Form 9 frames plaziert.
Alles Frames haben je ein Label.
Dieses Label möchte ich jetzt mittels einer Schleife
Umbenennen - geht so was?

Wenn ja, wie?

Das hier klappt nicht:

Delphi-Quellcode:

for i := 1 to 10 do
    begin
      Frame[i].Label11.caption:='Test'; //geht nicht
    end;

Aber wahrscheinlich liegt die Lösung wiedermal außerhalb meines Wissensbereiches
und dessen was mir die Suche und Google so anbieten.

MfG
Heiko

[turboPASCAL]

Heissen alle diese Labels Label11 ?

[jaenicke]

Gleich heißen müssen sie ja, auch wenn der Name sehr ungünstig ist.

Hast du denn die Frames auch im Array Frame wie der Quelltext impliziert? Wenn nein, dann leg die Frames entweder da hinein. Sonst sollte FindComponent gehen, was aber sehr langsam ist.

[himitsu]

kann man bei sowas überhaupt über den Namen gehn? (hätt da eher NEIN gedacht)

eventuell kannst du ja über Frame[i].Controls gehen

und 1 to 10 sind für mich 10 und nicht 9 Frames

[Kralle]

Moin,

Zitat von turboPASCAL:

Heissen alle diese Labels Label11 ?

Ja, das es ja 9x das gleiche Frame ist.
Sonst wäre das kein Problem.

MfG
Heiko

[jaenicke]

Ja, ich habe ja geschrieben wie es geht...

Delphi-Quellcode:

var
  i: Integer;
begin
  for i := 0 to Pred(ComponentCount) do
    if Components[i] is TFrameX then
      TFrameX(Components[i]).LabelX.Caption := 'aa';
// oder:
  (FindComponent('FrameXY') as TFrameX).LabelY.Caption := 'aa';

[Kralle]

Hallo Jaenicke,

Zitat von jaenicke:

Ja, ich habe ja geschrieben wie es geht...[delphi]

Tschuldige, das habe ich falsch verstanden gehabt.
Danke, jetzt klappt es.

MfG
Heiko