Convertir en delphi le time en integer

Fermé

Stanis - 23 juil. 2008 à 17:15
nEm3sis Messages postés 710 Date d'inscription lundi 20 août 2007 Statut Membre Dernière intervention 9 avril 2012 - 23 juil. 2008 à 20:07

Bonjour, s'il vous plait aidez moi à convertir en delphi le type time en integer.
je veux trouver la durée entre 2heures de type time en entier.
Exemple
var heuredebut:time;
heurefin:time;
durée:integer;

quand je fait l'operation, le système déclare qu'il ya incompatibilité.Alors que je le veux en entier pour pouvoir l'utiliser pour d'autres opérations.
merci de m'aider car c'est très urgent pour moi
que Dieu vous Bénisse.

A voir également:

Convertir en delphi le time en integer
Convertir youtube en mp3 avec audacity - Guide
Telecharger delphi - Télécharger - Langages
Time machine - Guide
Convertir pdf en word excel gratuit - Guide
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur

3 réponses

Réponse 1 / 3

KX Messages postés 16733 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 31 janvier 2024 3 015
23 juil. 2008 à 17:30

Apparement l'unité Dos n'existe pas en Delphi, mais en Pascal avec uses Dos, tu peux avoir accès à GetTime(heure,minute,seconde,centième) et GetDate(année, mois,jour,jourdela semaine) mais tous sont de type word et non integer

Réponse 2 / 3

KX Messages postés 16733 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 31 janvier 2024 3 015
23 juil. 2008 à 20:02

Voici une opération faisable en Delphi, qui devrait te permettre à faire tes calculs :

var Heure,Minute,Seconde,code:integer; Temps:string;
begin
Temps:=TimeToStr(Time);
val(copy(Temps,1,2),Heure,code);
val(copy(Temps,4,2),Minute,code);
val(copy(Temps,7,2),Seconde,code);

--
La confiance n'exclut pas le contrôle

Réponse 3 / 3

nEm3sis Messages postés 710 Date d'inscription lundi 20 août 2007 Statut Membre Dernière intervention 9 avril 2012 113
23 juil. 2008 à 20:07

en delphi 2 heures est inférieur a zéro donc si tu converti en integer tu tombera sur la valeur 0
un peu inutile ...

la valeur de 2 heures en delphi time est 0,0833333333333333
tu trouve cette valeur facilement avec writeln(floattostr(EncodeTime(2, 0, 0, 0)));
(unit sysutils)

et le calcul précis pour 2 heures est
(2*60*60*1000) / (24*60*60*1000) soit 1/12

Discussions similaires

convertir des trimestres en ans mois et jours

transformer un format .cda en mp3

qui connais un convertisseur YouTube MP3

Excel heures en centième

Discussions similaires

Newsletters