Du musst deinem Erstelleten Button auf ein OnClick zuweisen.
Delphi-Quellcode:
procedure TForm1.Label1Click(Sender: TObject);
var MyButton : TButton;
begin
MyButton := TButton.Create( Self );
MyButton.Parent := Self;
MyButton.Caption:='Gerade geboren :)';
MyButton.Left:=150;
MyButton.Top:=10;
MyButton.Width := 100;
MyButton.Height := 25;
MyButton.TabOrder := 11;
[b]MyButton.OnClick := MyButtonClick;[/b]
MyButton.Name := 'MyButton';
end;
procedure TForm1.MyButtonClick(Sender: TObject);
begin
showMessage('hallo');
end;