工作守则:
function a_function():Integer;cdecl; implementation {$Link 'a.obj'} function a_function():Integer;cdecl;external; end.
function a_function():Integer;cdecl; function b_function();Integer;cdecl; function c_function();Integer;cdecl; implementation {$LINK 'a.obj'} {$LINK 'b.obj'} {$LINK 'c.obj'} function a_function():Integer;cdecl;external; function b_function();Integer;cdecl;external; function c_function();Integer;cdecl;external; end.
解决方法
但是,我怀疑我知道这里发生了什么.我使用相同的方法,但实际上在单元中有超过100个.obj文件.我发现当我添加新的时,我会得到与您相同的链接器错误.我解决这个问题的方法是尝试重新订购我的$LINK指令.我尝试逐个添加新的obj文件,最终我总能解决这个问题.
如果您的C文件完全是独立的,那么您可以将每个文件放在不同的单元中,链接器将处理它.但是,我怀疑是这样,事实上我怀疑,如果它们真的是独立的,那么这个问题就不会发生了.此外,最好将$LINK指令放在一个单元中,这样任何需要提供的RTL功能都只能提供一次和一次(它们需要与$LINK指令出现在同一个单元中).
链接器中的这种奇怪现象存在于Delphi 6中,并且存在于Delphi 2010中.
编辑1:现在已经意识到这个问题可能是由于Delphi使用单通道编译器.我怀疑“缺少外部引用”错误是因为编译器按照它们出现在单元中的顺序处理.obj文件.
假设a.obj出现在b.obj之前,而a.obj则调用b()b.obj中的函数.编译器不知道b()驻留在需要修复函数调用的位置.当我找到时间时,我会尝试测试这个假设是否至少是合理的!
最后,解决问题的另一个简单方法是将a.c,b.c和c.c组合成一个单独的C文件,我相信它会绕过OP的这个问题.
编辑2:我发现另一个Stack Overflow问题涵盖了这个基础:stackoverflow.com/questions/3228127/why-does-the-order-of-linked-object-file-with-l-directive-matter
编辑3:我找到了解决这个问题的另一种真正好方法.每次编译器抱怨
[DCC Error] Unit1.pas(1): E2065 Unsatisfied forward or external declaration: '_a'
procedure _a; external;
如果它是您希望从Delphi调用的例程,那么您显然需要获取参数列表,调用约定等.否则,如果它是外部代码的内部例程,那么您可以忽略参数列表,调用约定等.
据我所知,这是导入两个以循环方式相互引用的对象的唯一方法.我认为以这种方式宣布外部程序类似于做出前瞻性声明.不同之处在于实现是由对象而不是Pascal代码提供的.
我现在能够为我的军械库添加更多工具 – 谢谢你提出这个问题!
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。