Doesn't help, and in fact, after changing to your recommended
settings it now no longer works at all in any situation, prg, exe
from vfp, exe from explorer. Well, at least now it's consistent. :)
Here's an example of the problem in code.. albeit, I used .scx and
here i'm doing createobj(), but otherwise the same idea.
SYS(2700,0)
LOCAL loForm
loForm = CREATEOBJECT("TestForm1")
loForm.Show(1)
READ EVENTS
DEFINE CLASS TestForm1 AS Form
ShowWindow = 2
WindowType = 1
Visible = .T.
Caption = "TLF Form 1"
AutoCenter = .T.
ADD OBJECT cmdClose AS TestButton WITH Left = 30, Top = 50
PROCEDURE DESTROY
CLEAR EVENTS
ENDPROC
ENDDEFINE
DEFINE CLASS TestForm2 AS Form
ShowWindow = 2
WindowType = 1
Visible = .T.
Caption = "TLF Form 2"
AutoCenter = .T.
Backcolor = RGB(255,255,255)
ENDDEFINE
DEFINE CLASS TestButton AS CommandButton
Height = 30
Width = 150
Caption = "Launch Modal Form"
PROCEDURE Click
LOCAL loForm
loForm = CREATEOBJECT("TestForm2")
loForm.Show(1)
MESSAGEBOX("After Modal Form",16,"Hello!")
ENDPROC
ENDDEFINE
At 05:18 PM 2/16/2007, you wrote:
> > Thanks for the quick response Derek. I've checked everything you
> > mentioned, and it still happens. I forgot to mention that the 2nd
> > form *does* appear, but the code immediately after it's DO FORM is
> > launched right after... so no wait state occurs.
> >
> > Any other ideas?
>
>Try doing a DO FORM NAME and then do a show on the object and see if
>it blocks as it should. This is how the code that we have that uses
>scx forms does it-- all wrapped up in a form management object, of
>course..
>
>
>--
>Derek
>
>
[excessive quoting removed by server]
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
