dynamische erzeugte buttons und onclick procedure

[nailor]

Delphi-Quellcode:

//yup, und wenn du das ganze als array machst und dann

procedure TForm1.ButtonClick;
begin
  //hier
  if sender = button[0] then ...
  if sender = button[1] then ...
  if sender = button[2] then ...
  ...
  //einfügst, macht jeder Knopf was andres
end;