j'ai le code qui permet de générer l'exception Exception class EConvertError with message ''' is not a valid floating point value'.
on compilant j'ai le message d'erreur suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 function CustomStrToFloat(string : variant): double; begin if (string = null) or (Trim(string) = '') then Result := 0 else Result := StrToFloat(string); end;
Code : Sélectionner tout - Visualiser dans une fenêtre à part [Error] UMAJ_Prod.pas(134): Identifier expected but 'STRING' found
Partager