002
11.12.2004, 22:25 Uhr
~stephan
Gast
|
sieht ganz gut aus, aber ich weiß leider nicht so wirklich was ich damit anfangen soll?
wie mach ich das "OnTop" true?
ich hab das ganze mal so untergebracht:
| Visual Basic: |
Private Declare Function SetWindowPos Lib "user32" _
(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
Private Const HWND_TOPMOST = -1
Private Const HWND_NOTOPMOST = -2
Private Const SWP_NOMOVE = &H2
Private Const SWP_NOSIZE = &H1
' Fenster in den Vordergrund setzen
Public Sub FormOnTop(ByVal hWnd As Long, _
ByVal OnTop As Boolean)
If OnTop Then
' immer im Vordergrund
SetWindowPos hWnd, HWND_TOPMOST, 0, 0, 0, 0, _
SWP_NOMOVE Or SWP_NOSIZE
Else
' normal
SetWindowPos hWnd, HWND_NOTOPMOST, 0, 0, 0, 0, _
SWP_NOMOVE Or SWP_NOSIZE
End If
End Sub
Private Sub Form_Load()
End Sub
|
ich denke nicht ma das ist richtig 
help |
