Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Lockscreen not effective
Message
 
 
To
03/11/1999 12:59:01
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00286277
Message ID:
00286281
Views:
22
Have you tried ThisForm.LockScreen = .t./.f. ?

>All:
>I've spent the better part of 2 hours trying to get a form to work how I want it and still don't have a solution.
>
>VFP 6.0 sp2
>
>Modal form with a sub-classes pageframe that has 2 pages. Form has 2 additional pages. This is a form that is used for 3 apps that required the additional pages and several more that won't need them. What I want to do is prevent the user from seeing the 2 pages "disappear" when they aren't needed. I've tried _screen.lockscreen = .T. in the Load() and _screen.lockscreen = .F. in the Init() or Activate(). no joy! Tried setting pageframe and forms .visible to .F. and resetting to .T. after the form and pageframe should be complete. no joy! I tried the following API code (from another thread) in a method called SuppressScreen with a .T./.F. lparameter to turn on and off.
>*- Lock window
> DECLARE INTEGER GetDesktopWindow IN WIN32API
> DECLARE INTEGER LockWindowUpdate IN WIN32API ;
> INTEGER lnHandle
>
> lnDeskTopWin = GetDesktopWindow()
> =LockWindowUpdate(lnDeskTopWin)
>
> To unlock ... :
> *- Unlock window
> =LockWindowUpdate(0)
>
>Code works but still no joy!
>
>If I can't get this to work, I'll have to live with the user seeing the disappearing act or create a separte form without the extra pages. Is this just another VFP "feature"? Maybe I'm an idiot for trying to update screens without the user seeing what's happening.
>
>As I remember, when I was doing Delphi 1.0 development, suppressing the screen updates was one way of improving performance. I know I used to do stuff like this back in the DOS 3.3 days.
>
>TIA
>Mike
Mark McCasland
Midlothian, TX USA
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform