Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Previewing in Word only
Message
 
 
À
13/07/2001 09:17:44
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Divers
Thread ID:
00528482
Message ID:
00530868
Vues:
24
Hi!

You can do not lock it but just show a WAIT message like 'Please close the Word Preview to continue...':
loWord.Visible=.T.
loWord.ActiveDocument.PrintPreview
#DEFINE nLimitation 300
i = seconds()
do while loWord.PrintPreview AND seconds()-i<=nLimitation && loop until we're in the print
                     &&preview mode or time limitation reached
   WAIT WINDOW 'Please close the Word Preview to continue...' TIMEOUT 10
enddo
loWord.ActiveDocument.CLose.....
No idea how to lock the VFP main window to do not appear. Try to set _VFP.AutoYield to .F., however, this could not help - Windows manage each window anyway. For example, you can minimize all Windows by "Show Desktop" icon despite some application lockes and window is configured to do not ever minimize. this even hides all dialog boxes. So I guess more simple and better is just show message to users as I did in my applications when working with Word.

HTH.

>>
>>DECLARE integer Sleep in Win32API integer
>>loWord.Visible=.T.
>>loWord.ActiveDocument.PrintPreview
>>#DEFINE nLimitation 300
>>i = 1
>>do while loWord.PrintPreview AND i<=nLimitation && loop until we're in the print
>>                     &&preview mode or time limitation reached
>>  sleep(1000)
>>enddo
>>loWord.ActiveDocument.CLose.....
>>.....
>>
>
>That works like a charm. However, even if the VFP application is freeze, we can still click on it and we see that the sceen if not refreshed. How can we disable VFP during that time? Basically, presently, the user can click on the taskbar to bring it frontmost. I would like to lock that ability during that time.
Vlad Grynchyshyn, Project Manager, MCP
vgryn@yahoo.com
ICQ #10709245
The professional level of programmer could be determined by level of stupidity of his/her bugs

It is not appropriate to say that question is "foolish". There could be only foolish answers. Everybody passed period of time when knows nothing about something.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform