J" n'y étais pas du tout, je pensais à une fenêtre popup
Je ne l'enleverai pas, la fleche indique à l'utilisateur qu'il y a une popup.
Mais pour répondre à ta question, je ferai un truc comme cela
Dans une fenêtre :
Par exemple un field (field1) non editable
et une Une popup (popup1) invisible
Le code
CODE
Private Sub Field1_PenUp(ByVal x As Integer, ByVal y As Integer)
popup1.Visible = true
popup1.Move field1.Left,Field1.Top,Popup1.Width,Popup1.Height
popup1.HitControl
End Sub
Private Sub Form_Load()
popup1.AddItem "test"
popup1.AddItem "pour voir"
End Sub
Private Sub Popup1_Change()
popup1.Visible = false
popup1.Move 160,0,Popup1.Width,Popup1.Height
Field1.Text = popup1.Text
End Sub