Преобразование float в строку для SQL-сервера

{codecitation class=»brush: pascal; gutter: false;» width=»600px»}

Автор: Сергей

WEB-сайт: http://delphibase.endimus.com

{ **** UBPFD *********** by delphibase.endimus.com ****

>> Преобразование float в строку для SQL-сервера

Преобразование float в строку для SQL-сервера

Зависимости: ???

Автор: Сергей, nfkazak@inbox.ru, Краснодар

Copyright: VIP BANK

Дата: 11 сентября 2002 г.

***************************************************** }

function SQL_Float_String(Value: double): string;

var

OldSeparator: Char;

begin

OldSeparator := DecimalSeparator;

DecimalSeparator := ‘.’;

Result := FloatToStr(Value);

DecimalSeparator := OldSeparator;

end;

{/codecitation}

Добавить комментарий