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

Langage Delphi Discussion :

introduire le temps dans une procedure


Sujet :

Langage Delphi

  1. #1
    Futur Membre du Club
    Profil pro
    Étudiant
    Inscrit en
    Avril 2006
    Messages
    16
    Détails du profil
    Informations personnelles :
    Âge : 38
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Avril 2006
    Messages : 16
    Points : 9
    Points
    9
    Par défaut introduire le temps dans une procedure
    Bonjours, je suis en train de réaliser un jeu du chat et de la souris dans un labyrinthe en mode console dans delphi.

    mon programme marche bien, mais j'ai un problème.

    dans mon labyrinthe il y a des passage secret, dont l'ouverture est subordonné par une dalle.
    je voudrais que la dalle ouvre le passage pendant 30 seconde.

    Ma question est comment faire passer une variable de type booleen a FALSE 30 seconde après qu'elle soit passer a TRUE, et ceci de manière systématique?
    merci d'avance.

  2. #2
    Expert éminent
    Avatar de Swoög
    Profil pro
    Inscrit en
    Janvier 2003
    Messages
    6 045
    Détails du profil
    Informations personnelles :
    Âge : 37
    Localisation : France

    Informations forums :
    Inscription : Janvier 2003
    Messages : 6 045
    Points : 8 339
    Points
    8 339
    Par défaut
    Salut !

    Je pourrais te proposer ceci :

    pour savoir si le passage est ouvert, au lieu de stoquer un booléen, tu stocke l'heure du dernier passage sur la dite dalle, et pour savoir si le passge est ouvert il suffit de voir si t'es dans le bon interval

  3. #3
    Membre régulier
    Inscrit en
    Avril 2005
    Messages
    115
    Détails du profil
    Informations forums :
    Inscription : Avril 2005
    Messages : 115
    Points : 70
    Points
    70
    Par défaut
    Tu insere un composant Ttimer, tu met 30000 millisecondes, et false... Et dans la partie event de ton timer, tu ecrits ce qu'il se passe lorsque le temps est écoulé (Du code permettant la fermeture du passage secret en gros, "passageouvert:=False;")...
    Lorsque l'on marche sur la dalle tu fais Timer1.enabled:=true;
    et hop, 30 s plus tard, le passage secret se referme...

  4. #4
    Futur Membre du Club
    Profil pro
    Étudiant
    Inscrit en
    Avril 2006
    Messages
    16
    Détails du profil
    Informations personnelles :
    Âge : 38
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Avril 2006
    Messages : 16
    Points : 9
    Points
    9
    Par défaut merci swoog
    très bonne idée, suis je bète merci beaucoup pour ta rapidité, bonne soirée

  5. #5
    Expert éminent
    Avatar de Swoög
    Profil pro
    Inscrit en
    Janvier 2003
    Messages
    6 045
    Détails du profil
    Informations personnelles :
    Âge : 37
    Localisation : France

    Informations forums :
    Inscription : Janvier 2003
    Messages : 6 045
    Points : 8 339
    Points
    8 339
    Par défaut
    De rien

    Au fait, dans outils de la discussion, tout en haut, il y a un petit truc pour indiqué que ton problème est résolu

Discussions similaires

  1. Réponses: 6
    Dernier message: 05/08/2004, 13h15
  2. Probleme dans une procedure stockée
    Par malbaladejo dans le forum MS SQL Server
    Réponses: 5
    Dernier message: 07/07/2004, 14h08
  3. [DEBUTANT] Une vue dans une procedure stockee ?
    Par Invité dans le forum MS SQL Server
    Réponses: 2
    Dernier message: 25/02/2004, 11h57
  4. Réponses: 4
    Dernier message: 28/12/2003, 15h50
  5. [TP]code asm dans une procedure
    Par M.Dlb dans le forum Turbo Pascal
    Réponses: 3
    Dernier message: 17/08/2002, 20h43

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