Destroy Method
Object: frmAddCustomer
Expand/Collapse source code of procedure Destroy Source Code
tsBaseForm::Destroy()
IF thisform.ReleaseType = 1    && Form closed from close box
  thisform.lRetVal = .F.
  =TABLEREVERT()
ENDIF