Ajouter un élément à une listbox à l'aide de la fonction SensMessage

Résolu
BozzoDodo Messages postés 185 Date d'inscription vendredi 20 décembre 2002 Statut Membre Dernière intervention 10 janvier 2008 - 9 juil. 2005 à 19:17
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 - 9 juil. 2005 à 20:28
Bonjour,

je veux ajouter un élément à l'aide de la fonction Sendmessage. Ca donne:



SendMessage lstHWnd, LB_ADDSTRING, 0, "test"



Je ne comprends pas comment faire! Ce n'est pas "test" qui est ajouté mais un texte différent. Comment faire?

merci

1 réponse

cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 18
9 juil. 2005 à 20:28
Salut,

Un tit ex qui fonctionne avec une form contenant une listbox (list1) et un commandbutton (command1) :

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal lParam As Any) As Long
Const LB_ADDSTRING As Long = &H180


Private Sub Command1_Click()
Call SendMessage(List1.hwnd, LB_ADDSTRING, 0, "test")
End Sub


Le problème se situe peut-être au niveau de ton lstHWnd ?

-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
3
Rejoignez-nous