TCustomEditButton
pt
OnButtonClick