title image


Smiley Lösung
Hallo UweS2,

nicht ganz das was ich suche...Trotzdem Danke für Deine Bemühungen.

Aber mittlerweile habe ich eine passende Lösung gefunden:



Select Case tmpCurrPos

Case 1 ' oben links

Call SendMessage(myForm.hwnd, WM_NCLBUTTONDOWN, HTTOPLEFT, CLng(0))

Case 2 ' oben mitte

Call SendMessage(myForm.hwnd, WM_NCLBUTTONDOWN, HTTOP, CLng(0))

Case 3 ' oben rechts

Call SendMessage(myForm.hwnd, WM_NCLBUTTONDOWN, HTTOPRIGHT, CLng(0))

Case 4 ' mitte rechts

Call SendMessage(myForm.hwnd, WM_NCLBUTTONDOWN, HTRIGHT, CLng(0))

Case 5 ' unten rechts

Call SendMessage(myForm.hwnd, WM_NCLBUTTONDOWN, HTBOTTOMRIGHT, CLng(0))

Case 6 ' unten mitte

Call SendMessage(myForm.hwnd, WM_NCLBUTTONDOWN, HTBOTTOM, CLng(0))

Case 7 ' unten links

Call SendMessage(myForm.hwnd, WM_NCLBUTTONDOWN, HTBOTTOMLEFT, CLng(0))

Case 8 ' mitte links

Call SendMessage(myForm.hwnd, WM_NCLBUTTONDOWN, HTLEFT, CLng(0))

Case Else

Call SendMessage(myForm.hwnd, WM_NCLBUTTONDOWN, HTCAPTION, CLng(0))

End Select



(Für alle die es interessiert)



mfg Pappi



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: