Find(Compo oder Prozedur?

[DeddyH]

Delphi-Quellcode:

type
  TDeinForm = class(TForm)
    ...
  private
    FButtonArray: array[0..9] of TButton;
    ...
  end;

...

procedure TDeinForm.FormCreate(Sender: TObject);
begin
  FButtonArray[0] := btnIrgendwas;
  FButtonArray[1] := btnIrgendwasAnderes;
  ...
  FButtonArray[9] := btnLetzterButton;
end;

...

procedure TDeinForm.MachWas;
var 
  i: integer;
begin
  for i := Low(FButtonArray) to High(FButtonArray) do
    FButtonArray[i].Left := 20;
end;