![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как Borland y это ;удалось? [D5]
Gayrus © (2002-11-17 13:41:00)Решил избавиться от модуля SysUtils, но кое какие функции мне нужны и я создаю свой модуль содержащие только нужные функции, в частности FloatToText, копирую всё нужное из SysUtil и только из за этой функции ничего не работает, Delphi пишет Unsatisfied forward or external declaration: "FloatToText".
Вот код:
var function FloatToText(Buffer: PChar; const Value; ValueType: TFloatValue; Format: TFloatFormat; Precision, Digits: Integer): Integer;
implementation
function FloatToText(Buffer: PChar; const Value; ValueType: TFloatValue; Format: TFloatFormat; Precision, Digits: Integer): Integer; external;
Sly (2002-11-18 10:11:00) [1]Приблизительно так:
С:\TASM\tasm32.exe -zn -m3 -t -w- -isys ffmt,ffmt.obj
Только для этого нужен Turbo Assembler Version 4.0 or later (TASM32.EXE)
Gayrus :( (2002-11-18 03:26:00) [2]Я пробовал {$L FFMT.OBJ}, но Delphi его не находит, а как подключить *.asm не понял. :(
Sly (2002-11-17 14:15:00) [3]Если посмотреть немного выше, то можно увидеть “{$L FFMT.OBJ}”. FloatToText линкуется из FFMT.OBJ.
Исходники лежат в $(DELPHI)\Source\Rtl\Sys\ffmt.asm
Reindeer Moss Eater (2002-11-17 13:53:00) [4]var function ?????