Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Don´t run Valid event
Message
 
To
09/09/1999 08:06:44
Joao Godinho
Fredesenvolv, Lda
Lisbon, Portugal
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00262775
Message ID:
00262792
Views:
18
>I´ve a form with one texfield control
>i create a property form called exit_form = .f.
>
>in the thisform.txfield.valid
>if thisform.exit_form
> thisform.release
>endif
>
>if this.value >= date() or empty(this.value)
> return .f.
>endif
>
>What i want to do is if i click on the form close button i want to exit the form, but the valid event don´t let me
>
>where do i have to put thisform.exit_form = .t.
> thisform.queryunload ...???

Yes, you can do something like, in Queryunload:
if !thisform.exit_form
  nodefault
endif
Also you can put the thisform.exit_form = .T. in the Lostfocus of the tbox, that way it runs after the Valid is checked. Probably a better solution.
The Anonymous Bureaucrat,
and frankly, quite content not to be
a member of either major US political party.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform