能解决问题者有分: 如何解决给字段付值或将字段值导出的繁琐性!!!!!!!

Question

比如,我们将字段导出时,可能使用以下代码: while not ADOQuery1.Eof do
    begin
      with RL do {如有变动需修改}
      begin
        RL.id:=         FieldByName('编号').AsString;
        RL.street:=     FieldByName('街道办事处').AsString;
        RL.name:=       FieldByName('姓名').AsString;
        RL.sex:=        FieldByName('性别').AsString;
        RL.birth:=      FieldByName('出生年月').AsString;
        RL.shenfen:=    FieldByName('身份证号').AsString;
        RL.is4050:=     FieldByName('是否4050人员').AsString;
        RL.jw:=         FieldByName('参加工作时间').AsString;
      end;
也就是说,如何将表的一条记录,简便的付给一个记录类型变量?????????????????

Answer 1

把Parameters.FieldByName('编号').AsString改成Parameters.FieldByName('编号').Value
看行不行

Answer 2

如不考虑效率问题,把fieldbyname改为fieldvalue['字段名']就行了