Hola josep.
Aunque no entiendo por que usas ese evento para la acción, estas intentando crear una instacia de
TFormatSettings que está declarado de tipo
record.
Asigna directamente el valor a las variables:
Código Delphi
[-]
begin
DecimalSeparator := '.';
ThousandSeparator := ',';
...
Saludos
