/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
[VB6] Flytte form
Fra : Johnny Emde Jensen


Dato : 06-11-02 11:11

Hej NG

Jeg har brug for at kunne flytte en form der ingen ControlBox har, hvordan
kan dette gøres


--
Med venlig hilsen

Johnny E Jensen



 
 
Khezar (06-11-2002)
Kommentar
Fra : Khezar


Dato : 06-11-02 13:01

Hej Johnny

Det kan gøres på følgende måde:

- Først sæt Form1.scalemode til 1 (Twip)

Form1.ScaleMode = 1

- Derefter indsættes følgende kode:

- Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)

if button=0 then exit sub

Form1.Left = Form1.Left + X
Form1.Top = Form1.Top + Y


Derefter kan du flytte formen ved at holde en museknap nede, og flytte
markøren...


--
Med venlig hilsen

Khezar
(fjern NOSPAM fra Email)


>> Er en syg ven en dårlig ven?? <<




"Johnny Emde Jensen" <johnny.emde@jensen.tdcadsl.dk> skrev i en meddelelse
news:3dc8dcaa$0$52927$edfadb0f@dread11.news.tele.dk...
> Hej NG
>
> Jeg har brug for at kunne flytte en form der ingen ControlBox har, hvordan
> kan dette gøres
>
>
> --
> Med venlig hilsen
>
> Johnny E Jensen
>
>



Johnny Emde Jensen (06-11-2002)
Kommentar
Fra : Johnny Emde Jensen


Dato : 06-11-02 18:38

Hej Khezar

Det var simpelt.. ak

/Johnny

"Khezar" <NOSPAMkhezar@tiscali.dk> skrev i en meddelelse
news:aqb08l$5p3$1@sunsite.dk...
> Hej Johnny
>
> Det kan gøres på følgende måde:
>
> - Først sæt Form1.scalemode til 1 (Twip)
>
> Form1.ScaleMode = 1
>
> - Derefter indsættes følgende kode:
>
> - Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As
> Single, Y As Single)
>
> if button=0 then exit sub
>
> Form1.Left = Form1.Left + X
> Form1.Top = Form1.Top + Y
>
>
> Derefter kan du flytte formen ved at holde en museknap nede, og flytte
> markøren...
>
>
> --
> Med venlig hilsen
>
> Khezar
> (fjern NOSPAM fra Email)
>
>
> >> Er en syg ven en dårlig ven?? <<
>
>
>
>
> "Johnny Emde Jensen" <johnny.emde@jensen.tdcadsl.dk> skrev i en meddelelse
> news:3dc8dcaa$0$52927$edfadb0f@dread11.news.tele.dk...
> > Hej NG
> >
> > Jeg har brug for at kunne flytte en form der ingen ControlBox har,
hvordan
> > kan dette gøres
> >
> >
> > --
> > Med venlig hilsen
> >
> > Johnny E Jensen
> >
> >
>
>



Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408925
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste