Class: | ordtextbox |
tsTextBox::Init() *-- Disable all text boxes if we are running the Order History *-- form and the text box isn't already disabled. IF this.Enabled this.Enabled = !("HISTORY" $ UPPER(thisform.name)) IF !this.Enabled *-- If this is Order History, prevent text boxes *-- from changing the Enabled property this.lDynamicEnable = .F. ENDIF ENDIF