Bug avec Edit1.Text[1]=

Version imprimable

17/07/2007, 22h02
devoluti0n

Bug avec Edit1.Text[1]=

Bonjour, j'aurai aimé savoir s'il été possible dans une Tedit, de faire en sorte que pour chaque lettre soit assigné une action,je m'éxplique :

Imaginons que dans mon Tedit, je tappe, Vodka (pris au pif :P)

et bien pour chaque lettre tapé il y ai une action du genre :
if If edit1.caractere1 = 'V' then
Action etc......

Est-ce possible ? :), merci !

Edit, semblerai que ce soit

if Edit1.Text[1]='V' then
....

mais si j'éfface le contenu du TEdit,j'ai une jolie erreur mémoire ...
17/07/2007, 22h10
defluc

Oui, en utilisant les événements OnKeyPress, OnKeyDown ou On KeyUp
17/07/2007, 22h30
devoluti0n

Laquelle de ces techniques est la plus pratique ?
17/07/2007, 22h32
defluc

Vas voir dans l'aide de chaque événement et tu pourras choisir en fonction de ce que tu veux faire
17/07/2007, 22h56
devoluti0n

Je veux que ce soit le contenu qui éxécute une action selon les caracteres, et non pas selon les touches préssées dedans.

Car si je suis la logique et que je tape "machin" pusi que j'éfface le "c" par éxemple, il ne véra pas la différence je pense.

donc j'aimerai un coup de main pour le
Edit1.Text[1] qui fonctionne mais qui fait beuguer si on éfface le contenu du TEdit par la suite :s !

Merci bien cepandant !
17/07/2007, 23h52
defluc

Bon, j'en reviens à

Citation:

si j'éfface le contenu du TEdit,j'ai une jolie erreur mémoire ...

Pour éviter cette erreur ton code devrait être :

Code:

if (Length(Edit1.Tex) > 0) and (Edit1.Text[1]='V') then
18/07/2007, 01h06
devoluti0n

Citation:

Envoyé par defluc

Bon, j'en reviens à
Pour éviter cette erreur ton code devrait être :

Code:

if (Length(Edit1.Tex) > 0) and (Edit1.Text[1]='V') then

Merci ! c'est parfait.

Par contre, est il possible de convertir un caractere en sa valeur décimale ? (comme le ferai une lettre en valeur héxa convertie en décimale)

Je m'éxplique encore :

imaginons que le 1er caractere soit a, est il possible de récuperer sa valeur décimale ? pour pouvoir l'utiliser ailleur...Mais je crois que je m'emporte lol.
Merci déjâ pour tout.

(je vais faire un nouveau post :)) ce sera plus clair; Merci pour tout !
18/07/2007, 02h04
droggo

Kao,

Vu ton autre post, dans lequel je t'ai donné la réponse, et vu celui-ci, avec le non contrôle de la longueur d'une chaîne avant utilisation indexée de ses caractères, il est plus que temps que tu apprennes les bases du langage que tu utilises.

La programmation n'est pas une simple accumulation de trucs et astuces. Si on veut progresser, il faut faire l'effort d'apprendre les bases, sinon on ne va pas bien loin.
18/07/2007, 08h44
Rayek
Citation:

Envoyé par devoluti0n

Merci ! c'est parfait.

Par contre, est il possible de convertir un caractere en sa valeur décimale ? (comme le ferai une lettre en valeur héxa convertie en décimale)

Je m'éxplique encore :

imaginons que le 1er caractere soit a, est il possible de récuperer sa valeur décimale ? pour pouvoir l'utiliser ailleur...Mais je crois que je m'emporte lol.
Merci déjâ pour tout.

(je vais faire un nouveau post :)) ce sera plus clair; Merci pour tout !

Il faut utiliser la fonciton Ord pour avoir la valeur décimal d'un caractère
Code:

1 2 3 4 5 6 7 8 var i : integer; s : String; begin i := Ord('A'); // i contient la valeur numérique du caractère A s := Chr(64); // s contient le caractère de valeur 64 en ascii le @ end;