Discussion :

[andy38]

Bonjour, j'utilise le Vb net (2003) Voila le probleme. Comment recuperer et afficher la ligne d'un dataGrid qui contient 5 colonnes et les afficher dans un ListView sur une meme ligne. voir extrait de mon code

Code :

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

ListView1.Items.Add(grille.Item(grille.CurrentRowIndex, 0))

ceci affiche
la premiere colonne seulement, comment afficher les 4 autres sur une
meme ligne. Merci Andy38

[bidou]

je n'ai même pas compris la question

[diaboloche]

... difficile de comprendre ce que tu veux...
Première chose à faire définis ta listview en multi colonne...

[neguib]

Et surtout quel est l'intérêt de passer directement d'un contrôle d'affichage (DataGrid) à un autre contrôle d'affichage(ListView) alors qu'ils ont la même source de données, la seule différence étant un filtrage pour le ListView

[andy38]

Bonjour, j’essaie d’être plus précis
J’utilise VB-Net(2003)
But : Prog. D’inventaire
J’ai un Windows Form qui contient plusieurs contrôles dont 3 principaux

1. TreeView
2. DataGrid
3. ListView

Les 2 premiers sont peuplés par une base de données en Access(2000).



Mode d’opération:

Sur un clic d’un treenode ceci charge le datagrid qui contient 5 colonnes de données appropriées, sur un nouveau clic d’un treenode cela efface le datagrid et recharge le Datagrid avec les nouvelles données, juste qu’ici tout vas bien. Ce que j’essaie et voudrais faire c’est un double-clic sur une ligne du datagrid et copier toute la ligne dans le listview sur une même ligne horizontalement. Présentement j’utilise comme code ceci :

Code :

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

ListView1.Items.Add(grille.Item(grille.CurrentRowIndex, 0))

Cela affiche seulement la première colonne du datagrid, comment faire pour afficher le reste de la ligne c’est-à-dire les 4 autres colonnes et sur la même ligne du listview.

Merci a l’avance.
Andy38

[neguib]

Je te donne une piste à suivre car j'ai pas vraiment le temps de tester ce code créé à la volée

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
'par exemple si la source de grille est une DataTable
Dim dt As DataTable = CType(grille.DataSource,DataTable)
'récupérer la ligne en cours
Dim dr As DataRow = dt.Rows(grille.CurrentRowIndex)
'créer le <a href="http://msdn.microsoft.com/library/fre/default.asp?url=/library/FRE/cpref/html/frlrfsystemwindowsformslistviewitemclasstopic.asp" target="_blank">ListViewItem</a> correspondant
Dim lvi As New ListViewItem()
Dim o As Object
For Each o In dr.ItemArray
   lvi.SubItems.Add(o.ToString())
Next
ListView1.Items.Add(lvi)
' si nécessaire
ListView1.View = View.Details