IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

 Delphi Discussion :

Comparaison des heures


Sujet :

Delphi

  1. #1
    Membre à l'essai
    Inscrit en
    Avril 2008
    Messages
    30
    Détails du profil
    Informations forums :
    Inscription : Avril 2008
    Messages : 30
    Points : 22
    Points
    22
    Par défaut Comparaison des heures
    Bonjour,
    Bon, je crois que je deviens charette....
    Je souhaite lire une valeur dans un stringGrid créé dynamiquement et complété de valeurs hh:mm:ss .
    et ensuite la comparer à deux valeurs.
    Rien à faire ,
    La lectiure des valeurs ok j'ai lu des valeurs affichées dans des labels.
    mais la comparaison ne marche pas...
    Avez vous une idée ??
    Helppppp

    mon bout de code ;
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    var 
    MonHeure,Monheure2,MonHeure3 : TTime;
     
    .................................................................;
    MonHeure:=StrToTime(SG.Cells[2,cpt]);
    MonHeure2:=StrToTime('09:00:00');
    MonHeure3:=StrToTime('09:30:00');
    Label1.Caption:=TimeToStr(MonHeure);// pour vérifier si l'heure est bien prise.
     
    if (MonHeure>MonHeure2) and (MonHeure<MonHeure3) then
    begin
    label4.Caption:='OK';  // grrrr c'est jamais ok alors que des valeurs sont dans le champs de recherche.
    end;
    ...................................................................

  2. #2
    Membre éclairé Avatar de DOLPat®
    Homme Profil pro
    Technicien maintenance
    Inscrit en
    Février 2003
    Messages
    426
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 63
    Localisation : France, Haut Rhin (Alsace)

    Informations professionnelles :
    Activité : Technicien maintenance
    Secteur : Industrie

    Informations forums :
    Inscription : Février 2003
    Messages : 426
    Points : 790
    Points
    790
    Par défaut
    Cela fonctionne chez moi. Mais j'ai essayé au plus simple, sans StringGrid en remplaçant:
    MonHeure:=StrToTime(SG.Cells[2,cpt]);
    par
    Monheure:=StrToTime('9:15:00');

    Donc si problème il y a, c'est du côté de la valeur contenue dans MonHeure qu'il te faut regarder...

  3. #3
    Membre à l'essai
    Inscrit en
    Avril 2008
    Messages
    30
    Détails du profil
    Informations forums :
    Inscription : Avril 2008
    Messages : 30
    Points : 22
    Points
    22
    Par défaut Heures
    Moi j'ai essayé hier soir avec '09:15:59', pas moyen.
    Est-ce sur le format ? IsValidTime me retourne True.

    Il était tard, je fais un nouvel essai cet après midi.

    Merci

  4. #4
    Membre éclairé Avatar de DOLPat®
    Homme Profil pro
    Technicien maintenance
    Inscrit en
    Février 2003
    Messages
    426
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 63
    Localisation : France, Haut Rhin (Alsace)

    Informations professionnelles :
    Activité : Technicien maintenance
    Secteur : Industrie

    Informations forums :
    Inscription : Février 2003
    Messages : 426
    Points : 790
    Points
    790
    Par défaut
    Vraiment très bizarre... Pour moi, 09:15:59 me donne bien OK.

    Essaye de définir tes variables en Extended au lieu de TTime pour voir si cela change quelque chose.

  5. #5
    Expert éminent sénior
    Avatar de ShaiLeTroll
    Homme Profil pro
    Développeur C++\Delphi
    Inscrit en
    Juillet 2006
    Messages
    13 705
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Développeur C++\Delphi
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Juillet 2006
    Messages : 13 705
    Points : 25 575
    Points
    25 575
    Par défaut
    je te conseille pour des raisons de lisibilité, de transformer :
    if (MonHeure>MonHeure2) and (MonHeure<MonHeure3) then,
    en :
    if (MonHeure2 < MonHeure) and (MonHeure < MonHeure3) then,
    ou encore en :
    if TimeInRange(MonHeure, MonHeure2, MonHeure3) then.

    Vérifie aussi que la partie entière (la date) est bien à zéro !

  6. #6
    Candidat au Club
    Profil pro
    Inscrit en
    Novembre 2008
    Messages
    3
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Novembre 2008
    Messages : 3
    Points : 3
    Points
    3
    Par défaut label4 ?
    J'ai testé avec un Stringgrid, ça marche.
    Juste une question bête : êtes-vous sûr d'afficher Ok dans le bon Label ?

  7. #7
    Expert éminent sénior
    Avatar de ShaiLeTroll
    Homme Profil pro
    Développeur C++\Delphi
    Inscrit en
    Juillet 2006
    Messages
    13 705
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Développeur C++\Delphi
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Juillet 2006
    Messages : 13 705
    Points : 25 575
    Points
    25 575
    Par défaut
    Le sujet date déjà de deux semaines, on peut espérer qu'un problème aussi trivial soit résolu depuis fort longtemps !

    il est vrai que comme beaucoup Paladyn, n'a pas eu la sympathie d'utiliser le bouton

Discussions similaires

  1. [XL-2003] Comparaison des heures de pause théorie/pratique
    Par willou893 dans le forum Excel
    Réponses: 8
    Dernier message: 11/07/2013, 11h40
  2. Comparaison des heures
    Par Fiona08 dans le forum SQL
    Réponses: 16
    Dernier message: 28/10/2008, 15h53
  3. Comparaison des dates et heures
    Par IcedLand dans le forum Sql Developer
    Réponses: 1
    Dernier message: 21/09/2007, 11h04
  4. [CR] Additionner des heures
    Par sbis dans le forum Formules
    Réponses: 4
    Dernier message: 22/03/2004, 16h34
  5. [TIME] Gestion des heures
    Par Seb7 dans le forum Débuter
    Réponses: 2
    Dernier message: 10/07/2003, 17h28

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo