Delphi-Quellcode:
procedure bilderdeaktiveren(var form1);
var
FEditArray: array[0..4] of TEdit;
i: integer;
begin
for i := 0 to 4 do
FEditArray[i] := FindComponent('Image'+IntToStr(i)) as TEdit;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
bilderdeaktiveren(form1);
end;
du meinst so?
dann kommt aber die selbe fehler meldung wieder
es liegt ja auch nicht am Image da könnte ich ja einfach Form1.image reinschreiben dann wäre das gelöst aber es liegt irgentwie an diesem findcomponent befehl