Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Releasing datasessions
Message
 
To
All
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Releasing datasessions
Miscellaneous
Thread ID:
00093939
Message ID:
00093939
Views:
68
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
Next
Reply
Map
View

Click here to load this message in the networking platform