Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Showing a form while code runs in the background
Message
From
23/12/2001 08:31:27
 
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00597768
Message ID:
00597809
Views:
15
Hi Jim

>I want to show a modeless form created from a form class I have created at the start of a .PRG, show and hide it periodically during the program (show while the SQL code is running and hide while other message forms [they are modal], and release it at the end of the routine. The only objects on the form are 2 Images and 1 Label.

That's strange, because I just tried to do the exact same thing, using a base class form and had no problem at all using Show() and Hide(). There has to be something in one of the form methods that is causing the problem...

FWIW Here's what I did, saee if this works for you, and if so then you'll know it is something in your form causing it, if not, we'll have to think again <g>:
oF = CREATEOBJECT( "FORM" )
oF.AddObject( 'lbljunk', 'label' )
WITH of.lbljunk
  .autosize = .T.  
  .caption = "WORKING - 1st Pass"
  .left = 100
  .top = 100
  .Visible = .T.
ENDWITH

*** Show the form
of.Show()
WAITABIT()

*** Hide the form
of.Hide()
WAITABIT()

*** Show the form
of.lbljunk.caption = "WORKING - 2nd Pass"
of.Show()
WAITABIT()

*** Hide the form
of.Hide()

FUNCTION waitabit
LOCAL lnCnt, lnjunk
ACTIVATE SCREEN
FOR lnCnt = 1 to 1000000
  lnjunk = lnCnt
NEXT
RETURN
----
Regards
Andy Kramek
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform