Hola
Como dice donald shimoda, te aconsejo que uses
DecimalSeparator para establecer momentáneamente el tipo de separador decimal que quieras usar
Código Delphi
[-]
var
Sep: char;
begin
.....
Sep := DecimalSeparator;
try
DecimalSeparator := '.';
finally
DecimalSeparator := Sep;
end;