Always on Top Function?

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Is there a way of setting a database to be "Always on Top" (The database window is constantly in view on the screen) regardless of what other programs and windows are also running

If so how

Thanks in advanc

Hasan
 
This Should do it

Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long,
ByVal hWndInsertAfter As Long, ByVal x As Long, y, ByVal cx As Long, ByVal
cy As Long, ByVal wFlags As Long) As Long
Private Const HWND_TOPMOST = -1
Private Const HWND_NOTOPMOST = -2
Private Const SWP_NOMOVE = &H2
Private Const SWP_NOSIZE = &H1
Private Const TOPMOST_FLAGS = SWP_NOMOVE Or SWP_NOSIZE

Public Sub MakeNormal(hwnd As Long)
SetWindowPos hwnd, HWND_NOTOPMOST, 0, 0, 0, 0, TOPMOST_FLAGS
End Sub
Public Sub MakeTopMost(hwnd As Long)
SetWindowPos hwnd, HWND_TOPMOST, 0, 0, 0, 0, TOPMOST_FLAGS
End Sub

You can use the Application.hwnd as parameter..

HTH

Pieter






Hasan said:
Is there a way of setting a database to be "Always on Top" (The database
Click to expand...
window is constantly in view on the screen) regardless of what other
programs and windows are also running?
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Access always on top 2
always on top in access 2007 1
Build search function in to a form 5
All Windows programs need an "always on top" option. 2
Form header in tabbed form?? 3
Alt-PrintScreen captures more than I want in Access 2007 2
Top 10 Report 2
Always on Top 1

Back
Top