FORUM WINDEV

Bonsoir à tous,

Voila mon problème,j'ai pris le code de Samifred sur le total des "heures dans une colonne table"cela marche très bien mais lorsque je passe la table mémoire en fichier cela ne marche plus ?,car j'ai une fiche qui renseigne ma fenêtre table cela est peut-être le problème et le deuxième problème ... oui il y en a 2, si ma table est de 15 lignes il ne cumul plus les lignes cachées? sachant que le résultat est dans un champ saisie.

Merci encore pour les réponses.

stef
(Piètre débutant depuis 150 ans)

Que la table soit fichier ou mémoire le code fonctionne la même chose....
Il faut simplement faire appel à la procédure après chaque modification dans la table.

TableAffiche(Table)
TotalHeures()

Code: Tout sélectionner

PROCEDURE TotalHeures()
LOCAL
   h,i,th,tm sont des entiers

POUR i=1 A TableOccurrence(Table)
   h=h+HeureVersEntier(Table[i][n])  // [n] étant le N° de la colonne à calculer
FIN
th=PartieEntière(h/360000)
tm=h modulo 360000/6000
SELON tm
   CAS <10 :
      Total_Heure=th+":0"+tm
   AUTRE CAS :
      Total_Heure=th+":"+tm     // <Total_Heure> étant le résultat
FIN

Merci Samifred,

Bon evidement cela ne fonctionne pas chez moi.

voila le code de ma fenêtre:

h,i,th,tm sont des entiers

POUR i =1 A TableOccurrence(Table)
h=h+HeureVersEntier(Table.COPILOTEH[i][9]) // Heure étant la colonne à calculer
FIN
th=PartieEntière(h/360000)
tm=h modulo 360000/6000

SELON tm
CAS <10 :
Total_Heure=th+":0"+tm
AUTRE CAS :
Total_Heure=th+":"+tm // <Total_Heure> étant le résultat
FIN

TableAffiche(Table)
TotalHeures()

je ne suis pas sur que le n° entre[] soit bon..sachant que le code est dans linitialisation de Table _Carnet et que dans la table j'ai 3 colonnes à calculer avec trois champs de saisies.


merci encore,j'espère ne pas vous souler avec ma question de débutant.

[/quote]

Pourquoi mets-tu ce code dans ta fenêtre ? et où ? dans ta fenêtre...

C'est le code d'une procédure locale <TotalHeures()> que tu appels à chaque affichage de la table.
Sous la table tu as un champ texte nommé <Total_Heures> où le total calculé par la procédure est affiché.

Oui Samifred effectivement j'ai bien mis le code en procedure local et rien d'autre ailleur,seulement si ma table fait par exemple 10 lignes en visuel les autres lignes suivante ne seront pas prise en compte dans mon champ de saisie ?
voila mon code,enfin ton code

PROCEDURE TotalHeures()

h,i,th,tm sont des entiers

POUR i=1 A TableOccurrence(Table)
h=h+HeureVersEntier(Table.COPILOTEH[i]) // [n] étant le N° de la colonne à calculer
FIN
th=PartieEntière(h/360000)
tm=h modulo 360000/6000
SELON tm
CAS <10 :
Total_Heure=th+":0"+tm
AUTRE CAS :
Total_Heure=th+":"+tm // <Total_Heure> étant le résultat
FIN
TableAffiche(Table)
TotalHeures()

merci Samifred

Tu n'as pas compris... tu relances un table affiche et la procédure en fin de procédure aie!! aie!!

Effectivement je suis nul,donc j'ai replacé TableAffiche(Table) et
TotalHeures() dans initialisation Table_Carnet ma fenêtre donc jusque la je crois avoir bon ?

Par contre j'ai pas très bien compris [n]que dois-je mettre ?

et enfin toujour le même problème il additionne uniquement les lignes non cachées,pourquoi ?

merci,stef

Donne moi une adresse mail dans mon MP je t'envoie une fenêtre exemple en 7.5 que tu peux générer en 8.

Samifred un grand merci,

je reprends à zéro je garde votre exemple,je crée un executable comment dois-je faire pour garder les heures déja enregistrées,car à chaque démarrage de l'application le fichier est vide?

merci encore pour votre disponibilité auprès des débutant comme moi

Ce n'est pas une application, c'est simplement une fenêtre exemple. Tu ne peux pas créer un exécutable avec cette fenêtre.
Il faut commencer par créer un projet et une base de données (Fichier) où tu pourras enregistrer les saisies effectuées dans la table ou dans une fiche (formulaire) associée.

Voir Ici : http://www.btsig.org/daigl/windev.php

Oui samifred j'avais bien compris,je l'ai adapté à mon exe et ça marche très bien.
Vraiment merci encore pour ton aide précieuse

stephane