TPSPen

 

TPSObject

 

OnChange