WDForge - Forum

Le forum des développeurs professionnels WinDev ®

Cloner les volets des champs onglet

Discussion sur WinDev®

Message non lupar R&B » Ven 17 Juin 2016 07:47

Voici un exemple de code WLangage pour régler le clonage des volets des champs onglet.

Dans l'exemple suivant nous avons ONG_TEST un onglet avec un premier volet invisible.
Dans un bouton de clonage, le code suivant va alternativement créer 10 volets et les supprimer.
Son action est réutilisable.

Code: Tout sélectionner
lchp_Champ est un Champ
lc_Libelle est une chaine
SI ONG_Test..Occurrence > 1 ALORS
   // Supprime les volets en remontant et en laissant le premier
   POUR i = ONG_Test..Occurrence _A_ 2 PAS -1
      ChampSupprime(ONG_Test[i])
   FIN   
SINON
   // créé 10 volet par clonage du premier et les rends visibles
   POUR i=1 _A_ 10
      lc_Libellé =  Répète(Caract( 65+(i-1)),i)
      lchp_Champ <-   ChampClone(ONG_Test[1], lc_Libellé)
      lchp_Champ..Visible = Vrai
   FIN
FIN


Dans le code de modification du volet affiché de ONG_Test on aura le code suivant.
Notez le MoiMême qui permet de s'affranchir de l'indice en cours dans l'onglet.
Code: Tout sélectionner
SI MoiMême>1 ALORS
   Trace(MoiMême[MoiMême]..Libellé)
FIN


Ainsi après un premier clic sur le bouton de clonage en cliquant sur le second volet affiché on a bien la trace "BB"
Un nouveau clic sur le bouton, les volets disparaissent...
R&B
Administrateur WDForge
 
Messages: 31
Enregistré le: Jeu 5 Mar 2015 23:21

Retourner vers WinDev

cron