sender simulieren

[mkinzler]

Delphi-Quellcode:

var
   Buttons: Array of TButton;
...
setLength( Buttons, 80);
for i := 1 to 80 do
begin
   Butons[i-1] := TButton.Create( self);
   Butons[i-1].Parent := self;
   Butons[i-1].Name := 'Button'+IntToStr( i);
...

Buttons[i].click;