например так:
X++:
public class A2Tutorial extends RunBase
{
}
protected Object dialog()
{
Dialog dialog;
FormBuildButtonControl btn;
;
dialog = super();
dialog.caption("some stuff.");
Btn = dialog.formBuildDesign().addControl(FormControlType::Button,'Button77' );
Btn.text("Click me button77");
// info(Btn.name());
return dialog;
}
void Button77_clicked()
{;
info('Button77_clicked()');
}
public void dialogPostRun(DialogRunbase dialog)
{;
dialog.formRun().controlMethodOverload(true);
dialog.formRun().controlMethodOverloadObject(this);
super(dialog);
}
public container pack()
{
return connull();
}
public boolean unpack(container packedClass)
{
return true;
}
static void main(Args args)
{
A2tutorial f = new A2tutorial();
;
if (f.prompt())
{
f.run();
}
}