[请求]这种如何玩

zykj

Var
zd1:float;
begin
  zd1:=1.3;
        for i:=1 to 24 do
              begin
                  str24z:='D'+sysutils.inttostr(i);
                  strzd:= 'zd'+sysutils.inttostr(i);
                 aa.dataset.FieldByName(str24z).AsString:=strzd;
              end;
end;

aa.dataset.FieldByName(str24z).AsString:=strzd;
我希望是
aa.dataset.FieldByName(str24z).AsString:=zd1;
zd1=1.3
才是我想要的

SMP

这个一般用数组的方式解决。