COMBOXBOX IN DATAGRID VB.NET
TOTOCHITO
Messages postés
63
Date d'inscription
lundi 13 septembre 2004
Statut
Membre
Dernière intervention
16 novembre 2007
-
10 nov. 2005 à 08:59
whitepawn Messages postés 2 Date d'inscription mercredi 23 juin 2004 Statut Membre Dernière intervention 28 juin 2007 - 28 juin 2007 à 11:55
whitepawn Messages postés 2 Date d'inscription mercredi 23 juin 2004 Statut Membre Dernière intervention 28 juin 2007 - 28 juin 2007 à 11:55
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/34549-comboxbox-in-datagrid-vb-net
https://codes-sources.commentcamarche.net/source/34549-comboxbox-in-datagrid-vb-net
28 juin 2007 à 11:55
Private Sub Control_PropertyChanged(ByVal sender As Object, ByVal e As System.EventArgs)
Une exception non gérée du type 'System.StackOverflowException' lorsque je sélectionne une combo de la dernière ligne. Le programme boucle entre
Protected Overloads Overrides Sub Edit et
Control_PropertyChanged(ByVal sender As Object, ByVal e As System.EventArgs). Une solution propre?
28 juin 2007 à 11:42
- Protected Overloads Overrides Sub Edit : il faut ajouter If VarType(value) = VariantType.Null Then Exit Sub
- la première fois que l'on utilise la combo d'une colonne, la valeur ne se fixe pas dans la case. Avec le remplacement par ce code ci-dessous, ca fonctionne... (en tout cas chez moi)
Protected Overrides Function Commit(ByVal dataSource As CurrencyManager, ByVal rowNum As Integer) As Boolean
ctrl.Bounds = Rectangle.Empty
' Create an event handler for the bound property
Me.boundPropertyChangedEvent.AddEventHandler(ctrl, New EventHandler(AddressOf Control_PropertyChanged))
'If isEditing Then
If ctrl.Visible = True Then
isEditing = False
Try
' Retrieve the value of the bound property.
Dim value As Object = Me.boundProperty.GetValue(ctrl, Nothing)
' Use it as the value for this cell.
SetColumnValueAtRow(dataSource, rowNum, value)
Catch
' Ignore errors.
End Try
Invalidate()
ctrl.Visible = False
End If
Return True
End Function
Pouvez-vous me dire si ça donne les mêmes erreurs chez vous ? merci
29 mars 2007 à 15:15
Merci.
14 juin 2006 à 11:22
14 juin 2006 à 11:18
"cbo.Items.AddRange(New String() {"France", "Germany", "Italy", "UK", "USA"})"
par une requête SQL.
Enfin bref voila. Je sais pas vraiment si c'est la solution mais je vais essayer. Si t'es toujour intéréssé je posterais le bout de code qu'il faut ajouter. A moins que t'ai déjà trouver une solution.
Voila =)
7 mai 2006 à 01:20
merci d'avannnnnnnnce
7 mai 2006 à 01:20
merci d'avannnnnnnnce
17 nov. 2005 à 16:21
10 nov. 2005 à 08:59
Merci encore