pt 

OnButtonClick (TCustomEditButton)