Date et heure [Résolu]
guigui265
- Messages postés
- 115
- Date d'inscription
- mercredi 29 novembre 2000
- Statut
- Membre
- Dernière intervention
- 16 avril 2006
- Messages postés
- 39
- Date d'inscription
- dimanche 17 mai 2009
- Statut
- Membre
- Dernière intervention
- 25 mai 2011
A voir également:
- Delphi date du jour
- Delphi incday - Meilleures réponses
- Incday delphi - Meilleures réponses
- Delphi / Pascal : Afficher la date du jour - CodeS SourceS - Guide
- Delphi / Pascal : Afficher la date du jour - CodeS SourceS - Guide
- Date du jour - Codes sources - Visual Basic / VB.NET (Date & Heure)
- Date du jour 2 - Codes sources - Visual Basic / VB.NET (Date & Heure)
- Comparer la date d'entrée à la date du jour ou système - Codes sources - Visual Basic / VB.NET (Trucs & Astuces)
15 réponses
Meilleure réponse
- Messages postés
- 1649
- Date d'inscription
- samedi 10 juillet 2004
- Statut
- Membre
- Dernière intervention
- 25 juillet 2014
salut,
mets un timer sur ta forme et dans l'évènement ontimer
procedure TForm1.Timer1Timer(Sender: TObject);
begin
label1.Caption :=DateTimeToStr(Now);
end;
@+
jlen
mets un timer sur ta forme et dans l'évènement ontimer
procedure TForm1.Timer1Timer(Sender: TObject);
begin
label1.Caption :=DateTimeToStr(Now);
end;
@+
jlen
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
125 internautes nous ont dit merci ce mois-ci
- Messages postés
- 1649
- Date d'inscription
- samedi 10 juillet 2004
- Statut
- Membre
- Dernière intervention
- 25 juillet 2014
precision si tu veux un format d'affichage :
lundi 16 janvier 2006 15-30-20
mets:
procedure TForm1.Timer1Timer(Sender: TObject);
var str:string;
begin
DateTimeToString(str,'dddd mmmm yyyy:hh-mm-ss',now);
label1.Caption := str;
end;
s
@+
jlen
lundi 16 janvier 2006 15-30-20
mets:
procedure TForm1.Timer1Timer(Sender: TObject);
var str:string;
begin
DateTimeToString(str,'dddd mmmm yyyy:hh-mm-ss',now);
label1.Caption := str;
end;
s
@+
jlen
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
125 internautes nous ont dit merci ce mois-ci
- Messages postés
- 1649
- Date d'inscription
- samedi 10 juillet 2004
- Statut
- Membre
- Dernière intervention
- 25 juillet 2014
mille excuses j'en ai oublié un morceau:
procedure TForm1.Timer1Timer(Sender: TObject);
var str:string;
begin
DateTimeToString(str,'dddd d mmmm yyyy:hh-mm-ss',now);
label1.Caption := str;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
var str:string;
begin
DateTimeToString(str,'dddd d mmmm yyyy:hh-mm-ss',now);
label1.Caption := str;
end;
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
125 internautes nous ont dit merci ce mois-ci
- Messages postés
- 1649
- Date d'inscription
- samedi 10 juillet 2004
- Statut
- Membre
- Dernière intervention
- 25 juillet 2014
il n'existe pas de fonction qui te donne cela directement
utilises la fonction daysbetween qui te donne le nombre de jours entre 2 dates
function DaysBetween(const ANow, AThen: TDateTime): Integer;
puis la fonction WeeksBetween qui te donnes le nombre de semaine entiere entre 2 dates
function WeeksBetween(const ANow, AThen: TDateTime): Integer;
et enfin la fonction DayOfWeek qui te donne le jour de la semaine
function DayOfWeek(Date: TDateTime): Integer;
à partir de cela tu peux calculer le nombre de samedi et de dimanche compris entre les 2 dates
@+
jlen
utilises la fonction daysbetween qui te donne le nombre de jours entre 2 dates
function DaysBetween(const ANow, AThen: TDateTime): Integer;
puis la fonction WeeksBetween qui te donnes le nombre de semaine entiere entre 2 dates
function WeeksBetween(const ANow, AThen: TDateTime): Integer;
et enfin la fonction DayOfWeek qui te donne le jour de la semaine
function DayOfWeek(Date: TDateTime): Integer;
à partir de cela tu peux calculer le nombre de samedi et de dimanche compris entre les 2 dates
@+
jlen
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
125 internautes nous ont dit merci ce mois-ci
- Messages postés
- 1649
- Date d'inscription
- samedi 10 juillet 2004
- Statut
- Membre
- Dernière intervention
- 25 juillet 2014
en principe en connaissant le premier jour et le nombre de semaine tu
devrait pouvoir calculer le nombre de jours moins les WE . Pour
l'instant je n'ai pas le temps de le faire mais j'y regarde ce soir.
pour affecter la date du jour à datetimerpicker dans form créate ne
principe il le fait par défaut mais on peut le forcer en faisant :
procedure TForm1.FormCreate(Sender: TObject);
begin
datetimepicker1.Date:=now;
end;
si tu fais datetimepicker1.Date:=now-1; tu as la date de la veille et ainsi de suite
@+
jlen
devrait pouvoir calculer le nombre de jours moins les WE . Pour
l'instant je n'ai pas le temps de le faire mais j'y regarde ce soir.
pour affecter la date du jour à datetimerpicker dans form créate ne
principe il le fait par défaut mais on peut le forcer en faisant :
procedure TForm1.FormCreate(Sender: TObject);
begin
datetimepicker1.Date:=now;
end;
si tu fais datetimepicker1.Date:=now-1; tu as la date de la veille et ainsi de suite
@+
jlen
- Messages postés
- 4278
- Date d'inscription
- samedi 16 octobre 2004
- Statut
- Modérateur
- Dernière intervention
- 2 janvier 2019
pour les dates et weekend, je t'ai mis la version des deux fonction que j'ai créer ici : http://www.delphifr.com/forum.v2.aspx?ID=639709 (version debuggé!)
n'oublis pas de jetter un oeuil a l'aide delphi et a l'unité DateUtils.
ce que tu doit savoir :
Type a connaitre :
TDate, date seule
TTime, heure seule
TDateTime, date et heure
Fonctions a connaitre :
- Date : renvois la date systeme en cours
-Time : renvois l'heure systeme en cours
- GetTickCount : non referencé, cette fonction renvois le nombre de milliseconde ecoulée depuis l'ouverture de session windows. trés utile pour calculer precisement le temps ecoulé d'un temps D a un temps S (benchmark).
GetTickCount se stock dans une variable de type Cardinal.
- CompareDate, CompareTime : comparer des dates ou des heures
- DayOf, MonthOf, YearOf, HoursOf, MinuteOf, SecondOf, MilliSecondOf :
recuperer des elements d'une valeur TDate, TTime ou TDatetime
- DaySpan, MonthSpan, YearSpan, HourSpan, MinuteSpan, SecondSpan, MilliSecondSpan :
calculer le nombre d'elements entre deux date ou heure (elements : jours, mois, années ect...)
les fonction **Span sont differente des fonction **Between
Constante a connaitre :
HoursPerDay, MinsPerHour, SecsPerMin, MSecsPerSec, MinsPerDay, SecsPerDay, MSecsPerDay
egalement les variables globale d'option regionnale.
<hr size="2" width="100%">La theorie c'est quand on sait tout, mais que rien ne fonctionne.
La pratique c'est quand tout fonctionne, mais que personne ne sait pourquoi.
<hr>
n'oublis pas de jetter un oeuil a l'aide delphi et a l'unité DateUtils.
ce que tu doit savoir :
Type a connaitre :
TDate, date seule
TTime, heure seule
TDateTime, date et heure
Fonctions a connaitre :
- Date : renvois la date systeme en cours
-Time : renvois l'heure systeme en cours
- GetTickCount : non referencé, cette fonction renvois le nombre de milliseconde ecoulée depuis l'ouverture de session windows. trés utile pour calculer precisement le temps ecoulé d'un temps D a un temps S (benchmark).
GetTickCount se stock dans une variable de type Cardinal.
- CompareDate, CompareTime : comparer des dates ou des heures
- DayOf, MonthOf, YearOf, HoursOf, MinuteOf, SecondOf, MilliSecondOf :
recuperer des elements d'une valeur TDate, TTime ou TDatetime
- DaySpan, MonthSpan, YearSpan, HourSpan, MinuteSpan, SecondSpan, MilliSecondSpan :
calculer le nombre d'elements entre deux date ou heure (elements : jours, mois, années ect...)
les fonction **Span sont differente des fonction **Between
Constante a connaitre :
HoursPerDay, MinsPerHour, SecsPerMin, MSecsPerSec, MinsPerDay, SecsPerDay, MSecsPerDay
egalement les variables globale d'option regionnale.
<hr size="2" width="100%">La theorie c'est quand on sait tout, mais que rien ne fonctionne.
La pratique c'est quand tout fonctionne, mais que personne ne sait pourquoi.
<hr>
- Messages postés
- 4278
- Date d'inscription
- samedi 16 octobre 2004
- Statut
- Modérateur
- Dernière intervention
- 2 janvier 2019
a j'oubliais aussi :
IncAMonth,procédure
Incrémente les données de date d'un mois.
IncDay,fonction
Renvoie une date décalée d'un certain nombre de jours.
IncHour,fonction
Renvoie une valeur date/heure décalée d'un certain nombre d'heures.
IncMilliSecond,fonction
Renvoie une valeur date/heure décalée d'un certain nombre de millisecondes.
IncMinute,fonction
Renvoie une valeur date/heure décalée d'un certain nombre de minutes.
IncMonth,fonction
Renvoie une date décalée d'un certain nombre de mois.
IncSecond,fonction
Renvoie une valeur date/heure décalée d'un certain nombre de secondes.
toujours utile de le savoir!
<hr size="2" width="100%">La theorie c'est quand on sait tout, mais que rien ne fonctionne.
La pratique c'est quand tout fonctionne, mais que personne ne sait pourquoi.
<hr>
IncAMonth,procédure
Incrémente les données de date d'un mois.
IncDay,fonction
Renvoie une date décalée d'un certain nombre de jours.
IncHour,fonction
Renvoie une valeur date/heure décalée d'un certain nombre d'heures.
IncMilliSecond,fonction
Renvoie une valeur date/heure décalée d'un certain nombre de millisecondes.
IncMinute,fonction
Renvoie une valeur date/heure décalée d'un certain nombre de minutes.
IncMonth,fonction
Renvoie une date décalée d'un certain nombre de mois.
IncSecond,fonction
Renvoie une valeur date/heure décalée d'un certain nombre de secondes.
toujours utile de le savoir!
<hr size="2" width="100%">La theorie c'est quand on sait tout, mais que rien ne fonctionne.
La pratique c'est quand tout fonctionne, mais que personne ne sait pourquoi.
<hr>
- Messages postés
- 39
- Date d'inscription
- dimanche 17 mai 2009
- Statut
- Membre
- Dernière intervention
- 25 mai 2011