Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Modal Form
Message
From
16/10/1998 15:27:23
Senna Dwipayana
Indo Rebel Apparel Cv
Bandung, Indonesia
 
 
To
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Modal Form
Miscellaneous
Thread ID:
00147662
Message ID:
00147662
Views:
65
Hi,
I'm quite frustating with this modal form (and also quite complicated to explain the problem) but I try, hope you can understand what I'm trying to explain.

I made a textbox which can contain 2 values in it :
1. Value Property
2. Value2 Property

If I add a value in this textbox, the 2nd value is seek with SQL-statement on Interactivechange event.

On Lostfocus event
I Put a code like this :
WITH THIS
if EMPTY(.Value2)
DO FORM newvalue.scx WITH THIS,.VALUE TO cNewVal
IF !EMPTY(cNewVal)
.VALUE2=cNewVal
ENDIF
ENDIF

It runs good also in newvalue form (whic is a modal form), until I press the exit button on this newvalue form.
The Exit button click event contains :
THISFORM.NewVal=THISFORM.TEXT1.VALUE
THISFORM.RELEASE

And in the newvalue form Unload event :
RETURN THISFORM.NewVal

And The problem is the form won't release.
On Debugger Locals window newvalue form = .NULL.
But cNewVal=" " (Even Though I put a value in Text1)

But If I click the form close button (the one on the upper right corner of the form's window), everything goes as expected.

Please help.
Senna Dwipayana
Being good is better
Being better is a bless
Next
Reply
Map
View

Click here to load this message in the networking platform