[ecfisa]

Hola darkbits.

Un modo es mediante el registro de windows:

Código Delphi [-]
...
implementation

uses Registry;

...
begin
  with TRegistry.Create do
  try
    RootKey := HKEY_CURRENT_USER;
    if not OpenKey('\Control Panel\International', False) then
      raise Exception.Create('Error leyendo el registro');
    WriteString('iCountry', '591');
    WriteString('sCountry', 'Bolivia');
    WriteString('sDecimal',',');
    WriteString('sShortTime', 'hh:mm:ss tt');
    WriteString('sCurrency', '$b');
    WriteString('iCurrDigits', '2');
    WriteString('sShortDate', 'dd:MM:yyyy');
  finally
    CloseKey;
    Free;
  end;
end;

Mas datos en la clave "HKEY_CURRENT_USER\Control Panel\International" del registro de windows.

Saludos.