» FibPlus & Delphi XE2

Столкнулся со следующей проблемой:

Имеем:
База FireBird 2.5
FibPlus 6.9.9

TRead: TpFIBDataSet;

поле SUMMA_PROD имеет тип Numeric(15,2)

Набор TRead возвращает значения типа:

SUMMA_PROD
125 000,00
250 120,00
5 500,00

После преобразования в строку методом: TRead.FBN('SUMMA_PROD').AsString
имеем значения:

SUMMA_PROD
125.0
250.12
5.5

При ручной конвертации методом: FloatToStr(TRead.FBN('SUMMA_PROD').AsFloat)
имеем значения:
SUMMA_PROD
125000
250120
5500

Хотелось бы иметь второй результат но используя первый метод.
Куда рыть?

З.Ы. На Delphi 2010 все норм.

6.9.9 ведь официально несовместимы с XE2? может действительно есть особенности.. Если есть исходники фибов - попробуй под отладчиком походить, увидишь где проблема.

Такая же проблема оказалась и с переводом полей типа TDate в String. Формат результата вместо ожидаемого dd.MM.yyyy оказался dd/MM/yyyy, хотя в региональных настройках винды указан первый формат.

Ну и напоследок может и не в тему: почему в XE2 из этой переменной FormatSettings.ShortDateFormat получаю формат dd/MM/yyyy, хотя настроен как dd.MM.yyyy.

Попробуй использовать выражение TRead.FBN('SUMMA_PROD').DisplayText. Оно отобразит значение в соотв. с форматом поля DisplayFormat. Да и от версии Delphi это не зависит

см. TpFIBDataSet.DefaultFormats