delphi - Delphi 2009 中函数 CreateProcess 的访问冲突

Question

在我的程序中，我有以下代码：

//Code
 if not CreateProcess(nil, NonConstCmd, nil, nil, True, NORMAL_PRIORITY_CLASS or
    CREATE_NEW_PROCESS_GROUP, nil, PCh, SI, P) then
//Code

而且我不断收到访问冲突错误。顺便说一句，在 Delphi7 中，同样的代码可以完美运行。我读过 MSDN，发现 Delphi 中的 CreateProcess 函数可以修改第二个参数。最初它是 const，这就是为什么我创建一个具有相同值的新变量。但它没有任何效果。

问题是：为什么这段代码不起作用？

score 31 · Accepted Answer

问题出在lpCommandLine参数上。我怀疑你正在做这样的事情：

var
  CmdLine: string;
...
CmdLine := 'notepad.exe';
CreateProcess(nil, PChar(CmdLine), ...)

这会导致访问冲突，因为CmdLine不是可写内存。该字符串是存储在只读存储器中的常量字符串。

相反，您可以这样做：

CmdLine := 'notepad.exe';
UniqueString(CmdLine);
CreateProcess(nil, PChar(CmdLine), ...)

这足以CmdLine支持可写内存。

仅仅使保存字符串的变量成为非常量是不够的，您还需要使支持字符串的内存也可写。当您将字符串文字分配给字符串变量时，字符串变量指向只读内存。

score 11 · Accepted Answer

这里解释了为什么 Unicode Delphi 需要不同的方式来调用 CreateProcess：http ://edn.embarcadero.com/article/38693

2 回答 2