Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How to make IE the active window?
Message
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
01134211
Message ID:
01134357
Views:
16
Timothy,

After Borislav's correction give this a try:
#define SWP_NOSIZE          0x0001
#define SWP_NOMOVE          0x0002
#define SWP_NOZORDER        0x0004

#define HWND_TOP        0
#define HWND_BOTTOM     1
#define HWND_TOPMOST    -1
#define HWND_NOTOPMOST  -2

declare integer SetWindowPos IN win32api ;
  integer hWnd,            ; && handle to window
  integer hWndInsertAfter, ; && placement-order handle
  integer X,               ; && horizontal position
  integer Y,               ; && vertical position
  integer cx,              ; && width
  integer cy,              ; && height
  integer uFlags             && window-positioning flags

declare integer GetTopWindow in win32api integer hwnd

SetWindowPos( _vfp.hWnd, HWND_BOTTOM, 0, 0, 0, 0, SWP_NOSIZE + SWP_NOMOVE ) && push _vfp to the bottom
lnNewTop = GetTopWindow( 0 ) && find the window now on top
SetWindowPos( _vfp.hWnd, HWND_TOP, 0, 0, 0, 0, SWP_NOSIZE + SWP_NOMOVE + SWP_NOZORDER ) && pull off the bottom but don't change zorder
SetWindowPos( lnNewTop, HWND_TOP, 0, 0, 0, 0, SWP_NOSIZE + SWP_NOMOVE ) && push the oher window ontop of _vfp
>David, I'm unsure about the oie reference syntax as I do not dabble much in this aspect. How will this work with the code I have or will I need to change somewhere?
df (was a 10 time MVP)

df FoxPro website
FoxPro Wiki site online, editable knowledgebase
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform