Comment faire un convertisseur de date
cs_loupgaroux
Messages postés
2
Date d'inscription
lundi 17 février 2003
Statut
Membre
Dernière intervention
27 janvier 2007
-
25 janv. 2007 à 23:02
cs_loupgaroux Messages postés 2 Date d'inscription lundi 17 février 2003 Statut Membre Dernière intervention 27 janvier 2007 - 27 janv. 2007 à 21:08
cs_loupgaroux Messages postés 2 Date d'inscription lundi 17 février 2003 Statut Membre Dernière intervention 27 janvier 2007 - 27 janv. 2007 à 21:08
A voir également:
- Comment faire un convertisseur de date
- Date de demain - Forum PHP
- Comparaison date sql - Forum SQL
- Date de c - Forum C
- Convertisseur timestamp ✓ - Forum Visual Basic
- Convertisseur pixel cm - Forum VB.NET
3 réponses
JulioDelphi
Messages postés
2226
Date d'inscription
dimanche 5 octobre 2003
Statut
Membre
Dernière intervention
18 novembre 2010
14
25 janv. 2007 à 23:18
25 janv. 2007 à 23:18
ThWilliam
Messages postés
418
Date d'inscription
mardi 3 janvier 2006
Statut
Membre
Dernière intervention
26 novembre 2013
4
26 janv. 2007 à 11:38
26 janv. 2007 à 11:38
Salut,
function DateToHexa(D: TDateTime): string;
begin
Result:= IntToHex(Trunc(D),2);
end;
Un DateTime est en fait une variable de type double dont la partie fractionnaire est le temps. D'où l'emploi de Trunc pour ne garder que les jours.
Edit1.Text:= DateToHexa(StrToDate('01/01/1900')); --> 02
Pour assigner une valeur à un TDateTime, tu peux très bien faire :
D:= $A8
A +
Thierry
function DateToHexa(D: TDateTime): string;
begin
Result:= IntToHex(Trunc(D),2);
end;
Un DateTime est en fait une variable de type double dont la partie fractionnaire est le temps. D'où l'emploi de Trunc pour ne garder que les jours.
Edit1.Text:= DateToHexa(StrToDate('01/01/1900')); --> 02
Pour assigner une valeur à un TDateTime, tu peux très bien faire :
D:= $A8
A +
Thierry
cs_loupgaroux
Messages postés
2
Date d'inscription
lundi 17 février 2003
Statut
Membre
Dernière intervention
27 janvier 2007
27 janv. 2007 à 21:08
27 janv. 2007 à 21:08
slt merci thierry pour cette infos je vais voir se que je peus faire avec ca @+