ASSISTANT À L'ÉDITION DE FONCTIONS IMMEDIATE IF IMBRIQUÉES
Neo.balastik
Messages postés
796
Date d'inscription
jeudi 17 mai 2001
Statut
Membre
Dernière intervention
5 mai 2009
-
25 oct. 2004 à 13:08
RicoNuch Messages postés 140 Date d'inscription mercredi 18 juin 2003 Statut Membre Dernière intervention 16 décembre 2006 - 25 juil. 2006 à 04:05
RicoNuch Messages postés 140 Date d'inscription mercredi 18 juin 2003 Statut Membre Dernière intervention 16 décembre 2006 - 25 juil. 2006 à 04:05
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/27062-assistant-a-l-edition-de-fonctions-immediate-if-imbriquees
https://codes-sources.commentcamarche.net/source/27062-assistant-a-l-edition-de-fonctions-immediate-if-imbriquees
25 juil. 2006 à 04:05
En ce qui concerne un affichage vertical de l'arborescence, je pense que le plus simple serait de créer un deuxième contrôle en le dessinant en fonction d'un affichage vertical, et de réutiliser tout le code du premier contrôle en inversant les traitements des coordonnées horizontales et verticales.
Pour ce qui est de la procédure "Reorganise", j'avais été rebuté par la complexité de l'algorithme à créer pour répartir les contrôles selon plusieurs axes de symétrie. Je n'avais trouvé aucun algorithme pouvant être adapté au cours de mes recherches et toutes les solutions que j'avais envisagées nécessitaient de monter et descendre plusieurs fois l'arborescence en retouchant les emplacements, ce qui n'était décidément pas trop propre.
Pour une utilisation réelle du programme le nombre de niveaux reste limité et le calage vers la gauche de la procédure "Arrange" ne présentait pas de réel inconvénient, j'ai donc laissé tomber malgré mon "souci du détail" ;o) et je suis passé à d'autres projets. Si le coeur t'en dit de reprendre cette source et même de la redéposer après modification, elle est là pour ça.
Il y avait un bug qui pouvait survenir lors du collage d'une grosse fonction dans la fenêtre de texte, à l'affichage de l'arborescence. En effet, l'appel de la fonction GetNewPos devait se faire par le contrôle principal sans quoi une partie de l'arborescence pouvait être négligée et certains contrôles superposés. Dans la procédure "CreateCtl", la fonction "GetNewPos" doit être appelée comme suit :
lngTestPos = MasterCtl.GetNewPos(.Niveau, .Id)
Je viens de me rappeler qu'il y avait des fautes de frappe dans une boîte de dialogue que j'ai oubliées de corriger avant de télécharger le zip. Tant pis, ça sera pour la prochaine fois. Bonne prog', je suis dispo pour de l'aide dans la mesure de mon temps libre.
Amicalement,
Rico
24 juil. 2006 à 18:11
A+
Rico
24 juil. 2006 à 16:00
Bon, je suis parvenu à lancer l'appli (pas Appil), en suivant à la lettre les instructions du 'A lire.txt'.
J'ai recherché dans mes bases Access des IIF, j'ai pris le premier de niveau 5 (quand même) pour faire des tests. Tout semble fonctionner comme attendu.
Mais comme chacun a ses goûts, je voulais modifier l'écart entre les Box IIF et là, il faut rentrer dans le code de l'ocx... Malgré la clarté du code (bravo!), les passages de paramètres entre exe et ocx (et en récursif!) dépassent mon niveau
actuel en VB.
Donc je voulais suggérer les améliorations suivantes à ce source:
- pouvoir choisir l'espacement entre les box,
- pouvoir choisir entre une arboressance verticale ou horizontale,
- finir la procédure Réorganise (qui devrait remplacer/compléter Arrange).
Encore bravo pour ce code, je vais beaucoup apprendre gràce à lui et j'espère apporter moi-même les modifs suggérées.
A+ (c'est pas un nom de langage c'est pour dire à plus tard ;)
JCJ
2 nov. 2004 à 13:51
2 nov. 2004 à 11:34
Bonne programmation
2 nov. 2004 à 01:16
RicoNuch
26 oct. 2004 à 17:56
26 oct. 2004 à 17:39
26 oct. 2004 à 12:16
26 oct. 2004 à 11:54
Pour le VBA il y a aussi une alternative :
If Not Condition1 Then Goto Suite
If Not Condition2 Then Goto Suite
...
C'est beaucoup plus clair ainsi, car il suffit d'énumérer la liste des conditions à satisfaire.
25 oct. 2004 à 20:25
25 oct. 2004 à 17:27
25 oct. 2004 à 14:45
25 oct. 2004 à 13:08
Je jetterai un oeil sur ta source histoire de voir comment tu as construit cela, mais je n'utiliserai jamais la structure du IIF imbriqué dans un projet VB. ILLISIBLE !