[ecfisa]

Hola Ibidi.

No he usado XE2, pero fijate si este modo te lo resuelve:

Código Delphi [-]
  SetLocaleInfo(LOCALE_USER_DEFAULT, LOCALE_SDECIMAL,  '.'); // ó ','
  DecimalSeparator:= '.'; // ó ','

Saludos