bonjour;
j'ai utilisé une base de donnee (une table de Paradox) avec 3 champs, un champ de type D (Date), et les autres de types T (Time).
j'ai utilisé une variable "som" de type TTime initialisé à 0.
la variable "som" est la somme des durée calculer
merci.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 for (i=0;i<=Table1->FieldCount;i++) { ListBox1->Items->Strings[i]= Table1->FieldByName("Date")-> AsString+" "+Table1->FieldByName("Debut")->AsString+" "+Table1-> FieldByName("Fin")->AsString; som+=(Table1->FieldByName("Fin")->Value)-(Table1->FieldByName("Debut")->Value); Table1->MoveBy(1); } Table1->First(); Edit2->Text=som;
Partager