Discussion :

[Siñal]

plop,

j'aurais besoin de convertir un entier en une chaine mais tout en conservant une resolution de deux

exemple : si int = 1 alors str = '01'
et si int = 12 alors str = '12'

(le nombre ne peut depasser 99)

est ce possible avec une fonction usuelle ou alors je vais devoir en faire une?

merci

[Droïde Système7]

Déjà une idée :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TForm1.Button3Click(Sender: TObject);
var
  iValeur: Integer;
begin
  iValeur := 7;
 
  if iValeur > 99 then
  begin
    beep;
    ShowMessage('Valeur supérieure à 99 !');
    exit;
  end;
 
  ShowMessage(format('Résultat = %.2d',[iValeur]));
end;

@+

[Siñal]

ça marche ;D

je n'ai qu'a taper

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Str = format('%.2d', integer);

par contre impossible de passer un tableau en parametre, je suis obliger d'utiliser des variable intermediare

(je veux formater du texte reçu par un automate pour ensuite l'afficher dans une listbox)

par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

items.add(fomat(array[counter])+'h'+blablabla);

ne fonctionne pas (je surchage format d'apres le compilo)
avec counter en integer et array un tableau d'integer

[sjrd]

Tu as appelé ta variable array ?! Ne fais pas ça. C'est un mot-clef. Je suis déjà étonné que le compilateur t'ait laissé faire ! Même chose pour ta variable qui s'appelle Integer

Après ton dépend comment tu veux que ton tableau soit formaté. Il existe peut-être un moyen élégant, mais il faudrait que tu sois plus précis.

[Siñal]

non non, c'etait juste pour que vous sachiez ce que je met.

mes tableau contiene des integer, il on 13 case de 0 a 12.

Zone1Heure, Zone1Minutes, Zone1Data, etc (4 zone)

l'automate renvoie des integer voila pourquoi et en plus je dois faire quelque operation binaire dessus (plusieur données sont stockées dans un octet pour le tableau data)

une fois les données extraire et mise en forme, je veux les afficher dans ma listbox sous forme de chaine, et que chaque nombre soit representé sur deux chiffre.
car apres, j'ai un bouton programmer qui lui va lire les listbox, et les nombre doivent obligatoirement etre sur deux chiffre sinon les données n'auront plus la meme position dans la chaine

donc cette solution marche mais me fait utiliser deux variable intermediraire par tableau

en meme temps, ce n'est pas trop grave, ça me gene car je suis habitué a la programmation µC, 300 octet de ram disponible et une vitesse d'execution pas tres rapide, la je suis choqué^^ mémoire quazi infinit et vitesse d'execution ultra rapide, c'est genial un PC =D

[mick605]

plop,

j'aurais besoin de convertir un entier en une chaine mais tout en conservant une resolution de deux

exemple : si int = 1 alors str = '01'
et si int = 12 alors str = '12'

(le nombre ne peut depasser 99)

est ce possible avec une fonction usuelle ou alors je vais devoir en faire une?

merci

Je pense avoir une solution pas tres "propre" mais tres efficace et simple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Str := IntToStr(100+Valeur);
Delete(Str,1,1);

Et la ton Str contient ta valeur avec 2 caracteres !!
Je répete c'est pas tres propre ...