[VFP] Modal Window not displaying

[echolis]

I might have a workaround.

Got the idea from here:
https://www.tek-tips.com/viewthread.cfm?qid=77132

The idea to change the modal state of the form from the OnCreateWebViewCompleted seems that it is possible if you temporarily set the form's visibility to false for a moment.

eg.

Code:

*** ActiveX Control Event ***
LPARAMETERS hresult

thisform.Visible = .F.
thisform.WindowType = 1
thisform.Visible = .T.

That actually runs for me and the form is displayed as expected.

The other interesting part from the link above is that there are other controls that have this issue. Would be nice to know if there's a way for me to handle this in the control, but so far I haven't found what I should do for addressing that.
--
Wil

This works great to get the form to display. But, the control itself doesn't actually display; I can see that the navigate fires and is successful. The control is just in it's default "grey" state.

I was able to fix that by setting the control to visible = .f. and then .t., see below:

Code:

*** ActiveX Control Event ***
LPARAMETERS hresult

this.Visible = .f.
thisform.Visible = .F.
thisform.WindowType = 1
thisform.Visible = .T.
this.Visible = .t.