Código Delphi [-]procedure TF_Inici.ApplicationMessage(var Msg: TMsg; var Handled: Boolean); begin DecimalSeparator:='.'; ThousandSeparator:=','; end;
procedure TF_Inici.ApplicationMessage(var Msg: TMsg; var Handled: Boolean); begin DecimalSeparator:='.'; ThousandSeparator:=','; end;