Текущий архив: 2003.02.24;
Скачать: CL | DM;
Вниз
Помогите Найти похожие ветки
← →
Влад9876 (2003-02-11 19:32) [0]Привет. Помогите "вырвать" функцию FLoatToStrF из модуля SysUtils. Для чего? Из модуля SysUtils использую только ее, а это лишние кило.
← →
Влад9876 (2003-02-11 19:41) [1]Может, у кого-то есть алтернатива этой функции?
← →
i-C3H7OH © (2003-02-11 19:43) [2]Find declaration -> Ctrl+C, Ctrl+V
← →
Anatoly Podgoretsky © (2003-02-11 19:49) [3]Зачем ее вырезать ей и там не плохо
← →
Романов Р.В. © (2003-02-11 19:50) [4]
> а это лишние кило
А на сколько увеличивается размер приложения при использовании SysUtils?
← →
Влад9876 (2003-02-11 20:21) [5]
> Find declaration -> Ctrl+C, Ctrl+V
Это понятно, но не очень она хочет, а не могу понять почему.
← →
Влад9876 (2003-02-11 20:28) [6]Да там в модуле я толком и понять не могу где она, там только ее заголовок.
← →
Anatoly Podgoretsky © (2003-02-11 20:48) [7]Ну испольщуй тогда STR
← →
Влад9876 (2003-02-11 22:13) [8]
> Ну испольщуй тогда STR
Что за STR?
← →
Anatoly Podgoretsky © (2003-02-11 22:16) [9]F1 есть?
← →
i-C3H7OH © (2003-02-11 23:35) [10]ну извратись как-нибудь. ну поиском пошуруй. str - тоже ничего. а еще лучше забей и купи пивка.
← →
DarkGreen © (2003-02-12 05:17) [11]
function FloatToStrF(Value: Extended; Format: TFloatFormat;
Precision, Digits: Integer): string;
var
Buffer: array[0..63] of Char;
begin
SetString(Result, Buffer, FloatToText(Buffer, Value, fvExtended,
Format, Precision, Digits));
end;
Вот тебе реализация ее, только сомневаюсь я, что ты сможешь ее выдернуть от туда
← →
jack128 © (2003-02-12 08:29) [12]2 DarkGreen
Функция FloatToText тоже объявлена в Sysutils причем несколько
необычным для меня образом
function FloatToText(Buffer: PChar; const Value; ValueType: TFloatValue; Format: TFloatFormat; Precision, Digits: Integer): Integer; external;
Откуда она "external"?
← →
i-C3H7OH © (2003-02-12 10:39) [13]из obj-файла. чуть выше написано какого
Страницы: 1 вся ветка
Текущий архив: 2003.02.24;
Скачать: CL | DM;
Память: 0.49 MB
Время: 0.019 c
