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

Question

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

Answer 1

好像是编译器的bug？
把found改名为bfound呢？

Answer 2

无语，确实是IDE BUG   改了个名就OK了   折腾了我一上午了