在我的程序中,我有以下代码：
//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,这是不够的,您需要使该字符串可写回的内存.当您将字符串字面值分配给字符串变量时,字符串变量指向只读存储器.