Class: | application |
LPARAMETERS tcToolBar *-- Create and show the navigation toolbar if this is the first *-- form instance. Otherwise, just increment the number of *-- form instances. IF this.nFormInstanceCount = 0 SET SYSMENU ON this.oToolBar = CREATEOBJECT(tcToolBar) this.oToolBar.Show() this.oToolBar.Refresh() DO navigate.mpr ENDIF this.nFormInstanceCount = this.nFormInstanceCount + 1