Conversion d'un string en hexa

Bonjour,
Je cherche à faire la conversion d'un entier en hexa avec la methode suivante :

Code:

---

1 2 3 4 5 6 7 8 9

procedure TForm1.Button1Click(Sender: TObject); var s:string; begin s:='94.50'; s:=IntToHex(Round(strtoint(s)*100),4); showmessage(s); end;

---

L'erreur est la suivate : 94.50 n'est pas une valeur en virgule flottante correcte.

Par avance merci pour votre aide.

Tu utilises StrToInt sur s qui est un réel. Il faut que tu utilises StrToFloat.

Ca fait pareil.

C'est bon j'ai trouvé.
Ca venait tout simplement du DécimalSéparator qui était mal défini.