Una forma es modificar el registro global FormatSettings al inicar tu aplicaciòn para que siempre tome la coma como separador decimal...
asi:
Código Delphi
[-]procedure TForm1.FormCreate(Sender: TObject);
begin
FormatSettings.DecimalSeparator:=',';
end;
Pero debes tener en cuenta que estas almacenando tus datos en archivos en forma de texto (supongo).. asi que siempre deberas tener cuidado como lo lees y como lo guardas...
otra opcion es la de utilizar un registro formatsettings personalizado para hacer tus conversiones.
asumamos por ejemplo que tienes tus datos almacenados con un separador decimal igual a símbolo "Arroba".. los debes leer y trabajarlos en pantalla con el separador decimal de la màquina...
y cuando los guardes los debes guardar en otro archivo que tiene otro separado decimal, por ejemplo el signo "dolar"
Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
Var Texto: String;
Valor: Double;
MyFX: TformatSettings;
begin
Texto:='45@23'; MyFX.DecimalSeparator:='@'; Valor:= StrToFloat(Texto, MyFX);
Edit1.Text:= FloatToStr(Valor);
Valor:= StrToFloat(Edit1.Text); MyFX.DecimalSeparator:='$'; Texto:= FloatToStr(Valor, MyFX);
Edit2.Text:= texto;
end;
Espero haber sido claro