Add a OnShapeClick event

Add event OnShapeClick that is only sensitive in the area of the shape, i.e. not in the entire control rectangle but only in the shape itself.