Ausdruck vereinfachen

[Markus K.]

Hallo marc.beeh,
so könnte man es vereinfachen.

Delphi-Quellcode:

var Lauf:Integer;
begin
     for Lauf:=1 to 15 do
     begin
          namen[Lauf]:=TLabel(FindComponent('Label'+IntToStr(Lauf))).Caption;
     end;
end;

Hoffe das es funzt.

Tschüß Markus