Se connecter avec
S'enregistrer | Connectez-vous

delphi: afficher un mot

Dernière réponse : dans Programmation

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 donne un caractère bizare et non le mot faisant partie des 5.


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:=mot[hasard];
end;

merci

Autres pages sur : delphi afficher mot

Lassé par la pub ? Créez un compte
Lassé par la pub ? Créez un compte
Tom's guide dans le monde