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

Bases de données Delphi Discussion :

delphi:comment afficher dans un label


Sujet :

Bases de données Delphi

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Profil pro
    Inscrit en
    Mai 2005
    Messages
    244
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2005
    Messages : 244
    Par défaut delphi:comment afficher dans un label
    bonjour, j'ai dans ma fiche initialisé 5 mot aléatoire.
    Dans un label a coté, un des mots doit apparaitre mais avec toute les lettre mélangées.
    En faite c'est un jeu et la personne doit retrouvé le mot exactement.
    Comment dois-je faire pour faire arriver un des 5 mot créer dans la fiche dans le label?
    Et avec le code que j'ai fait, il me met tout le temps ANAGRAMME dans le label qui est le nom de la fiche donc ce n'est pas correct.

    Pour mélanger les lettre je verrai cela après, une chose à la fois.



    voici deja une partie de mon code qui concerne cette partie ci:

    procedure TFSuite.FormCreate(Sender: TObject);
    begin
    randomize;
    mot[1]:='scanner';
    mot[2]:='microprocesseur';
    mot[3]:='hertz';
    mot[4]:='claviers';
    mot[5]:='reseau';
    Initialise;
    end;
    procedure TFSuite.Initialise;
    begin
    essaie:=0; // mise à zero du nombre d'essai
    errperm:=1; // nombre d'erreur permise
    hasard:=random(5)+1; //tirage au sort du mot
    end;
    end.

    procedure TFSuite.LBLmotsClick(Sender: TObject);
    begin
    LBLmots.caption:=Fsuite.Caption;
    end;

    merci

  2. #2
    Membre confirmé
    Inscrit en
    Août 2002
    Messages
    65
    Détails du profil
    Informations forums :
    Inscription : Août 2002
    Messages : 65
    Par défaut
    Cette partie de ton code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     procedure TFSuite.LBLmotsClick(Sender: TObject);
    begin
    LBLmots.caption:=Fsuite.Caption;
    end;
     
    merci
    fait ce que tu lui dis de faire. Fsuite est ton formulaire et certainement son caption est ANAGRAMME. Tu as choisi le un mot. Il faut parcontre faire
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
     LBLmots.caption:=mot[hasard].
    N'oublies par de mettre la portée de la variable mot à public

  3. #3
    Membre chevronné Avatar de Bejaia-In
    Inscrit en
    Avril 2006
    Messages
    365
    Détails du profil
    Informations forums :
    Inscription : Avril 2006
    Messages : 365
    Par défaut Anagrame dans Label
    Dans votre code :

    procedure TFSuite.LBLmotsClick(Sender: TObject);
    begin
    LBLmots.caption:=Fsuite.Caption;
    end;

    Fsuite est le composant Fiche que vous avez nommée : "ANAGRAMME";
    suite logique Fsuite.Caption="ANAGRAMME" !

    Solution :

    LBLmots.caption:=mot[hasard];

    les Variables : mot et hasard doivent être globles.

    bonne chance.

  4. #4
    Membre éclairé
    Profil pro
    Inscrit en
    Mai 2005
    Messages
    244
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2005
    Messages : 244
    Par défaut
    ben ca ne fonctionne toujours, pas il me met un caractere spécial et non les mots inventé.
    est ce que le procédé de mon code est correcte pour afficher dans le label un des 5 mots de la fiche?
    il tourne mais il met un mot +- comme ceci: 0|D voir la pièce jointe.

    le mot mele est le mot (donc 1 des 5 mots) qui saffiche automatique et avec les lettre mélangée.
    la proposition est le mot correct que la personne a trouvé.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [XL-2003] Comment afficher dans un label le contenu d'une cellule
    Par deamonRav dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 23/03/2010, 15h30
  2. Réponses: 2
    Dernier message: 10/12/2006, 13h32
  3. Comment afficher dans un formulaire des requetes?
    Par Camdel dans le forum Access
    Réponses: 5
    Dernier message: 28/06/2006, 11h28
  4. [Delphi] Comment écrire dans un fichier texte ?
    Par Mickey.jet dans le forum Débuter
    Réponses: 2
    Dernier message: 01/04/2006, 14h00
  5. Comment afficher dans une combobox les driver des imprimante
    Par lassad dans le forum Composants VCL
    Réponses: 3
    Dernier message: 18/10/2005, 08h56

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