Discussion :

[superchinois]

Salut,

Tout est dans le sujet du message :o) je cherche à adapter la hauteur d'une ligne d'un datagrid. J'ai bien trouvé mon bonheur dans la FAQ :

http://faqvbnet.developpez.com/?page..._modify_height

J'ai bien créé la classe, mais je ne comprends pas comment mettre physiquement ce datagrid sur mon formulaire (objet dans la boite à outil, insertion à la mano par programmation) ? ou alors il y a un truc qui m'échappe... Quelqu'un pourrait-il me mettre sur la piste car il n'y a aucun exemple illustré... Merci d'avance.

[Pol63]

datagrid ou datagridview ? (framework < ou > à 2 ?)

sur le datagrid la propriété n'est pas accessible et le code de la faq sert à accéder à la propriété inaccessible (par reflection)

[superchinois]

Re,

ayé j'ai trouvé de quoi faire ce qu'il me fallait en quelques lignes :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public Sub SetGridRowHeight(ByVal dg As DataGrid, ByVal nRow As Integer, ByVal cy As Integer)
Dim arrRows As ArrayList = CType(dg.GetType().GetField("m_rlrow", BindingFlags.NonPublic Or BindingFlags.Static Or BindingFlags.Instance).GetValue(dg), ArrayList)
Dim row As Object = arrRows(nRow)
row.GetType().GetField("m_cy", BindingFlags.NonPublic Or BindingFlags.Static Or BindingFlags.Instance).SetValue(row, cy)
dg.Invalidate()
End Sub 'SetGridRowHeight
 
 
Public Sub SetDefaultGridRowHeight(ByVal dg As DataGrid, ByVal cy As Integer)
dg.GetType().GetField("m_cyRow", BindingFlags.NonPublic Or BindingFlags.Static Or BindingFlags.Instance).SetValue(dg, cy)
Dim row As Object = arrRows(nRow)
row.GetType().GetField("m_cy", BindingFlags.NonPublic Or BindingFlags.Static Or BindingFlags.Instance).SetValue(row, cy)
dg.Invalidate()
End Sub 'SetDefaultGridRowHeight

@+