---

hejsa

jeg har en alm liste på min form, men jeg kan ikke bruge ctrl+ C på den så
jeg kan kopiere dataerne over i et andet program.

hvordan gør man det ?

evt så den eksekverer ctrl + C når jeg dobbeltklikker på listen.


--
mvh.
Jan Damkjær Dahl

---

Hei Jan

Private Sub List2_KeyUp(KeyCode As Integer, Shift As Integer)
If Shift = 2 And KeyCode = 67 Then Clipboard.SetText List2.Text
End Sub

HTH. Beste hilsen Harald

Jan Damkjær Dahl <jdd@worldonline.dk> skrev i
news:v9L_7.16952$Zm5.1515825@news000.worldonline.dk...
> hejsa
>
> jeg har en alm liste på min form, men jeg kan ikke bruge ctrl+ C på den så
> jeg kan kopiere dataerne over i et andet program.
>
> hvordan gør man det ?
>
> evt så den eksekverer ctrl + C når jeg dobbeltklikker på listen.
>
>
> --
> mvh.
> Jan Damkjær Dahl
>
>

---

Litt hurtig der.Om du ønsker Ctrl X (klip) og Ctrl V(lim) også:

Private Sub List2_KeyUp(KeyCode As Integer, Shift As Integer)
If Shift = 2 Then 'Ctrl
Select Case KeyCode
Case 67 'C
Clipboard.SetText List2.Text
Case 86 'V
List2.AddItem Clipboard.GetText, List2.ListIndex
Case 88 'X
Clipboard.SetText List2.Text
List2.RemoveItem List2.ListIndex
End Select
End If
End Sub

HTH. Beste hilsen Harald

Harald Staff <harald.staff@nrk.no> skrev i
news:a1h1jf$2ar$1@oslo-nntp.eunet.no...
> Hei Jan
>
> Private Sub List2_KeyUp(KeyCode As Integer, Shift As Integer)
> If Shift = 2 And KeyCode = 67 Then Clipboard.SetText List2.Text
> End Sub
>
> HTH. Beste hilsen Harald
>
> Jan Damkjær Dahl <jdd@worldonline.dk> skrev i
> news:v9L_7.16952$Zm5.1515825@news000.worldonline.dk...
> > hejsa
> >
> > jeg har en alm liste på min form, men jeg kan ikke bruge ctrl+ C på den
så
> > jeg kan kopiere dataerne over i et andet program.
> >
> > hvordan gør man det ?
> >
> > evt så den eksekverer ctrl + C når jeg dobbeltklikker på listen.
> >
> >
> > --
> > mvh.
> > Jan Damkjær Dahl
> >
> >
>
>