Código Delphi [-] procedure TForm1.FormCreate(Sender: TObject); begin MiBoton := TButton.Create(Self); MiBoton.Parent := Form1; MiBoton.OnClick := MiBotonClick; end;
procedure TForm1.FormCreate(Sender: TObject); begin MiBoton := TButton.Create(Self); MiBoton.Parent := Form1; MiBoton.OnClick := MiBotonClick; end;