q:=1;
while q<8 loop
p:=cardfile.copy({q});
k:=p[q];
if k=tablefile[d,1] then
cardfile.cutrow(q);
q:=8;
end;
q:=q+1;
end; 里面的k:=p[q]; 出现赋值语句左右侧不匹配，重点是第一次赋值可以循环，第二次赋值就出现刚说的错误了。