Публикация через IIS и валюта

[Lintps]

Добрый день!

Опубликовал приложение на Windows server 2009 через IIS, используя hyperserver.dll, чтобы приложение открывалось по доменному имени в браузере.

Всё работает, но никак не могу победить Currency поля в DBGrid. Там выводятся доллары, вместо нужных мне рублей. В настройках операционной системы локализация выбрана правильная. Если запускать приложение exe файлом и заходить localhost:8077, то валюту показывает верную.

Перепробовал все найденные в интернете варианты:

• запускал appcmd set config /commit:WEBROOT /section:globalization /uiCulture:"ru"
• запускал appcmd set config /commit:WEBROOT /section:globalization /enableClientBasedCulture:true
• редактировал web.config
• добавлял при запуске приложения FormatSettings := TFormatSettings.Create('ru-RU');

Подскажите пожалуйста, кто сталкивался с этим, как победить эту задачку.

[CISCO]

23 hours ago, Lintps said:

Добрый день!

Опубликовал приложение на Windows server 2009 через IIS, используя hyperserver.dll, чтобы приложение открывалось по доменному имени в браузере.

Всё работает, но никак не могу победить Currency поля в DBGrid. Там выводятся доллары, вместо нужных мне рублей. В настройках операционной системы локализация выбрана правильная. Если запускать приложение exe файлом и заходить localhost:8077, то валюту показывает верную.

Перепробовал все найденные в интернете варианты:

• запускал appcmd set config /commit:WEBROOT /section:globalization /uiCulture:"ru"
• запускал appcmd set config /commit:WEBROOT /section:globalization /enableClientBasedCulture:true
• редактировал web.config
• добавлял при запуске приложения FormatSettings := TFormatSettings.Create('ru-RU');

Подскажите пожалуйста, кто сталкивался с этим, как победить эту задачку.

procedure TUniServerModule.UniGUIServerModuleCreate(Sender: TObject);
begin
  MimeTable.AddMimeType('xlsx', 'application/vnd.openxmlformats-officedocument.spreadsheetml.sheet', False);

  // correct place to initialize global FormatSettings parameters
  PFmtSettings.DateSeparator := '/';
  PFmtSettings.CurrencyFormat := 0;
  PFmtSettings.CurrencyString := '$';
  PFmtSettings.ShortDateFormat := 'dd/mm/yyyy';
end;

[Lintps]

Спасибо огромное.

Для русского языка решается задачка такими настройками:

procedure TUniServerModule.UniGUIServerModuleCreate(Sender: TObject);
begin
  //FormatSettings := TFormatSettings.Create('ru-RU');
  MimeTable.AddMimeType('xlsx', 'application/vnd.openxmlformats-officedocument.spreadsheetml.sheet', False);
  // correct place to initialize global FormatSettings parameters
  PFmtSettings.DateSeparator := '/';
  PFmtSettings.CurrencyFormat := 3;
  PFmtSettings.CurrencyString := '₽';
  PFmtSettings.ShortDateFormat := 'dd/mm/yyyy';
  PFmtSettings.DecimalSeparator :=',';
  PFmtSettings.ThousandSeparator:=' ';
end;