Distinction majuscules & minuscules

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Distinction majuscules & minuscules

h4x0kz3r

Je cherche à découper un texte par ses charactères(lignes/mots/espaces/charatères), et récupérer chacun d'eux comme un variable modelable.

Message édité par h4x0kz3r le 23-10-2002 à 11:54:22

Publicité

[SDF]Poire

Vive Grumly

Taille = Len(Numero)
For i = 1 To Taille
Total = Total + CInt(Mid(Numero, i, 1)) //un seul cara
Next i

:hello:

---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:

h4x0kz3r

Il y a une erreur d'execution '13' "inconpatibilite de type"
sur la ligne

Total = Total + CInt(Mid(Numero, i, 1))

apparement ça ne récupére pas correctement le charactère.
Je ne suis pas certain de bien comprendre comment "CInt(Mid(Numero, i, 1))" récupére un charactère d'un texte saisi.

Une autre idée? =P

[SDF]Poire

Vive Grumly

Dim Taille as Integer
Dim Numero as String
Dim C as Char '?

Taille = Len(Numero)
For i = 1 To Taille
C = CChar(Mid(Numero, i, 1)) //un seul cara
Next i

Je C pas si le type Char existe en VB ni même CChar... vu que G pas VB à la maison...
enfin C à toi d'adapter et ya l'aide.....

Message édité par [SDF]Poire le 21-10-2002 à 23:19:46

---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:

Carbon_14

Mid(Numero, i, 1) retourne le caractère de position i de la chaîne Numero. C'est donc un string de 1 caractère.

Cint() donne la valeur entière d'une valeur numérique je crois.

Il faudrait récupérer quoi ? Le caractère chaîne ou le caractère ASCII ?

La chaîne monocaractère : mid$(ChaîneLongue, i%, 1)
La code ascii du caractère : asc(mid$(ChaîneLongue, i%, 1))

Le code ASCII, on peut le mettre dans un tableau car c'est une valeur numérique (0 à 255).

h4x0kz3r

Il sagit de récupérer le "caractère chaîne", ce que désormais, grace a votre précieuse aide, j'arrive a faire =).

Cchar ne marche pas en vb, je ne sais d'ailleur pas ce que c'est sensé faire =p

h4x0kz3r

Nouveau problème,

je veux comparer les caractères récupérés entres eux, jusque là, ca va =P, le problème se pose lorsque je tombe sur une majuscule.
En effect ,a <> A apparement.
Comment puis- faire, pour que justement cette distinction entre majuscules & minuscules ne se face plus?

zbod

Y'a pas un truc qui s'appelle "UCASE" (de mémoire) ?

drasche

UCase et LCase au choix (et aussi UCase$ et LCase$)

---------------
Whichever format the fan may want to listen is fine with us – vinyl, wax cylinders, shellac, 8-track, iPod, cloud storage, cranial implants – just as long as it’s loud and rockin' (Billy Gibbons, ZZ Top)

h4x0kz3r

J'ai pu en effect me servir du Lcase pour tout convertir en minuscules de façon à ce que le pb ne ce pose plus.

Mais ne peut-on pas lui dire de ne plus faire de distinctions entres Majuscules et minuscules?
C'est à dire que si je propose

Code :

If A = a Then
valeur = True
else
valeur = False
End If

il me donne "true" et non pas false.

Convertir toutes les données est assez lourd, est lorsque je les récupère je n'ai plus les majuscules.

Message édité par h4x0kz3r le 23-10-2002 à 15:53:37

Publicité

[SDF]Poire

Vive Grumly

h4x0kz3r a écrit a écrit :

J'ai pu en effect me servir du Lcase pour tout convertir en minuscules de façon à ce que le pb ne ce pose plus.

Mais ne peut-on pas lui dire de ne plus faire de distinctions entres Majuscules et minuscules?
C'est à dire que si je propose

Code :

If A = a Then
valeur = True
else
valeur = False
End If

il me donne "true" et non pas false.

Convertir toutes les données est assez lourd, est lorsque je les récupère je n'ai plus les majuscules.

if Format(MaVar, ">" ) = "MAVALEUR" then
valeur = True
else
valeur = False

---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:

drasche

Char et CChar n'existent pas en VB. L'équivalent est le Byte (qui est non signé par opposition à tous les autres types numériques VB).

[SDF]Poire

Vive Grumly

drasche a écrit a écrit :

Char et CChar n'existent pas en VB. L'équivalent est le Byte (qui est non signé par opposition à tous les autres types numériques VB).

J'avais émis une hypothése n'ayant pas la doc sous la main et travaillant avec bocoup de langages....

PS1 : Delphi à un yype Char et un type Byte

PS2 : là n'est + la question

PS3 : le PS1 n'a rien à voir

PS4 : [:zion]

---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Distinction majuscules & minuscules

Sujets relatifs
Remplacer des majuscules par des minuscules	[C++] Les majuscules comptent pour des prunes ?
compter le nombre de majuscules ds une chaine	[c] Transformer une chaîne de caractères en caractères minuscules
[HTML]&[PHP] obliger un champ à afficher en minuscules...	HTML Saisie en majuscules
[PHP] Majuscules, minuscules....	ne pas différencier majuscules/minuscules sur une page ASP
Plus de sujets relatifs à : Distinction majuscules & minuscules

Page générée en 0.053 secondes