Discussion :

[Ndev38]

Bonjour,

Je suis en deuxième année Miashs et j'ai un souci avec le trasntypage.
Quand j'essaie par exemple de transtyper une valeur numérique d'une zone édit avec un bouton, celle-ci m'affiche une erreur, est-ce moi qui ne comprends pas bien dans ce cas la nature du souci ou ?

Merci de m'aider.

[M.Dlb]

Bonjour,

Le transtypage n'est pas lié à Lazarus (qui est l'éditeur ou l'IDE) mais au langage.
En Pascal, le transtypage est facilité entre certains types (il faudrait plutôt parler de conversion), par exemple entre les types numériques (dans certains sens uniquement, par exemple d'entiers vers flottants).
Sinon, il faut utiliser des routines de conversion. C'est le cas lorsqu'on veut récupérer le contenu d'une chaîne de caractères (qui représente un nombre) en nombre.
En Pascal "d'origine", il faut utiliser Val.
Avec Lazarus basé sur free Pascal, il vaut mieux utiliser la fonction StrToInt, qui peut lever une exception si le texte ne contient pas de nombre.

En espérant que ça réponde bien à la problématique.

[Ndev38]

Coucou !
Merci pour l'explication aurais-tu juste un petit exemple qui me montrerait comment faire

[Jon Shannow]

Coucou !
Merci pour l'explication aurais tu juste un petit exemple qui me montrerai comment faire

Code :

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

1
2
3
4
5
 
Var
  in_MonEntierSaisie : Integer;
 
in_MonEntierSaisie := StrToInt(Edit1.Text);

Voilà, on récupère dans la variable in_MonEntierSaisie, la valeur saisie dans un TEdit (nommé Edit1). Si la chaine ne correspond pas à une valeur entière valide, la fonction va lever une exception, et in_MonEntierSaisie sera égal à 0.