Delphi - variables flotantes (pto ó coma)

Necesito saber como puedo hacer para que mis programas al resercionar valores flotantes de una caja de edicion no provoquen error si se usa pto ó coma yá que en algunos sistemas admite el pto y en otros la coma solamente.

Gracias de antemano al que responda. Chaooo..

He puesto un botón, un edit y un label. El procedimiento siguiente coge un número decimal con punto o coma y lo ajusta a lo correcto según el sistema. Luego lo multiplica por dos (para ver que funciona) y lo pone en un label.

procedure TForm1.Button1Click(Sender: TObject);
var
CaracterErroneo: Char;
NuevaCadena: String;
begin
if DECIMALSEPARATOR=',' then
CaracterErroneo:='.'
else
CaracterErroneo:=',';
NuevaCadena:=StringReplace (Edit1.Text, CaracterErroneo, DECIMALSEPARATOR, [rfReplaceAll]);
Label1.Caption:=FloatToStr(2*StrToFloat(NuevaCadena));
end;