Dans mon vieux bouquin de TP 4 (si, si ) :
Val(s : STRING; VAR v; VAR erreur: INTEGER);
Var
EntierLongVar : LONGINT
Erreur : INTEGER
BEGIN
Val(' 63227',EntierLongVar, Erreur);
...
...
avec TP4 il n'y avait pas besoin de supprimer les espaces en début de chaîne.
A+