Discussion :

[D1@blo]

Groupe : Membres

Bonsoir à tous,

Voilà je commence le pascal et pour ça je fait des programmes simple pour m'adapter facilement mais voilà j'ai une erreur au niveau de l'affichage d'une variable alors voici mon code :

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
16
17
18
19
20
21
22
23
24
 
procedure TForm1.Button1Click(Sender: TObject);
{Déclaration de variables}
 Var Nom, Prenom, Age, Mail : Integer;
begin
        Nom := strtoint(Edit1.Text);
        Prenom := strtoint(Edit2.Text);
        Age := strtoint(Edit3.Text);
        Mail := strtoint(Edit4.Text);
 
        if RadioButton1.Checked = TRUE Then
          Begin
               {Affichage des données personnelles dans ListBox1}
                ListBox1.Items.Add ('Nom :' +  inttostr(Nom) + 'Prenom :' inttostr(Prenom) + 'Age :    '               inttostr(Age) + ' ans' + 'Email :' inttostr(Mail));
          End;
 
       {Sinon}
        else
          Begin
               {Affichage des donnée si c'est une femme}
                ListBox2.Items.Add ('Nom :' +  inttostr(Nom) + 'Prenom :' inttostr(Prenom) + 'Age : '               inttostr(Age) + ' ans' + 'Email :' inttostr(Mail));
          End;{Fin du if}
      end;
  end.

L'erreur est à la ligne ListBox1.Items.Add(.....'Prenom : ' + inttostr(Prenom) .....); et le débogeur affiche l'erreur : attendu mais identification inttistr trouvé

Merci d'avance

[M.Dlb]

Il manque des plus + après 'Prénom:', 'Age:'et 'Email:'.

[D1@blo]

Merci ça marche à moitié car je ne peut pas entrer des chaîne de caractères comme des nom ou prénom mais uniquement des valeurs entier alors que normalement le type Integer est approprié pour les chaîne de caractères? c'est pareil que string?

[CP / M]

Ah non, Integer et string n'ont rien à voir ! String=chaînes de caractères, Integer=nombres entiers sur 16 bits. Mais pourquoi fais-tu StrToInt et puis IntToStr après ?

[ALT]

Et pourquoi avoir déclaré toutes ces variables en type entier & non chaîne de caractère, ce qu'elles sont à l'évidence ?

[D1@blo]

Inttostr et strintto permette de passer d'une chaîne de caractère à un nombre entier et vis versa, alors comment vous auriez fait?