Vérifier le premier caractère d'un TEdit [Résolu]

Signaler
Messages postés
21
Date d'inscription
lundi 5 juillet 2004
Statut
Membre
Dernière intervention
9 février 2010
-
Messages postés
21
Date d'inscription
lundi 5 juillet 2004
Statut
Membre
Dernière intervention
9 février 2010
-
Bonjour
J'ai une question toute simple, je voudrais vérifier dans un champs texte (TEdit) si le premier caractère correspond bien a un caractère voulu.
Par exemple je veut que ma condition soi vraie si mon premier caractère de mon champ et un S.

Si quelqu'un peut me donner un petit coup de main ^^

Merci

5 réponses

Messages postés
251
Date d'inscription
dimanche 7 décembre 2003
Statut
Membre
Dernière intervention
11 novembre 2016

Bonjour

Hum y a pas eu grosse recherche là :(
Edit1.Text[1] renvoie le premier caractère

CDT
Messages postés
21
Date d'inscription
lundi 5 juillet 2004
Statut
Membre
Dernière intervention
9 février 2010

Si il y a une grosse recherche, j'été parti si le fait de compter le nombre de caractere puis faire un decompte jusqu'a tomber sur le caractere voulu, enfin une machine a gaz... A trop chercher défois on perd son chemin ^^

Merci pour la soluce
Messages postés
4202
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
13 juin 2020
37
Edit1.Text[1] est bon sauf si le Edit1 est vide.

alternative :

if Pos(Edit1.Text, 'S') = 1 then ... ok ...
if Pos(Edit1.Text, 'S) <> 1 then ... pas ok ...

<hr size="2" width="100%" />
http://deefaze.gnomz.com
Messages postés
256
Date d'inscription
mercredi 5 septembre 2007
Statut
Membre
Dernière intervention
6 janvier 2011

Salut tt le monde ;-)

j'ai une petite idée à vous proposer

if copy(Edit1.Text,1,1) = 'S' then ShowMessage('Vrai');

haftari.fouad
Messages postés
21
Date d'inscription
lundi 5 juillet 2004
Statut
Membre
Dernière intervention
9 février 2010

Merci pour vos réponse je vais essayer tout ça demain au boulot :)

Merci encore pour ces réponse aussi rapide