在程序中,我已经定义了变量kskms为integer型,kskm为string;
有如下语句:
  for kskms:=0 to lstkm.Items.Count-1   do
     begin
      if lstkm.Selected[kskms] then  kskm:=kskm+lstkm.items[kskms];
     end;
    adoquery1.FieldByName('科目').Value:=kskm;
    adoquery1.FieldByName('科数').value:=lstkm.SelCount;
    adoquery1.Post;
    end;
整个应用程序运行正确,但在编译时出现如下错误:
[Warning] UnitAddKsmc.pas(61): For loop control variable must be simple local variable请高手指教