format 'edit.text'Résolu

Question

Bonjour tt le monde,
j'ai un petit souci, quand je tape un chiffre dans une edit, je veux qu il soit enregistré automatiquement  sous le format (001, 002,....,099,100,...,999).
je veux pas un code pour incrementer ce chiffre apres l'ajout d'un nouveau enregistrement, mais tout simplement à la place de mettre par exemple 1 il le remplace par 001 jusqu'a le chiffre 100.
j'espere que vous avez bien compris ma question.
NB: ce n'est une base de données, c'est un fichier .
merci d'avance! et bonne cnotinuation.:)

japee · Accepted Answer

Je pense que tu devrais utiliser la fonction Format de Delphi.

japee · Answer

Salut,

"je veux pas un code pour incrementer ce chiffre"
La demande n'est pas bien claire : il va bien en falloir un, de code, si tu veux arriver à ce que tu nous décris.
Essaye de préciser.

Bonne prog'

cs_eleve123 · Answer

Re,
je rexplique mon cas, quand je rajoute un nouvel enregistrement , automatiquement mon champ indexé qui s'appelle <code client> s'incriment d'un pas=1, si ce code par exemple est = 5, moi je veux qu'il s'ecrit sous ce format (005), deux 0 avant 5, 
(ou 99 --> 099).
Merci d'avance!

cs_eleve123 · Answer

re ,
j'ai oublié de dire, je suis à l'ecoute de tous les conseils, code ou pas , pas de probleme.
merci!

Cirec · Answer

Salut,


il existe plusieurs possibilités à ton problème :


1 Un MaskEdit

2 Un Controle de saisie dans le TEdit

3 L'utilisation de Format

Var 

  I : Integer;

  S : String;
Begin

  I :=  5;

  S := Format('%.3d', [I]);
 End ;


Et S revoie  '005'

 
@+
Cirec

<hr size ="2" />

cs_eleve123 · Answer

Merci beaucoup
Problème est resolu :)
bonne continuation

Format 'edit.text'

6 réponses

Votre réponse