HangMan Button Interface

[Chaosente]

ok soweit so gut, die buttons hab ich erfolgreich erstellt, nun aber mein nächstes problem, ich will ncith für jeden der buttons ne OnKLick schreiben, kann man das irgendwie in einer Procedure bewältigen?

hier noch mal mein Code:

Delphi-Quellcode:

type
  THangManWordInterface = class
  private

  public
  Buttons: array[0..25] of TButton;
  constructor Create(top,left:integer; owner: TComponent);
  end;

[...]

Delphi-Quellcode:

constructor THangManWordInterface.Create(top,left: integer; owner: TComponent);
var i:integer; abc: string;
begin
  abc:='ABCDEFGHIJKLMNOPQRSTUVWXYZ';
  for i:=0 to 25 do begin
  Buttons[i]:=TButton.Create(owner);
  Buttons[i].Parent:=TWincontrol(owner);
  Buttons[i].left:=i*20+left;
  Buttons[i].Top:=top;
  Buttons[i].Width:=20;
  Buttons[i].Height:=20;
  Buttons[i].Caption:=abc[i+1];
  end;
end;