edit1.....edit20 nacheinander zuweisen?

[Kalakmul]

Eine prinzipielle Lösung ist die Verwendung des FindComponent-Befehls.

Etwa so:

Delphi-Quellcode:

var
  AEdit: TEdit;
  Nr: Integer;

begin
  for Nr := 1 to 20 do
  begin
    AEdit := TEdit(FindComponent('input' + IntToStr(Nr)));
    AEdit.Text := 'asdasd';
  end;
end;