麻烦帮看看这个循环错在哪里了，感谢

Question

if listbox1.Items.Count>2 then
begin
     
     for t:=1 to  i-1   do       if shuzu1[t]=shuzu1[i] then
       showmessage('重复的进程名')
       else
        t:=t+1;
     end
     
end;
其中i=listbox1.items.count  。shuzu1 里面放的就是Items 。

Answer 1

for循环中不能为t赋值，你改用其它变量吧

Answer 2

t:=1
while t<=i-1 do
begin
  if shuzu1[t]=shuzu1[i] then
  begin
    showmessage('重复的进程名')
    break;
  end;
  t:=t+1;
end;

Answer 3

if listbox1.Items.Count>2 then
begin
    
  for t:=1 to i-1 do  if shuzu1[t]=shuzu1[i] then
  showmessage('重复的进程名');
  end
    
end;

Answer 4

     for t:=1 to listbox1.Items.Count-2 do
       begin
        if shuzu1[t]=shuzu1[i-1] then
        showmessage('重复的进程名')
        else
        t:=t+1;
     end;
Assignment to FOR-loop variable 't'