afficher dans un text box se qui a été séléctionné dans une datagrid

Question

salut a tous 
j'ai une datagrid ou je g&#233;n&#233;re de ma base de donn&#233;e le nom , le num&#233;ro et le code postales de mes clients et enclicant sur un de mes client je voudrai afficher dans matextbox son num&#233;ro client qui est affich&#233; dans ma datagrid comment je pourrai faire merci de m'aider pour sela.

alain_isyss · Answer

Bonjour, voil&#224; qui devrai r&#233;gler ton probl&#232;me:

'sur une feuille, un controle datagrid reli&#233; (datasource) &#224;
'un controle adodc qui pointe sur la table clients.
'et copier tout &#231;a sur la feuille



'pour revenir &#224; la colonne de s&#233;lection
Dim NumCol As Integer


Private Sub DataGrid1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
'dans les propri&#233;t&#233;s du datagrid1 mettre DragMode=0 (manuel)
'choisir une icone pour la propri&#233;t&#233; DragIcon sinon c'est visuellement toute la grille qui se d&#233;place
'et ce n'est pas pratique !
'laisser le bouton gauche libre pour s&#233;lectionner la cellule &#224; d&#233;placer par un clic puis
'on commence l'op&#233;ration avec le bouton droit
If Button = 2 Then
'selection &#224; partir de la colonne contenant le num&#233;ro (ou toute autre chose ...)
    NumCol = DataGrid1.Col
    DataGrid1.Drag 1
End If
End Sub


Private Sub Label1_DragDrop(Source As Control, X As Single, Y As Single)
'propri&#233;t&#233; du label1 DragMode=1 (Automatique)
'et lacher le bouton droit pour r&#233;cup&#233;rer le contenu de la cellule s&#233;lectionn&#233;e.
 Source.Col = 2 's&#233;lection de la colonne contenant les infos &#224; r&#233;cup&#233;rer ( nom ou autre ...)
 Label1.Caption = Source.Text
 Source.Col = NumCol 'retour &#224; la colonne de s&#233;lection
 Label1.BorderStyle = 0
End Sub


Private Sub Label1_DragOver(Source As Control, X As Single, Y As Single, State As Integer)
'juste pour rep&#233;rer la cible Label1.BorderStyle IIf(State 2, 1, 0)
End Sub

Isyss

hy_honey · Answer

merci pour ses informations tr&#233;s pr&#233;cieuse mais j'ai pas compris se que tu veux dire par sa 

'sur une feuille, un controle datagrid reli&#233; (datasource) &#224;
'un controle adodc qui pointe sur la table clients.
'et copier tout &#231;a sur la feuille

moi j'utilise une connection oledb

mais je pense que cela n'a aucun raport.

hy_honey · Answer

salut c'est encore moi 
dans propri&#233;t&#233; je ne trouve pas le dragmode j'ai allowdrop (true ou false) et je n'est pas aussi DragIcon alors je ne sais pas si c'est grave ou pas???

merci pour l'aide que vous m'apportez

hy_honey · Answer

salut 
j'utilise vb6.NET  et il ne me sors une erreur sur :

If Button = 2 Then
'selection &#224; partir de la colonne contenant le num&#233;ro (ou toute autre chose ...)
    NumCol = DataGrid1.Col
' col n'est pas un menbre de system.windows.forms.datagrid
    DataGrid1.Drag 1
End If

que faire je suis vraiment coinser et je doit rendre sa d'ici demain!!!!!!

alain_isyss · Answer

D&#233;sol&#233; mais je n'ai pas .NET donc je ne peux pas tester.
Il doit y avoir une autre propri&#233;t&#233; pour d&#233;signer une cellule.

Isyss

Afficher dans un text box se qui a été séléctionné dans une datagrid

5 réponses

Discussions similaires