Discussion :

[liverbird]

Salut, mon programme est un programme d'authentification Login Password qui gère l'accès à un logiciel utilisé par 7 utilisateurs. Chaque utilisateurs doit rentrer son nom et son mot de passe pour y accéder. les données des utilisateurs sont stockées dans une base de données sous Access. Notre rêve c'est de pouvoir calculer et stocker le temps que chaque utilisateur passe sur sa session. Est ce qu'il faut faire un compteur pour chaque utilisateur? et si c'est le cas comment on fait cela sous C++builder? Merci pour votre aide.

[pottiez]

Tu peut enregistrer la date (avec heure) a la quel tu te connecte puis, lorsque tu te déconnecte, tu calcule le nombre de minute séparrant les deux dates.

[liverbird]

Comment enregister la date et l'heure dès que l'on clique sur "OK" est ce qu'il faut ajouter quelquechose dans le Onclick du bouton "OK" ?

[Furlaz]

Tu peux mettre dans ton OnClick :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
TaVariable=FormatDateTime("DD/MM/YYYY HH:MM",Now());

Comme ca il enregistrera la date actuelle dan TaVariable lorsque tu cliqueras sur le bouton

[liverbird]

cool d'accord
et comment on obtient la durée d'utilisation qu'on se déconnecte? est ce qu'il faut enregister l'heure de la déconnexion et faire la différence avec la précedente?

[Furlaz]

cool d'accord
et comment on obtient la durée d'utilisation qu'on se déconnecte? est ce qu'il faut enregister l'heure de la déconnexion et faire la différence avec la précedente?

C'est exactement ce que je ferai

Ta qu'a prendre une variable TempsDebut et TempsFin
et t'auras t'on temps en faisant TempsDebut - TempsFin

[liverbird]

C'est exactement ce que je ferai

Ta qu'a prendre une variable TempsDebut et TempsFin
et t'auras t'on temps en faisant TempsDebut - TempsFin

et comment les déclarer? en FormatDatetime aussi?

[damienlann]

Ta qu'a prendre une variable TempsDebut et TempsFin
et t'auras t'on temps en faisant TempsDebut - TempsFin

TempsFin-TempsDebut si tu veux pas un résultat négatif.

et comment les déclarer? en FormatDatetime aussi?

je sais pas, des TDate ca peut peut-etre marcher.

FAQ gestion de temps

[Furlaz]

TempsFin-TempsDebut si tu veux pas un résultat négatif.

oui effectivement c'est mieux

et comment les déclarer? en FormatDatetime aussi?

Tu déclare tes TempsDebut et TempsFin en AnsiString
et ca marche sans problème

[damienlann]

Tu déclare tes TempsDebut et TempsFin en AnsiString
et ca marche sans problème

tu dois utiliser DateToStr() alors...
Une soustraction d'Ansistring ca marche??

[liverbird]

oui effectivement c'est mieux


Tu déclare tes TempsDebut et TempsFin en AnsiString
et ca marche sans problème

Merci les gars j'essaie ça

[Furlaz]

tu dois utiliser DateToStr() alors...
Une soustraction d'Ansistring ca marche??

C'est vrai qu'une soustraction de AnsiString ne doit pas etre tres efficace je réfléchi pas beaucoup en cette fin de journée

[damienlann]

C'est vrai qu'une soustraction de AnsiString ne doit pas etre tres efficace je réfléchi pas beaucoup en cette fin de journée

je sais pas c'était juste une question mais ca me semble fort louche.

par contre on peut peut-etre faire une soustraction de TDate.

[Sunchaser]

je sais pas c'était juste une question mais ca me semble fort louche.

par contre on peut peut-etre faire une soustraction de TDate.

C'est clair, ya pleins de trucs a faire avec les objects de type TDateTime...voir toutes les fonctions de type MinutesBetween et cie (ce n'est qu'un exemple..) issues des 'routines Date/Heure' ...

CheckSqlTimeStamp

Vérifie si une valeur TSQLTimeStamp représente une date et une heure valides.

CompareDate

Indique la relation entre les parties date de deux valeurs TDateTime.

CompareDateTime

Indique la relation entre deux valeurs TDateTime.

CompareTime

Indique la relation entre les parties heure de deux valeurs TDateTime.

CurrentYear

Renvoie l'année en cours.

Date

Renvoie la date en cours.

DateDelta, constante

Indique la différence entre les valeurs TDateTime et TTimeStamp.

DateOf

Enlève la partie heure d'une valeur TDateTime.

DateTimeToFileDate

Convertit un objet TDateTime en marque horaire OS.

DateTimeToSQLTimeStamp

Convertit une valeur TDateTime en valeur TSQLTimeStamp.

DateTimeToStr

Convertit une variable TDateTime en chaîne AnsiString.

DateTimeToString

Convertit un objet TDateTime en chaîne AnsiString formatée.

DateTimeToSystemTime

Convertit un objet TDateTime dans le type _SYSTEMTIME de l'API Win32.

DateTimeToTimeStamp

Convertit un objet TDateTime dans la structure TTimeStamp correspondante.

DateToStr

Convertit un objet TDateTime en objet AnsiString.

Jour de la semaine, constantes

Fournit des constantes symboliques pour les valeurs des jours de la semaine respectant la norme ISO 8601.

DayOf

Renvoie le jour du mois représenté par une valeur TDateTime.

DayOfTheMonth

Renvoie le jour du mois représenté par une valeur TDateTime.

DayOfTheWeek

Renvoie le jour de la semaine représentée par une valeur TDateTime.

DayOfTheYear

Renvoie le nombre de jours compris entre une valeur TDateTime spécifiée et le 31 décembre de l'année antérieure.

DayOfWeek

Renvoie le jour de la semaine d'une date spécifiée.

DaysBetween

Renvoie le nombre de jours entiers séparant deux valeurs TDateTime spécifiées.

DaysInAMonth

Renvoie le nombre de jours compris dans le mois spécifié d'une année donnée.

DaysInAYear

Renvoie le nombre de jours compris dans une année spécifiée.

DaysInMonth

Renvoie le nombre de jours compris dans le mois d'une valeur TDateTime spécifiée.

DaysInYear

Renvoie le nombre de jours compris dans l'année d'une valeur TDateTime spécifiée.

DaySpan

Renvoie le nombre de jours, y compris les jours non entiers, séparant deux valeurs TDateTime spécifiées.

DecodeDate

Scinde un objet TDateTime en valeurs Année, Mois et Jour.

DecodeDateDay

Renvoie l'année et le jour de l'année d'un objet TDateTime spécifié.

DecodeDateFully

Renvoie les valeurs Année, Mois, Jour et Jour de la semaine d'un objet TDateTime.

DecodeDateMonthWeek

Renvoie l'année, le mois, la semaine du mois et le jour de la semaine d'un objet TDateTime spécifié.

DecodeDateTime

Scinde un objet TDateTime en valeurs Année, Mois, Jour, Heure, Minute, Seconde et Milliseconde.

DecodeDateWeek

Renvoie l'année, la semaine de l'année et le jour de la semaine d'un objet TDateTime spécifié.

DecodeDayOfWeekInMonth

Pour une valeur TDateTime donnée, renvoie l'année, le mois, le jour de la semaine et le compte de ce jour de la semaine dans le mois.

DecodeTime

Scinde un objet TDateTime en heures, minutes, secondes et millisecondes.

EncodeDate; TryEncodeDate

Renvoie un objet TDateTime pour une Année, un Mois et un Jour spécifiés.

EncodeDateDay

Renvoie un objet TDateTime qui représente un jour spécifié de l'année pour une année donnée.

EncodeDateMonthWeek

Renvoie un objet TDateTime qui représente un jour d'une semaine d'un mois et d'une année spécifiés.

EncodeDateTime

Renvoie un objet TDateTime pour une année, un mois, un jour, une heure, une minute, une seconde et une milliseconde spécifiés.

EncodeDateWeek

Renvoie un objet TDateTime qui représente un jour d'une semaine d'une année spécifiés.

EncodeDayOfWeekInMonth

Renvoie un objet TDateTime qui représente un jour d'une semaine d'un mois et d'une année spécifiés.

EncodeTime;TryEncodeTime

Renvoie un objet TDateTime pour les heures, les minutes, les secondes et les millisecondes spécifiées.

EndOfADay

Renvoie un objet TDateTime qui représente la dernière milliseconde d'un jour spécifié.

EndOfAMonth

Renvoie un objet TDateTime qui représente la dernière milliseconde du dernier jour d'un mois spécifié.

EndOfAWeek

Renvoie un objet TDateTime qui représente la dernière milliseconde d'un jour spécifié d'une semaine donnée.

EndOfAYear

Renvoie un objet TDateTime qui représente la dernière milliseconde d'une année spécifiée.

EndOfTheDay

Renvoie un objet TDateTime qui représente la dernière milliseconde du jour identifié par un objet TDateTime spécifié.

EndOfTheMonth

Renvoie un objet TDateTime qui représente la dernière milliseconde du dernier jour du mois identifié par un objet TDateTime spécifié.

EndOfTheWeek

Renvoie un objet TDateTime qui représente la dernière milliseconde du dernier jour de la semaine identifiée par un objet TDateTime spécifié.

EndOfTheYear

Renvoie un objet TDateTime qui représente la dernière milliseconde du dernier jour de l'année identifiée par un objet TDateTime spécifié.

FormatDateTime

Formate un objet TDateTime.

HourOf

Renvoie l'heure du jour représenté par une valeur TDateTime.

HourOfTheDay

Renvoie l'heure du jour représenté par une valeur TDateTime.

HourOfTheMonth

Renvoie le nombre d'heures séparant une valeur TDateTime spécifiée et le premier jour du mois à 00h00mn.

HourOfTheWeek

Renvoie le nombre d'heures séparant une valeur TDateTime spécifiée et le premier jour de la semaine à 00h00mn.

HourOfTheYear

Renvoie le nombre d'heures séparant une valeur TDateTime spécifiée et le premier jour de l'année à 00h00mn.

HoursBetween

Renvoie le nombre d'heures entières séparant deux valeurs TDateTime spécifiées.

HourSpan

Renvoie le nombre d'heures, y compris les heures non entières, séparant deux valeurs TDateTime spécifiées.

IncAMonth

Incrémente les données de date d'un mois.

IncDay

Renvoie une date décalée d'un certain nombre de jours.

IncHour

Renvoie une valeur date/heure décalée d'un certain nombre d'heures.

IncMilliSecond

Renvoie une valeur date/heure décalée d'un certain nombre de millisecondes.

IncMinute

Renvoie une valeur date/heure décalée d'un certain nombre de minutes.

IncMonth

Renvoie une date décalée d'un certain nombre de mois.

IncSecond

Renvoie une valeur date/heure décalée d'un certain nombre de secondes.

IncWeek

Renvoie une date décalée d'un certain nombre de semaines.

IncYear

Renvoie une date décalée d'un certain nombre d'années.

IsInLeapYear

Indique si la valeur TDateTime spécifiée appartient à une année bissextile.

IsLeapYear

Indique si l'année spécifiée est bissextile.

IsPM

Indique si la partie heure d'une valeur TDateTime spécifiée intervient l'après-midi.

IsSameDay

Indique si la valeur TDateTime spécifiée appartient au même jour qu'une date donnée.

IsToday

Indique si la valeur TDateTime spécifiée intervient à la date en cours.

IsValidDate

Indique si une année, un mois et un jour spécifiés représentent une date valide.

IsValidDateDay

Indique si une année et un jour de l'année spécifiés représentent une date valide.

IsValidDateMonthWeek

Indique si une année, un mois, une semaine du mois et un jour de la semaine spécifiés représentent une date valide.

IsValidDateTime

Indique si une année, un mois, un jour, une heure, une minute, une seconde et une milliseconde spécifiés représentent une valeur date/heure valide.

IsValidDateWeek

Indique si une année, une semaine de l'année et un jour de la semaine spécifiés représentent une date valide.

IsValidTime

Indique si une heure, une minute, une seconde et une milliseconde spécifiées représentent une valeur date/heure valide.

MilliSecondOf

Renvoie la milliseconde de la seconde représentée par une valeur TDateTime.

MilliSecondOfTheDay

Renvoie le nombre de millisecondes séparant une valeur TDateTime spécifiée et le début du même jour.

MilliSecondOfTheHour

Renvoie le nombre de millisecondes séparant une valeur TDateTime spécifiée et le début de la même heure.

MilliSecondOfTheMinute

Renvoie le nombre de millisecondes séparant une valeur TDateTime spécifiée et le début de la même minute.

MilliSecondOfTheMonth

Renvoie le nombre de millisecondes séparant une valeur TDateTime spécifiée et le début du mois.

MilliSecondOfTheSecond

Renvoie la milliseconde de la seconde représentée par une valeur TDateTime.

MilliSecondOfTheWeek

Renvoie le nombre de millisecondes séparant une valeur TDateTime spécifiée et 00h00mn00s00cs le premier jour de la semaine.

MilliSecondOfTheYear

Renvoie le nombre de millisecondes séparant une valeur TDateTime spécifiée et 00h00mn00s00cs le premier jour de l'année.

MilliSecondsBetween

Renvoie le nombre de millisecondes séparant deux valeurs TDateTime spécifiées.

MilliSecondSpan

Renvoie le nombre de millisecondes séparant deux valeurs TDateTime spécifiées.

MinuteOf

Renvoie la minute de l'heure représentée par une valeur TDateTime.

MinuteOfTheDay

Renvoie le nombre de minutes séparant une valeur TDateTime spécifiée et 00h00mn le même jour.

MinuteOfTheHour

Renvoie le nombre de minutes séparant une valeur TDateTime spécifiée et le début de la même heure.

MinuteOfTheMonth

Renvoie le nombre de minutes séparant une valeur TDateTime spécifiée et le premier jour du mois à 00h00mn.

MinuteOfTheWeek

Renvoie le nombre de minutes séparant une valeur TDateTime spécifiée et le premier jour de la semaine à 00h00mn.

MinuteOfTheYear

Renvoie le nombre de minutes séparant une valeur TDateTime spécifiée et le premier jour de l'année à 00h00mn.

MinutesBetween

Renvoie le nombre de minutes séparant deux valeurs TDateTime spécifiées.

MinuteSpan

Renvoie le nombre de minutes, y compris les minutes non entières, séparant deux valeurs TDateTime spécifiées.

MonthOf

Renvoie le mois de l'année représentée par une valeur TDateTime.

MonthOfTheYear

Renvoie le mois de l'année représentée par une valeur TDateTime.

MonthsBetween

Renvoie le nombre approximatif de mois séparant deux valeurs TDateTime spécifiées.

MonthSpan

Renvoie le nombre approximatif de mois, y compris les mois non entiers, séparant deux valeurs TDateTime spécifiées.

MSecsToTimeStamp

Convertit un nombre spécifié de millisecondes en une valeur TTimeStamp.

Now

Renvoie la date et l'heure système.

NthDayOfWeek

Renvoie l'occurrence du jour de la semaine représenté par une valeur TDateTime.

NullSQLTimeStamp, constante

Représente une valeur NULL TSQLTimeStamp.

RecodeDate

Remplace la partie date d'une valeur TDateTime spécifiée.

RecodeDateTime

Remplace de façon sélective les parties d'une valeur TDateTime spécifiée.

RecodeDay

Remplace le jour du mois d'une valeur TDateTime spécifiée.

RecodeHour

Remplace l'heure du jour d'une valeur TDateTime spécifiée.

RecodeMilliSecond

Remplace la milliseconde de la seconde d'une valeur TDateTime spécifiée.

RecodeMinute

Remplace la minute de l'heure d'une valeur TDateTime spécifiée.

RecodeMonth

Remplace le mois de l'année d'une valeur TDateTime spécifiée.

RecodeSecond

Remplace la seconde de la minute d'une valeur TDateTime spécifiée.

RecodeTime

Remplace la partie heure d'une valeur TDateTime spécifiée.

RecodeYear

Remplace l'année d'une valeur TDateTime spécifiée.

ReplaceDate

Remplace la partie date d'une valeur TDateTime par une date spécifiée.

ReplaceTime

Remplace la partie heure d'une valeur TDateTime par une date spécifiée.

SameDate

Indique si deux valeurs TDateTime représentent les mêmes année, mois et jour.

SameDateTime

Indique si deux valeurs TDateTime représentent les mêmes année, mois, jour, heure, minute, seconde et milliseconde.

SameTime

Indique si deux valeurs TDateTime représentent la même heure du jour, en ignorant la partie date.

SecondOf

Renvoie la seconde de la minute représentée par une valeur TDateTime.

SecondOfTheDay

Renvoie le nombre de secondes séparant une valeur TDateTime spécifiée et 00h00mn00s le même jour.

SecondOfTheHour

Renvoie le nombre de secondes séparant une valeur TDateTime spécifiée et le début de la même heure.

SecondOfTheMinute

Renvoie le nombre de secondes séparant une valeur TDateTime spécifiée et le début de la même minute.

SecondOfTheMonth

Renvoie le nombre de secondes séparant une valeur TDateTime spécifiée et le premier jour du mois à 00h00mn00s.

SecondOfTheWeek

Renvoie le nombre de secondes séparant une valeur TDateTime spécifiée et le premier jour de la semaine à 00h00mn00s.

SecondOfTheYear

Renvoie le nombre de secondes séparant une valeur TDateTime spécifiée et le premier jour de l'année à 00h00mn00s.

SecondsBetween

Renvoie le nombre de secondes séparant deux valeurs TDateTime spécifiées.

SecondSpan

Renvoie le nombre de secondes, y compris les secondes non entières, séparant deux valeurs TDateTime spécifiées.

SQLDayOfWeek

Indique le jour de la semaine quand une valeur TSQLTimeStamp est fournie.

SQLTimeStampToDateTime

Convertit une valeur TSQLTimeStamp en valeur TDateTime.

SQLTimeStampToStr

Convertit une valeur TSQLTimeStamp en chaîne.

StartOfADay

Renvoie un objet TDateTime qui représente 00h00mn00s00cs un jour spécifié.

StartOfAMonth

Renvoie un objet TDateTime qui représente 00h00mn00s00cs le premier jour d'un mois spécifié.

StartOfAWeek

Renvoie un objet TDateTime qui représente le premier moment d'un jour spécifié d'une semaine donnée.

StartOfAYear

Renvoie un objet TDateTime qui représente le premier moment du premier jour d'une année spécifiée.

StartOfTheDay

Renvoie un objet TDateTime qui représente 00h00mn00s00cs le jour identifié par un objet TDateTime spécifié.

StartOfTheMonth

Renvoie un objet TDateTime qui représente 00h00mn00s00cs le premier jour du mois identifié par un objet TDateTime spécifié.

StartOfTheWeek

Renvoie un objet TDateTime qui représente 00h00mn00s00cs le premier jour de la semaine identifiée par un objet TDateTime spécifié.

StartOfTheYear

Renvoie un objet TDateTime qui représente 00h00mn00s00cs le premier jour de l'année identifiée par un objet TDateTime spécifié.

StrToDate

Convertit un objet AnsiString en objet TDateTime.

StrToDateDef

Convertit un objet AnsiString en objet TDateTime, avec renvoi de Default en cas d'erreur.

StrToDateTime

Convertit un objet AnsiString en objet TDateTime.

StrToDateTimeDef

Convertit un objet AnsiString en objet TDateTime, avec renvoi de Default en cas d'erreur.

StrToSQLTimeStamp

Convertit une chaîne en valeur TSQLTimeStamp.

StrToTime

Convertit un objet AnsiString en objet TDateTime.

StrToTimeDef

Convertit un objet AnsiString en objet TDateTime, avec renvoi de Default en cas d'erreur.

SystemTimeToDateTime

Convertit une valeur _SYSTEMTIME en valeur TDateTime.

Time

Renvoie l'heure en cours.

TimeOf

Enlève la partie date d'une valeur TDateTime.

TimeStampToDateTime

Convertit une valeur TTimeStamp en objet TDateTime.

TimeStampToMSecs

Convertit une valeur TTimeStamp en un nombre absolu de millisecondes.

TimeToStr

Renvoie une chaîne AnsiString représentant un objet TDateTime.

Today

Renvoie une valeur TDateTime qui représente la date en cours.

Tomorrow

Renvoie une valeur TDateTime qui représente la jour suivant.

TryEncodeDateDay

Calcule la valeur TDateTime qui représente un jour spécifié de l'année pour une année donnée.

TryEncodeDateMonthWeek

Calcule la valeur TDateTime qui représente un jour d'une semaine d'un mois et d'une année spécifiés.

TryEncodeDateTime

Calcule la valeur TDateTime pour une année, un mois, un jour, une heure, une minute, une seconde et une milliseconde spécifiés.

TryEncodeDateWeek

Calcule la valeur TDateTime qui représente un jour d'une semaine d'une année spécifiés.

TryEncodeDayOfWeekInMonth

Calcule un objet TDateTime qui représente un jour d'une semaine d'un mois et d'une année spécifiés.

TryRecodeDateTime

Remplace de façon sélective les parties d'une valeur TDateTime spécifiée.

TryStrToDate

Convertit un objet AnsiString en objet TDateTime, avec renvoi d'un code de succès booléen.

TryStrToDateTime

Convertit un objet AnsiString en objet TDateTime, avec renvoi d'un code de succès booléen.

TryStrToSQLTimeStamp

Convertit une chaîne en valeur TSQLTimeStamp.

TryStrToTime

Convertit un objet AnsiString en objet TDateTime, avec renvoi de Default en cas d'erreur.

UnixDateDelta, constante

Indique la différence entre les valeurs TDateTime et TIME_T.

WeekOf

Renvoie la semaine de l'année représentée par une valeur TDateTime.

WeekOfTheMonth

Renvoie la semaine du mois représenté par une valeur TDateTime.

WeekOfTheYear

Renvoie la semaine de l'année représentée par une valeur TDateTime.

WeeksBetween

Renvoie le nombre de semaines entières séparant deux valeurs TDateTime spécifiées.

WeeksInAYear

Renvoie le nombre de semaines comprises dans une année spécifiée.

WeeksInYear

Renvoie le nombre de semaines comprises dans l'année d'une valeur TDateTime spécifiée.

WeekSpan

Renvoie le nombre de semaines, y compris les semaines non entières, séparant deux valeurs TDateTime spécifiées.

WithinPastDays

Indique si deux dates sont séparées l'une de l'autre par un nombre de jours inférieur ou égal au nombre spécifié.

WithinPastHours

Indique si deux valeurs date/heure sont séparées l'une de l'autre par un nombre d'heures inférieur ou égal au nombre spécifié.

WithinPastMilliSeconds

Indique si deux valeurs date/heure sont séparées l'une de l'autre par un nombre de millisecondes inférieur ou égal au nombre spécifié.

WithinPastMinutes

Indique si deux valeurs date/heure sont séparées l'une de l'autre par un nombre de minutes inférieur ou égal au nombre spécifié.

WithinPastMonths

Indique si deux valeurs date/heure sont séparées l'une de l'autre par un nombre de mois inférieur ou égal au nombre spécifié.

WithinPastSeconds

Indique si deux valeurs date/heure sont séparées l'une de l'autre par un nombre de secondes inférieur ou égal au nombre spécifié.

WithinPastWeeks

Indique si deux valeurs date/heure sont séparées l'une de l'autre par un nombre de semaines inférieur ou égal au nombre spécifié.

WithinPastYears

Indique si deux valeurs date/heure sont séparées l'une de l'autre par un nombre d'années inférieur ou égal au nombre spécifié.

YearOf

Renvoie l'année représentée par une valeur TDateTime.

YearsBetween

Renvoie le nombre approximatif d'années séparant deux valeurs TDateTime spécifiées.

YearSpan

Renvoie le nombre approximatif d'années, y compris les années non entières, séparant deux valeurs TDateTime spécifiées.

Yesterday

Renvoie une valeur TDateTime qui représente la jour précédent.

[blondelle]

J'ai eut des reponse sur deux sujet equivalent
premier lien
http://www.developpez.net/forums/sho...d.php?t=160469

[Furlaz]

Petite correction donc:

Tu Déclare tes TempsDebut et TempsFin en TDate

Et cette fois ci ca fonctionne j'ai essayé le code suivant pour voir :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TDate DateDebut;
TDate DateFin;
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
DateDebut=FormatDateTime("DD/MM/YYYY HH:MM:SS",Now());
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
DateFin=FormatDateTime("DD/MM/YYYY HH:MM:SS",Now());
Edit1->Text=DateFin-DateDebut;
}
//---------------------------------------------------------------------------

Le bouton 1 prend la date de debut
et quand tu click sur le bouton 2 ca te prend la date de fin
Il fait ensuite la soustraction et l'affiche dans un TEdit

[bakaneko]

je sais pas c'était juste une question mais ca me semble fort louche.

par contre on peut peut-etre faire une soustraction de TDate.

La classe TDateTime possède l'opérateur de soustraction. C'est donc faisable

Soustrait une valeur spécifiée de l'objet TDateTime.

TDateTime __fastcall operator -(const TDateTimeBase& rhs) const;
TDateTime __fastcall operator -(const TDateTime& rhs) const;
TDateTime __fastcall operator -(const double rhs) const;
TDateTime __fastcall operator -(const int rhs) const;

Description

L'opérateur – permet de soustraire la valeur spécifiée par l'opérande rhs de l'objet TDateTime. L'opérande rhs représente le nombre de jours (y compris les jours fractionnés) à soustraire.

[damienlann]

La classe TDateTime possède l'opérateur de soustraction. C'est donc faisable

ouaip j'était en train d'y regardé justement...

[blondelle]

J'ai eut des reponse sur deux sujet equivalent
premier lien
http://www.developpez.net/forums/sho...d.php?t=160469

Deuxieme lien
http://www.developpez.net/forums/sho...d.php?t=160911

[pottiez]

Sinon la soustraction avec les AnsiString c'est possible en castant les AnsiString :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
AnsiSting tempsDebut ;
AnsiString tempsFin ;
(TDateTime)tempsFin - (TDateTime)tempsDebut ;

de plus toute les fonction TDateTime donnée pas Cantrelle peuvent etre utilisé avec des AnsiString a la place des TDateTime.
Voila
A plus