前端之家收集整理的这篇文章主要介绍了
delphi – Free Pascal中的函数Copy()，
前端之家小编觉得挺不错的，现在分享给大家，也给大家做个参考。
Delphi允许3个版本的Copy
功能：
function CopyTest(const S: string): string;
begin
Result:= Copy(S,1,5);
Result:= Copy(S,1);
// Result:= Copy(S); // not allowed for strings,allowed for dyn arrays
end;
FreePascal似乎只编译第一个(3-arg)版本;对于其他人我有编译时错误
Error: Wrong number of parameters specified for call to "$fpc_ansistr_copy"
我是否遗漏了一些FPC编译器开关或Free Pascal中没有Copy过载？
‘copy’节点
生成器
代码在
pinline.pas FPC源的inline_copy
函数中.仅对于动态数组,变体1和3有效(在变体3的情况下,
生成将第二和第三参数传递给fpc_dynarray_copy的
代码).对于所有其他情况(ansi字符串,宽字符串,unicode字符串,char(*)和短字符串),需要3个参数(编译器
生成对其中一个复制
函数的
调用(例如astrings.pas中的fpc_ansistr_copy),而不检查参数,因为被
调用的
函数没有重载或默认参数,需要完全匹配参数).没有涉及开关/指令.
(*)这个有点奇怪,它返回自身或”的短串.
原文链接：https://www.f2er.com/delphi/101283.html
