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
Mike