Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Listbox contents not updating on form
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00572133
Message ID:
00572194
Views:
32
Thanks Nadya! It works now. I tried the Lockscreen and that solved the final problem of the form not refreshing or repainting properly. Here's the code in the GotFocus for the form that works now. Thanks again.
THISFORM.Lockscreen = .T.
* Find Attempts record that goes with Tube record
CREATE CURSOR atts;
(Ext C(3), Seqno N(2), Placed C(18), Route C(10), Ext_Reas C(12))

ATTS_CNT=0
SELECT attempts
SCAN FOR attempts.mast_id = tube.mast_id
	SELECT atts
	APPEND BLANK
	REPLACE atts.ext 		WITH attempts.ext
	REPLACE atts.seqno 		WITH attempts.seqno
	REPLACE atts.placed 	WITH attempts.placed
	REPLACE atts.route 		WITH attempts.route
	REPLACE atts.ext_reas 	WITH attempts.ext_reas

    ATTS_CNT=ATTS_CNT+1
	SELECT attempts
ENDSCAN

THISFORM.lstTube_tries.Requery
THISFORM.lstTube_tries.Refresh
THISFORM.Lockscreen = .F.
SELECT tube
Picky, picky, picky that's VFP for ya! At least of still have some hair left. I was starting to pull it out. There is an extra flash when the form appears, but I think I know why. Otherwise, it works perfectly now.
Steve Kramer
Kramer & Kramer Design
"Home of Go Cartoons"
Web Site: www.stephenkramer.com
Would you believe Far Side Lite?
More than 270 original cartoons.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform