Как Borland y это удалось?

← →
Gayrus (2002-11-17 13:41) [0]

Решил избавиться от модуля 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;

← →
Reindeer Moss Eater (2002-11-17 13:53) [1]

var function ?????

← →
Sly (2002-11-17 14:15) [2]

Если посмотреть немного выше, то можно увидеть “{$L FFMT.OBJ}”. FloatToText линкуется из FFMT.OBJ.
Исходники лежат в $(DELPHI)\Source\Rtl\Sys\ffmt.asm

← →
Gayrus :( (2002-11-18 03:26) [3]

Я пробовал {$L FFMT.OBJ}, но Delphi его не находит, а как подключить *.asm не понял. :(

← →
Sly (2002-11-18 10:11) [4]

Приблизительно так:
С:\TASM\tasm32.exe -zn -m3 -t -w- -isys ffmt,ffmt.obj
Только для этого нужен Turbo Assembler Version 4.0 or later (TASM32.EXE)

Как Borland y это удалось? Найти похожие ветки