Click Method
Object:tstoolbar.cmdClose
Expand/Collapse source code of procedure cmdClose.Click Source Code
IF _screen.ActiveForm.QueryUnload()
  IF FormIsObject()
    _screen.ActiveForm.Release()
  ENDIF
ENDIF