void AffichePropriétés(TreeNode Nod, string mClasse) { switch (mClasse.ToUpper().Trim()) { case "USER": { //Recherche la liste des propriétés de la classe Utilisateur user = new Utilisateur(); foreach (string str in user.ListeAttribut) { string libelle = Acces.Trouver_Attribut_Libelle(str); TreeNode nod = new TreeNode(libelle); nod.Name = Acces.type_UTILISATEUR.Code + "_" + str; Nod.Nodes.Add(nod); } break; } case "PORTEUR": { //Recherche la liste des propriétés de la classe Porteur Prt = new Porteur(); foreach (string str in Prt.ListeAttribut) { string libelle = Acces.Trouver_Attribut_Libelle(str); TreeNode nod = new TreeNode(libelle); nod.Name = Acces.type_PORTEUR.Code + "_" + str; Nod.Nodes.Add(nod); } break; } case "FICHE_COMMANDE": { //Recherche la liste des propriétés de la classe Fiche Fic = new Fiche(); foreach (string str in Fic.ListeAttribut) { string libelle = Acces.Trouver_Attribut_Libelle(str); TreeNode nod = new TreeNode(libelle); nod.Name = Acces.type_FICHE.Code + "_" + str; Nod.Nodes.Add(nod); } break; } case "LIGNE_COMMANDE": { //Recherche la liste des propriétés de la classe Fiche_Ligne fcl = new Fiche_Ligne(); foreach (string str in fcl.ListeAttribut) { string libelle = Acces.Trouver_Attribut_Libelle(str); TreeNode nod = new TreeNode(libelle); nod.Name = Acces.type_LIGNE.Code + "_" + str; Nod.Nodes.Add(nod); } break; } case "DECISION": { /* 'Recherche la liste des propriétés de la classe * Dim cls As New mdl_execution.Decision * For Each P As System.Reflection.PropertyInfo In cls.GetType().GetProperties * Dim Nd As New TreeNode(P.Name) * Nd.Name = "EJ_" & P.Name.ToUpper * Nod.Nodes.Add(Nd) * Next*/ break; } case "ECHEANCE": { /* 'Recherche la liste des propriétés de la classe * Dim cls As New mdl_execution.Echéance * For Each P As System.Reflection.PropertyInfo In cls.GetType().GetProperties * Dim Nd As New TreeNode(P.Name) * Nd.Name = "ECHEANCE_" & P.Name.ToUpper * Nod.Nodes.Add(Nd) * Next*/ break; } case "LIQUIDATION": { /*'Recherche la liste des propriétés de la classe * Dim cls As New mdl_execution.Liquidation * For Each P As System.Reflection.PropertyInfo In cls.GetType().GetProperties * Dim Nd As New TreeNode(P.Name) * Nd.Name = "LIQUIDATION_" & P.Name.ToUpper * Nod.Nodes.Add(Nd) * Next*/ break; } case "ORDRE_PAIEMENT": { /*'Recherche la liste des propriétés de la classe * Dim cls As New mdl_execution.Ordre_Paiement * For Each P As System.Reflection.PropertyInfo In cls.GetType().GetProperties * Dim Nd As New TreeNode(P.Name) * Nd.Name = "ORDRE_PAIEMENT_" & P.Name.ToUpper * Nod.Nodes.Add(Nd) * Next*/ break; } } }