Booleen 3 états à 2 états

Version imprimable

Bonjour,

Est-il possible d'éliminer l'état indéterminé lorsque l'on fait une colonne booléenne comme suit :

Code:

1
2
3
4
5
6
7
8
9
10
11
Private Function CreerUneColonneBooleene(ByVal vNomColonne As String) As DataColumn
        Dim retour As New DataColumn()
        Try
            retour.DefaultValue = False
            retour.DataType = Type.GetType("System.Boolean")
            retour.ColumnName = vNomColonne
            Return retour
        Catch ex As Exception
            Throw New Exception("Une erreur est survenue dans la méthode " + New StackFrame().GetMethod.Name + vbCrLf + "L'erreur est :" + ex.Message)
        End Try
    End Function

J'aimerais qu'il n'y ait que 2 états...

Merci!

J'ai déjà eu ce problème.

Dans un DGV j'enregistrais les valeurs, mais un checkbox non cliqué enregistrait rien, donc à la lecture de mes fichiers enregistrés j'Avais une erreur.

Code:

1
2
3
4
5
6
7
                                    'Si le controle est bool, on s'assure qu'un état 1/0 est défini
                                    'Sinon il y a probleme à l'ouverture d'un bool qui est "nothing"
                                    If Control.CurrentCell.ValueType.Name = "Boolean" Then
                                        If Control.CurrentCell.Value = Nothing Then
                                            Control.CurrentCell.Value = False
                                        End If
                                    End If

J'espère que ça t'aide

15/07/2008, 16h00
phfle1

Pas pour l'enregistrement

Merci, mais mon problème est plutôt d'ordre "Interfacique", l'usager peut choisir de cocher, de ne pas cocher ou de griser le checkbox.
15/07/2008, 16h17
Faladin

Pourquoi le laisser choisir alors de mettre l'état indéterminé si tu ne veux pas qu'il le fasse!!

En mode desing, sur ton checkbox, tu as l'option 2 ou 3 state...
15/07/2008, 21h11
phfle1

Ce n'est pas un checkbox

Salut,

C'est un "checkbox", mais pas un vrai "checkbox". C'est une colonne de type booléen, ça fait en sorte que l'interface resemble à un checkbox. Mais ces checkbox n'ont pas les mêmes priorités.
15/07/2008, 21h26
Faladin

:marteau:

Bon je sais pas trop quoi te dire de plus alors...

alors si on résume tu ne veux pas qu'on ton état indéterminé existe. En créant la colonne tu veux donc que la valeur par défaut soit False. Qu'est ce qui ne fonctionnait pas dans ton premier sub?
16/07/2008, 16h14
phfle1

Cette ligne

Bon matin,

c'est cette ligne qui dit le type de la colonne

Code:

retour.DataType = Type.GetType("System.Boolean")

Le problème c'est que ce type peut être True False ou Indéterminé(grisée)
16/07/2008, 16h35
Faladin

En créant un type Boolean ta colonne peut être à 3 états soit: Vrai, Faux et Indéterminé?

Je croyais que c'était obligatoirement que Vrai et Faux...

Honnêtement je sais pas trop
16/07/2008, 16h46
Faladin

Les colonnes de type checkbox d'un DGV ont la propriété .ThreeState, ce qui ne semble malheureusement pas être le cas avec des colonnes de type DataColumn...

je comprends pas
16/07/2008, 18h36
phfle1

La solution va être migré en VS2005. Je referai mon interface, mais avec un DGV. Ça va règlé le problème.

Merci pour l'aide
16/07/2008, 19h29
Faladin

Ah ben si ça règle le problème! :yaisse2:

Back to 2002

Bon,

après des problèmes de migration vers 2005. On retourne à la solution 2002. Est-ce que quelqu'un sait s'il faut mettre d'autres informations dans le code suivant afin qu'il soit impossible de d'avoir un état null?

Code:

1
2
3
4
5
6
7
8
9
10
Dim retour As New DataColumn()
        Try
            retour.DefaultValue = False
            retour.DataType = Type.GetType("System.Boolean")
            retour.ColumnName = vNomColonne
            retour.AllowDBNull = False
            Return retour
        Catch ex As Exception
            Throw New Exception("Une erreur est survenue dans la méthode " + New StackFrame().GetMethod.Name + vbCrLf + "L'erreur est :" + ex.Message)
        End Try

Merci!

La solution!

Ma colonne 0 est la seule qui n'est pas booléenne

Code:

1
2
3
4
5
6
7
8
9
Dim hti As DataGrid.HitTestInfo = Me.TableAssociationGroupeEtTypeDeGroupe.HitTest(e.X, e.Y)
        Try
            Me.activerBoutonOngletAssociation()
            If hti.Type = DataGrid.HitTestType.Cell AndAlso Not hti.Column = 0 Then
                Me.TableAssociationGroupeEtTypeDeGroupe(hti.Row, hti.Column) = Not CBool(Me.TableAssociationGroupeEtTypeDeGroupe(hti.Row, hti.Column))
            End If
        Catch ex As Exception
            MessageBox.Show(ex.ToString())
        End Try

Bonne journée!