Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Multiple forms
Message
 
 
À
03/05/1999 17:15:06
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Divers
Thread ID:
00214736
Message ID:
00214764
Vues:
18
>this is from the first form
>do form c:\fxpro2\forms\form2.scx
>read events
>here is what i am doing in the secondss = form2.text1.value
>set filter to ssid = '&ss'
>form1.refresh
>go top
>form2.Queryunload
>what is missing?

You only need 1 read events. The way I handle this is in my maing PRG that starts the app. I have a DO MENU command, then a Read Events on the next line. In the Menu I have an Exit menu item under the File menu pad. In the exit code I have a Clear Events.

All you need in the first form is do form ...form2 [the extension is not needed].

It looks like you are trying to set a filter on a table that form 1 is using based on a value entered in form 2.

In cases like this, my second form would be an actual form class with the same text box and command button. This form is MODAL. From the button on form 1 I would have:

set classlib to YourClassNameHere additive && optional if already declared
local oForm
oForm = createobject("GetSSIDForm") && Vfp 3, 5 and 6
&& oForm = newobject("GetSSIDForm", "YourClassNameHere") && VFP6 only
oForm.Show()

Then in the OK button of the class, all you need is:

ThisForm.Hide() && which releases control back the the next line of code after oForm.Show():

lcSSID = trim(oForm.txtSSID.Value)
oForm.Release()

From there you can do whatever you want with the lcSSID value in form 1.
Mark McCasland
Midlothian, TX USA
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform