Discussion :

[riesseg]

j'ai un DB grid avec tout pleins de ligne dedans.

J'ai comme volonter d'archiver le message qui est selectionné ( j'aurai donc besoin de sa ligne)
J'utilise l'evenement MouseDown (donc quand je clique), et voici le bout de code correspondant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Private Sub dbgMessages_MouseDown(Button As Integer, Shift As Integer, _
                                x As Single, y As Single)
    'Debug.Print "clic: " & dbgMessages.Row
    If Button = vbRightButton Then
        PopupMenu mnuRClickDBG, , , , mnuRClickDBGArcDel
    End If
    If Button = vbLeftButton Then
        Debug.Print "clic: " & dbgMessages.Row
    End If
End Sub

le probleme, c,est qu'il faut que je clic 2 fois pour avoir la bonne ligne.
Je "lag" d,une ligne ( donc si je veux archiver le message selectionné, j'archiverai pas le meme)...

Pourquoi ca lag ??

[edam]

utlise plutot mouseUP

[riesseg]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Private Sub dbgMessages_MouseUp(Button As Integer, Shift As Integer, _
                                x As Single, y As Single)
    'Debug.Print "clic: " & dbgMessages.Row
    If Button = vbLeftButton Then
        Debug.Print "clic: " & dbgMessages.Row
    End If
End Sub

meme probleme...

[jmfmarques]

VB6 (donc pas VBA... et il n'y a pas de tag VBA ici) ne connait pas onclick !
Essayes le bouton central (valeur 4), associé, au besoin, à une variable "drapeau"

[riesseg]

si je fais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
If Button = 4 Then
        Debug.Print "clic: " & dbgMessages.Row
    End If

comme tu le dis jfmarques, et bien il m'affiche bien la bonne ligne.
Donc a priori, si je rajoute l'option sauvegarder le message selectionner dans mon menu ca devrai marché
pb:

PopupMenu mnuRClickDBG, , , , mnuRClickDBGArcDel

j'arrive pas a voir mnuRClickDBG...

[jmfmarques]

Là ce n'est plus le problème du click, mais celui du "transport" d'une variable texte et de son utilisation autrement que comme texte
Cherche sur ce forum, il y a eu un sujet sur ce point il y a un mois environ...
Me rappelle plus bien... Byname peut-être ?
Sinon, il te faudra faire une boucle jusqu'à ce que le nom (texte sélectionné) soit celui de ton popup.

[riesseg]

Là ce n'est plus le problème du click, mais celui du "transport" d'une variable texte et de son utilisation autrement que comme texte
Cherche sur ce forum, il y a eu un sujet sur ce point il y a un mois environ...
Me rappelle plus bien... Byname peut-être ?
Sinon, il te faudra faire une boucle jusqu'à ce que le nom (texte sélectionné) soit celui de ton popup.

quoi Oo

je comprend rien a ton histoire de pb du ckick... oO

[jmfmarques]

Le click t'a bien permis de sélectionner un texte.
On appelle pas un contrôle par ce texte là....
essaye par exemple ceci, en cliquant sur un bouton de commande command1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
sub command1_click()
  toto = command1.name 'tu obtiendras le texte "Command1"
  msgbox toto.left ' ne fonctionnera pas !!!
end sub

Tu comprendras mieux ainsi