/ 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
Popup menu i ListBox
Fra : Niels Henriksen


Dato : 20-12-00 01:36

Jeg har nu prøvet at trevle www.planet-source-code.com igennem samt mine
favorites. Men uden held

Hvordan laver man en popupmenu i en listbox? (samt evt. listview).


--
Niels Henriksen
www.ryttersnak.dk



 
 
Niels Krogh (20-12-2000)
Kommentar
Fra : Niels Krogh


Dato : 20-12-00 09:16

Hej Niels,

Rimelig nemt : På din listbox's mousedown event tilføjer du nedenstående
kode-stump. Forudsætningen er at du har lavet en menu (mnuPopUpMain) der har
1 eller flere underpunkter og det er disse der popper up mnuPopUpMain
sættes til visible = false. Under menuerne er sat til true.

mvh
Niels Krogh


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

If Button = vbRightButton Then PopupMenu mnuPopUpMain

End Sub



"Niels Henriksen" <niels@ryttersnak.dk> skrev i en meddelelse
news:91ouug$22ct$1@news.cybercity.dk...
> Jeg har nu prøvet at trevle www.planet-source-code.com igennem samt mine
> favorites. Men uden held
>
> Hvordan laver man en popupmenu i en listbox? (samt evt. listview).
>
>
> --
> Niels Henriksen
> www.ryttersnak.dk
>
>



Niels Henriksen (20-12-2000)
Kommentar
Fra : Niels Henriksen


Dato : 20-12-00 09:29

"Niels Krogh" <nikro@REMOVEbigfoot.com> wrote in message
news:91ppuo$39t$1@news.inet.tele.dk...
>
> Private Sub List1_MouseDown(Button As Integer, Shift As Integer, X As
> Single, Y As Single)
>
> If Button = vbRightButton Then PopupMenu mnuPopUpMain
>
> End Sub
>
Så langt er jeg kommet, men hvordan tilknytter jeg den popup til en linie?
Det vil jo være dumt at den kommer til syne i en linie der ikke findes. Hvis
du forstår.


--
Niels Henriksen
www.ryttersnak.dk



Niels Krogh (20-12-2000)
Kommentar
Fra : Niels Krogh


Dato : 20-12-00 15:48

Hej Niels,

Tja, du bliver jo nok nød til at checke om der er valgt et Item fx. vha.
ListBox1.SelCount > 0. Derudover er der jo X og Y koordinater fra din
mousedown event som du kan videregive til popupmenu methoden - se evt.
syntaksen i hjælpen.

If Button = vbRightButton Then PopupMenu mnuPopUpMain, ,X ,Y

mvh
Niels Krogh

"Niels Henriksen" <niels@ryttersnak.dk> skrev i en meddelelse
news:91pql0$17ek$1@news.cybercity.dk...
> "Niels Krogh" <nikro@REMOVEbigfoot.com> wrote in message
> news:91ppuo$39t$1@news.inet.tele.dk...
> >
> > Private Sub List1_MouseDown(Button As Integer, Shift As Integer, X As
> > Single, Y As Single)
> >
> > If Button = vbRightButton Then PopupMenu mnuPopUpMain
> >
> > End Sub
> >
> Så langt er jeg kommet, men hvordan tilknytter jeg den popup til en linie?
> Det vil jo være dumt at den kommer til syne i en linie der ikke findes.
Hvis
> du forstår.
>
>
> --
> Niels Henriksen
> www.ryttersnak.dk
>
>



Niels Henriksen (20-12-2000)
Kommentar
Fra : Niels Henriksen


Dato : 20-12-00 18:19

"Niels Krogh" <nikro@REMOVEbigfoot.com> wrote in message
news:91qgvk$rf7$1@news.inet.tele.dk...
>
> Tja, du bliver jo nok nød til at checke om der er valgt et Item fx. vha.
> ListBox1.SelCount > 0. Derudover er der jo X og Y koordinater fra din
> mousedown event som du kan videregive til popupmenu methoden - se evt.
> syntaksen i hjælpen.
>
> If Button = vbRightButton Then PopupMenu mnuPopUpMain, ,X ,Y
>
Men man får jo kun noget retur hvis man venstreklikker og derefter
højreklikker. Det jeg vil frem til er at højreklikke, så kommer der en
popup-menu og at man kan aflæse det pågældende punkt.

Jeg har prøvet med at jeg sagde Y/180 men så får jeg kun linien. Hvis der er
scrollet, så skal jeg også finde en måde at se hvilken punkter der er gemt.

--
Niels



Niels Krogh (21-12-2000)
Kommentar
Fra : Niels Krogh


Dato : 21-12-00 08:41

Hmnn, forstår jeg dig ret, vil du kun højre klikke på et listitem og
derefter poppe menu op.

Prøv lige at checke hos VBNet på
http://www.mvps.org/vbnet/code/listapi/rightmouseclick.htm Der er et par
eksempler omkring det du søger.

mvh
Niels


"Niels Henriksen" <niels@ryttersnak.dk> skrev i en meddelelse
news:91qpn4$ph0$1@news.cybercity.dk...
> "Niels Krogh" <nikro@REMOVEbigfoot.com> wrote in message
> news:91qgvk$rf7$1@news.inet.tele.dk...
> >
> > Tja, du bliver jo nok nød til at checke om der er valgt et Item fx. vha.
> > ListBox1.SelCount > 0. Derudover er der jo X og Y koordinater fra din
> > mousedown event som du kan videregive til popupmenu methoden - se evt.
> > syntaksen i hjælpen.
> >
> > If Button = vbRightButton Then PopupMenu mnuPopUpMain, ,X ,Y
> >
> Men man får jo kun noget retur hvis man venstreklikker og derefter
> højreklikker. Det jeg vil frem til er at højreklikke, så kommer der en
> popup-menu og at man kan aflæse det pågældende punkt.
>
> Jeg har prøvet med at jeg sagde Y/180 men så får jeg kun linien. Hvis der
er
> scrollet, så skal jeg også finde en måde at se hvilken punkter der er
gemt.
>
> --
> Niels
>
>



Niels Henriksen (21-12-2000)
Kommentar
Fra : Niels Henriksen


Dato : 21-12-00 09:01

"Niels Krogh" <nikro@REMOVEbigfoot.com> wrote in message
news:91sc9h$d9q$1@news.inet.tele.dk...
> Hmnn, forstår jeg dig ret, vil du kun højre klikke på et listitem og
> derefter poppe menu op.
>
Jada. Det er jo det mest naturlige.

> Prøv lige at checke hos VBNet på
> http://www.mvps.org/vbnet/code/listapi/rightmouseclick.htm Der er et par
> eksempler omkring det du søger.
>
jubiiiii.... du er bare en knag.... Så blev det alligevel jul i år


--
Niels Henriksen
www.ryttersnak.dk



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

Månedens bedste
Årets bedste
Sidste års bedste