Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Releasing datasessions
Message
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Releasing datasessions
Divers
Thread ID:
00093939
Message ID:
00093939
Vues:
69
I have a series of forms based upon a "switchboard" which is hidden when it isn't active. Generally I close forms using command buttons but I have one instance where I would like to control the form from a combo box.

cboStandard::valid()
local i
if this.value = 'No'
this.parent.txtHidden.value = ''
this.refresh()
else
*// default is to save so we update, bktables holds the table names
for i = 1 to alen(thisform.bktables,1)
select (thisform.bktables[i,1])
=tableupdate(.t.)
endfor
_screen.forms(1).dotask('do form find1 WITH "PROPMGR"')
endif

Then forms(1).dotask looks like:

LPARAMETERS tcToDo
local m.lncount,i
THIS.Visible = .F.
m.lncount = _screen.formcount
if m.lncount >= 2
for i = 2 to m.lncount
_screen.forms(i).release()
endfor
endif
&tcToDo

However the datasession from the original form doesn't get closed so the data I see when I create another datasession the data I see isn't correct. Is this a problem with using a COMBOBOX or something else? I'd be grateful for some pointers.
Sarah King
pcpropertymanager.com
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform