TClientDataset1.Filter Error locale

[dison]

Tengo una App Datasnap y estoy teniendo problema con un filtro si la PC tiene el idioma Italy, si el idioma es US todo funciona bien.

If the language of the PC is Italy this filter return 0
var
pricefrom,priceto ouble;
begin
Tclientdataset1.filter := format( ' (pricefrom >= %f and priceto <= %f) ',[1,7000000]);
Tclientdataset1.Filtered:= True;
end;
If the language of the PC is US this filter work fine
var
pricefrom,priceto ouble;
begin
Tclientdataset1.filter := format( ' (pricefrom >= %f and priceto <= %f) ',[1,7000000]);
Tclientdataset1.Filtered:= True;
end;

I'm getting crazy with this, i had tried everything, some help is appreciated