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

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

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

我不断获得访问冲突错误.
顺便说一下,在Delphi7中,相同的代码完美地工作.
我读过MSDN,发现Delphi中的CreateProcess函数可以修改第二个参数.
最初是const,这就是为什么我创建一个具有相同值的新变量.
但它没有效果.

问题是：为什么这个代码不工作？

问题出在lpCommandLine参数中.我怀疑你在做这样的事情：

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

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

相反,你可以这样做：

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

这足以使CmdLine由可写内存支持.

只要使变量保持字符串非const,这是不够的,您需要使该字符串可写回的内存.当您将字符串字面值分配给字符串变量时,字符串变量指向只读存储器.

相关文章