Flytte form med custom TopBar.

[ostehovel]

Se dette:

Hvordan få et Bildet på toppen av en VB Form til å funke likt som (Se Ovenfor....):

 

Dårlig forklart men håper dere skjønner....

Skal lage Custom TopBar.

Har satt i Form:

BorderStyle til 0 None

 

Takk på forhånd.

(Kansje ganske treg bilde loading... Bildene er lagra på egen server med 150 kbit/150 kbit linje )

Endret 1. desember 2005 av ostehovel

[Richard87]

bruk disse kommandoene:

Private Declare Function ReleaseCapture Lib "user32" () As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long


ReleaseCapture
SendMessage hwnd, &HA1, 2, 0&

Som lurer windows til og tro at de er en title bar, men husk og ta en "hit-test"(se hvor musen klikker), og legg til i MouseDown eller noe, husker ikke helt, men prov deg fram;)