wenn ich das so mache:
Delphi-Quellcode:
type
TForm1 = class(TForm)
...
private
EditArray: array[0..30] of TEdit;
end;
...
procedure TForm1.FormCreate(...);
begin
FEditArray[0] := Edit0;
FEditArray[1] := Edit1;
FEditArray[2] := Edit2;
...
FEditArray[30] := Edit30;
end;
...
for i := 0 to 30 do
FEditArray[i].Enabled := False;
dann habe ich ja trotzdem 30 Zeilen wo ich dem Array die Edit Felder zuweise und dann ist es keine Verkürzung des Quelltextes.
und bei der zweiten Möglichkeit kommt bei mir folgende Fehlermeldung:
undefenierter Bezeichner FEditArray