Auf dynamische Buttons zugreifen

[mfs]

Hi Leute,

ich brauche eure Hilfe bitte. Und zwar, ich erzeuge dynamisch einpaar Buttons, wie kann aber in der Laufzeit raus finden, welches dieser Buttons gedruckt wurde?

Das ist ein Teil aus meinem Programm:

Delphi-Quellcode:

   while(z<10) do
   begin
      if (myButton[z] = nil) then
      begin
         myButton[z] := TButton.Create(self);
         with myButton[z] do
         begin
            Parent := myScrollBox[n];
            Caption:='Button '+inttostr(z) ;
            Height:=22;
            Width:=130;
            Left := 10;
            Top :=23
         end;
      end;
      inc(z);
   end;

Wenn dies aber nicht dynamisch wäre, dann würde es normal sein:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
   Schomessage('Button1');
end;

Danke für jede Hilfe..