[Delphi] Problème dans un code / N'affiche jamais la variable

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [Delphi] Problème dans un code / N'affiche jamais la variable

Pad

:hello:

J'ai un exo qui est un jeu : le player 1 saisit un mot caché, le player 2 doit le trouver en maxi 3 essais.

Mais, lors de l'execution, j'ai un souci, dans le showmessage de la ligne 21, il ne m'affiche rien. Pourtant, le texte apparait bien :heink: Donc, il y aurait un problème avec ma variable essai, mais lequel ? :??:

Merci pour votre aide !

Code :

Code :

var
essai : string[4];
begin
if key= VK_RETURN
then if compteur <> 3
then begin
if editEssai.text = editMotATrouver.text
then begin
showmessage('Bravo, joueur 2, tu as gagné du ' + inttostr(compteur) + ' coup.');
btnNew.setfocus;
end
else begin
if editMotATrouver.text[1] <> editEssai.text[1]
then essai[1] := '-';
if editMotATrouver.text[2] <> editEssai.text[2]
then essai[2] := '-';
if editMotATrouver.text[3] <> editEssai.text[3]
then essai[3] := '-';
if editMotATrouver.text[4] <> editEssai.text[4]
then essai[4] := '-';
showmessage('Voici les bonnes et mauvaises lettres : ' + essai); // Le problème est ici
end;
compteur := compteur + 1
end
else begin
showmessage('Vous avez perdu ...');
btnNew.setfocus;
end
end;

Message édité par Pad le 16-12-2007 à 11:24:04

Publicité

olivthill

La string i]essai [/i] doit être iniialisé, par exemple, juste après le begin, il devrait y avoir

essai := ' ';

Voici ce squi se passe :

var essai : string[4]; réserve un emplacement de plusieurs octets. Le premier octet contient la longueur de la chaine (je ne sais pas si c'est 4 ou 0 à ce moment-là). Le deuxième octet, le vrai début de la chaine, contient un caractère nul, 0 en binaire.

essai[2] := '-'; met un tiret dans le troisième octet, sans changer le deuxième octet qui reste à nul.

showmessage(essai) affiche le contenu de la variable essai en s'arrêtant quand la longueur de la chaine est atteinte ou quand un zéro binaire est rencontré. Donc l'affichage s'arrête avant d'avoir atteint le tiret.

Pad

:hello:

Il me semblait avoir essayé, mais bon, je modifierais cet aprem quand je serais chez moi

Merci !

Pad

Même en initialisant, ça n'affiche rien

FORUM HardWare.fr

Programmation

Delphi/Pascal

[Delphi] Problème dans un code / N'affiche jamais la variable

Sujets relatifs
Problème de jointure	Page dynamique ne s'affiche pas php/mysql/easyphp
[php] variable contenant un espace	Probleme de variable VB Access
probleme java et tokenizer	[C++] [resolu] Problème de templates
Problème affichage XML dans IE	Petit problème avec mon algo de tri !
problème de connexion oracle 9i
Plus de sujets relatifs à : [Delphi] Problème dans un code / N'affiche jamais la variable

Page générée en 0.048 secondes