读书人

为什么这里的boolean会报readonly呢?

发布时间: 2012-02-10 21:27:42 作者: rapoo

为什么这里的boolean会报readonly呢?

Delphi(Pascal) code
procedure TForm1.Button1Click(Sender: TObject); var lppe:TProcessEntry32; found:boolean; Hand:THandle; begin       Hand:=CreateToolhelp32Snapshot(TH32CS_SNAPALL,0);      lppe.dwSize := Sizeof(lppe); //初始化       found:=Process32First(Hand,lppe);       while found do       begin          ListBox1.Items.Add(StrPas(lppe.szExeFile));//列出所有进程。          found:=Process32Next(Hand,lppe);       end;  end;


编译的时候IDE报 [DCC Error] DownMov.pas(444): E2129 Cannot assign to a read-only property 位置就是在while found do 和 found:=Process32Next(Hand,lppe);这里


我的IDE是XE SP1

[解决办法]
好像是编译器的bug?
把found改名为bfound呢?

读书人网 >.NET

热点推荐