Delphi/C 中更快的参数传递

Question

我有 2 个部分的应用程序，Delphi 和 C，我有 2 个问题 1.向Delphi传递参数最快的方式是什么？

procedure name(Data: string); // Data is Copied to another location before passing so its slow
procedure name(var Data: string); // Data is Passed by pointer, Faster
procedure name(const Data: string); // unknown

1. 我想在c中通过指针传递参数，我有一个字符数组和一个函数，我不想传递整个数组，剪切它的第一部分并传递其余部分

   void testfunction(char **Data)
   {
       printf("数据 = %d\n", *数据);
       返回;
   }
   
   int main()
   {
       char Data[] = "测试函数";
       测试函数（&&数据[4]）； // 错误
       返回0；
   }
   

谢谢

Answer 1

Delphi 字符串驻留在堆上并且始终通过指针传递。您的第一个按值传递的示例是不正确的。按值传递的字符串不会被复制。仅复制参考。这对于字符串来说是可能的，因为它们具有神奇的写时复制行为。复制按值传递的动态数组。

传递字符串时使用 const 具有最佳性能，因为编译器可以优化引用计数代码。

你的C代码有点混乱。您不需要 char**，而是需要 char*。请记住，C 字符串（char*）只是指向以 null 结尾的内存块的指针。您不需要获取指向 C 字符串的指针，因为它已经是一个指针。

你指的是 %s 而不是 %d 。要传递从第 5 个字符开始的 C 字符串，请编写 Data+4。

 void testfunction(char *Data) {
     printf("Data = %s\n", Data);
 }

int main() {
    char Data[] = "TEST FUNCTION";
    testfunction(Data+4);
    return 0;
}

Answer 2

没有人强调这一众所周知的事实，即自 Delphi 2009 以来，string = UnicodeString 因此将导出为 PWideChar / LPCWSTR 而不是 PChar / LPCSTR。值得注意的是，恕我直言，因为如果您的头脑不够清晰，并且希望您的代码适用于所有版本的 Delphi，则可能会感到困惑。

如果您想修改 C 库中的字符串内容，您也许应该使用WideString Delphi 类型而不是string。 WideString 由 Windows 分配和处理（这是 COM / Ole 字符串），因此您手头有所有相应的 C API 来处理这些 OLESTR 指针。而且这个 WideString 不会受到 Delphi 2009 Unicode 中断的影响（它一直是 Unicode）。

当然，WideString 比 string 慢（出于多种原因，主要原因是 WideString 的堆分配速度慢得多 - 自 Vista 以来变得更好），但恕我直言，这是一种安全的跨语言方式，可以将一些文本数据导出到 Delphi 应用程序和库（在 Windows 世界中）或从 Delphi 应用程序和库（在 Windows 世界中）导出一些文本数据。例如，.Net 世界喜欢封送那些 OLESTR 类型的变量。

Answer 3

我想该代码有点误导。它打算只打印“FUNCTION”吗？如果是这样：

void testfunction(const char *Data)
{
    printf("Data = %s\n", Data);
    return;
}

int main()
{
    char Data[] = "TEST FUNCTION";
    testfunction(Data+4);
    return 0;
}

这会将字符串从数组中的索引 4（包括索引 4）传递到该函数到其余部分。
通过传递 char* 您不会复制该函数的本地堆栈中的字符串。只是指向该内存开头的指针。

Answer 4

我只能回答delphi部分（我的C现在有点生疏，当我当前是最新的时，C指针/数组引用让我头疼）

字符串是指针并且总是被传递引用，因此在传递 -EVER 时不会复制数据。

然而，在传递指针S的情况下

procedure test(s:String);

，如果您在过程测试中修改S，则会生成一个唯一的字符串，并将新的指针分配给S，而不是原始传递的变量。您可以传递字符串文字和字符串表达式/动态修改 (s+'bla bla bla')

procedure test(var s: String);

传递指针 S 的地址，

传递指针 S，如果您在过程测试中修改 S，则会得到一个唯一的字符串生成（如果需要），并将新指针分配给 S，以及原始传递的变量。您永远不能动态传递字符串文字和字符串表达式/修改 (s+'bla bla bla')

procedure test(const s: string);

指针 S 被传递，并且您不能在过程测试期间修改 S。 （好吧，你可以搞砸并愚弄编译器，但这很丑陋且很难做到，并且通常需要大量类型转换）