FOROS PROFESIONALES
WINDEV
,
WEBDEV
y
WINDEV Mobile
Inicio
|
Mensajes recientes
|
Conéctese...
|
Desconectar
|
Español
Inicio
→
WINDEV (versiones precedentes)
→
Comptage des lignes affichées dans une table hiérarchique mémoire
Comptage des lignes affichées dans une table hiérarchique mémoire
Iniciado por GpEp, 15,jul. 2019 12:18 - 2 respuestas
Conéctese…
GpEp
#1
Miembro registrado
45 mensajes
Publicado el 15,julio 2019 - 12:18
Bonjour à tous
Je veux tout simplement afficher le nombre de lignes déroulées affichées d'une table hiérarchique mémoire.
J'utilise donc la fonction suivante mais le résultat est erroné.
STotalLignes = TableOccurrence(TableHierarchique1,toVisible)
J'ai essayé les options toAffichée, toVisible, et toTotal : elles donnent des valeurs erronées ou le total des lignes chargées dans la table.
J'ai essayé aussi de lire les lignes :
Toutes les lignes sont lues mais à la lecture rien ne différencie les lignes affichées de celles cachées.
Merci pour votre aide
Informar
0
0
midou23175
#2
Miembro registrado
46 mensajes
Popularité : -1 (9 votes)
Publicado el 17,julio 2019 - 14:57
Bonjour,
POUR i
=
1
_A_
TableOccurrence
(
MaTABLEH
)
n
TotLigne_Déroulé
+
=
TableFilsOccurrence
(
MaTABLEH
,i)
FIN
Trace
(
n
TotLigne_Déroulé
)
Mensaje modificado, 17,julio 2019 - 14:57
Informar
0
0
GpEp
#3
Miembro registrado
45 mensajes
Publicado el 17,julio 2019 - 16:30
midou23175 a écrit :
Bonjour,
POUR i=1 _A_ TableOccurrence(MaTABLEH)
nTotLigne_Déroulé+=TableFilsOccurrence(MaTABLEH,i)
FIN
Trace(nTotLigne_Déroulé)
Message modifié, 17 juillet 2019 - 14:57
Bonjour,
Merci pour ta réponse mais elle ne fonctionne pas.
En effet lorsqu'on lit directement les fils on les a toujours tous ( déroulé ou enroulé )
J'ai donc écris la procédure suivante qui fonctionne en utilisant la liste des parents qui contient les noeuds correspondant au fils de la table.
WTotDeroule est un entier = 0
NbT est un entier = ListeParents..Occurrence
WNbDeroule est un tableau de NbT entiers
// on met a zero le tableau
POUR I = 1 À ListeParents..Occurrence
WNbDeroule[I] = 0
FIN
WTypeLigne est un entier
// on verifie le nombre de noeuds déroulés
POUR I = 1 À ListeParents..Occurrence
// -1 taErreur : Trace("Le noeud n'existe pas.")
// 1 taDéroule : Trace("Le noeud est déroulé.")
// 2 taEnroule : Trace("Le noeud est enroulé.")
WTypeNoeud = ListeParents[I]
WTypeLigne = TableEtatElément(TableHierarchique1,WTypeNoeud)
SI WTypeLigne = taDéroule ALORS
WTotDeroule ++
WNbDeroule[I] = I
FIN
FIN
// on cumule les compteurs des noeuds déroulés
WCumulLignes est un entier = 0
POUR I = 1 À ListeParents..Occurrence
SI WNbDeroule[I] > 0
WCumulLignes = WCumulLignes + WCtrParBranche [I]
FIN
FIN
STotalLignes = WCumulLignes
Cette procédure fait la somme des branches déroulées.
S'il y a plus simple à faire je suis preneur.
En tous cas je te remercie pour ton aide
>
Informar
0
0
→ Volver a WINDEV (versiones precedentes)
WINDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV (versiones precedentes)
WEBDEV (versiones precedentes)
WINDEV Mobile (versiones precedentes)
Reports & Queries
Irrelevante
Herramientas
Français
English
Español
Portuguesa
Fermer cette fenêtre
Búsqueda Tipo
Sólo temas
Todos los mensajes
Periodo Buscar
Cualquier fecha
Última hora
Última 24 horas
Última semana
Último mes
Último año
Cancelar
Vista previa del mensaje
Añadiendo una imagen
Importar una imagen desde una URL
Enviar una imagen desde un archivo de su disco
Arrastrar un archivo o click en "Examinar..."
o
Cancelar
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Texto