请问这句循环语句我因该怎么写

Question

for y:=2 to qxfp.ComponentCount do
            if dm.ry1.FieldValues['qx+y-)']='1' then
               begin
            if qxfp.components[y-1] is Tcheckbox then
               ((qxfp.components[y-1]) as Tcheckbox).Checked:=true;
            end;
       end;
循环里的dm.ry1.FieldValues['qx+y-1]='1'这么写，是不对的，请问我该怎么办，还有在这个qxfp里除了checkbox,还有edit，请问我这么写循环队吗，如果不对我因该怎么改过来，谢谢

Answer 1

if dm.ry1.Fieldbyname['qx+y-)']='1' then
....

Answer 2

for y:=2 to qxfp.ComponentCount do
begin
  if dm.ry1.FieldValues['qx+y']='1' then
  begin
    if qxfp.components[y-1] is Tcheckbox then
    ((qxfp.components[y-1]) as Tcheckbox).Checked:=true;
    if qxfp.components[y-1] is Tedit then
     ......
  end;
end

Answer 3

知道字段名就用:Fieldbyname
知道第几个字段Fields[i]

Answer 4

sxwsg(sg) 老兄
可是这个'qx+y'程序还是找不到阿，又没有别的办法