Discussion :

[cre3000]

Si le chiffre est de 0 a 9 j'ai toujours un message d'erreur a cause
du vide après le chiffre.

Code :

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

g:=strtoint(copy(listbox1.items.Strings[1],4,2));

qu'elle serais la solution

merci d'avance

[cre3000]

Le message d'erreur s'affiche lorsque je fais une fonction mathématique

[banban54]

bonjour

aide delphi

Si Index est plus grand que la taille de S, Copy renvoie une chaîne ou un tableau vide.

Code :

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

g:=strtoint(copy(listbox1.items.Strings[1],4,1) + listbox1.items.Strings[1],5,1));

Fonctionne
à +

[cre3000]

ny a t'il pas une fonction en delphi pour que '2 ' devient '2' , a moin que convertie la sortie du listbox avec un '0' avant le chiffre qui deviendrais '02' mais j'aimerais évité cela ....

il y a sûrement une solution !!!!!

merci de votre aide

[Gilbert Geyer]

Salut,

ny a t'il pas une fonction en delphi pour que '2 ' devient '2'

... si s (string) = ' 2 ' avec des caractères espace alors :

Code :

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

s:=Trim(s); renvoie s='2'

Trim : supprime les caractères de contrôle et les espaces se trouvant en début et en fin de chaîne.

A+

[banban54]

Re

si

Code :

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

g:=strtoint(copy(listbox1.items.Strings[1],4,1) + listbox1.items.Strings[1],5,1));

ne vous plait pas, on peut toujours faire:

Code :

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

g := strtoint(copy(listbox1.items.Strings[1],4, length(listbox1.items.Strings[1])-3));

au pire: 'g := le résultat de ma fonction mathématique' ne posera plus aucun problème!

à+

[cre3000]

trimright(s) fonctionne

merci