Reserver stykke af skærm

Mener du hvordan man kan få sit program til at ligge over de andre programmer ???

Dette skal i et modul :

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

Her er dit prg øverst :

Call SetWindowPos(Formname.hwnd, HWND_TOPMOST, 0&, 0&, 0&, 0&, OOMPS)

Her er det ganske almindeligt igen :

Call SetWindowPos(Formname.hwnd, HWND_NOTOPMOST, 0&, 0&, 0&, 0&, OOMPS)

Der jeg mener er at ICQ nærmest skubber alt andet til siden når man maksimerer det sådan at det nærmest resaverer højre side af skærmen. Toolbaren fra office gør vist osse det samme så vidt jeg husker.

okie - øjeblik

lukket