| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите
Влад9876 © (2003-02-11 19:32:00)Привет. Помогите "вырвать" функцию FLoatToStrF из модуля SysUtils. Для чего? Из модуля SysUtils использую только ее, а это лишние кило.
i-C3H7OH (2003-02-12 10:39:00) [1]из obj-файла. чуть выше написано какого
jack128 (2003-02-12 08:29:00) [2]2 DarkGreen
Функция FloatToText тоже объявлена в Sysutils причем несколько
необычным для меня образом
function FloatToText(Buffer: PChar; const Value; ValueType: TFloatValue; Format: TFloatFormat; Precision, Digits: Integer): Integer; external;
Откуда она "external"?
DarkGreen (2003-02-12 05:17:00) [3]
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;
Вот тебе реализация ее, только сомневаюсь я, что ты сможешь ее выдернуть от туда
i-C3H7OH (2003-02-11 23:35:00) [4]ну извратись как-нибудь. ну поиском пошуруй. str - тоже ничего. а еще лучше забей и купи пивка.
Anatoly Podgoretsky (2003-02-11 22:16:00) [5]F1 есть?
Влад9876 (2003-02-11 22:13:00) [6]
> Ну испольщуй тогда STR
Что за STR?
Anatoly Podgoretsky (2003-02-11 20:48:00) [7]Ну испольщуй тогда STR
Влад9876 (2003-02-11 20:28:00) [8]Да там в модуле я толком и понять не могу где она, там только ее заголовок.
Влад9876 (2003-02-11 20:21:00) [9]
> Find declaration -> Ctrl+C, Ctrl+V
Это понятно, но не очень она хочет, а не могу понять почему.
Романов Р.В. (2003-02-11 19:50:00) [10]
> а это лишние кило
А на сколько увеличивается размер приложения при использовании SysUtils?
Anatoly Podgoretsky (2003-02-11 19:49:00) [11]Зачем ее вырезать ей и там не плохо
i-C3H7OH (2003-02-11 19:43:00) [12]Find declaration -> Ctrl+C, Ctrl+V
Влад9876 (2003-02-11 19:41:00) [13]Может, у кого-то есть алтернатива этой функции?
| |
