delphi clientdataset判断字段存在是否存在

if dxmx.findfield('BYZD6')<>nil then
    begin
      fm.MePlace.EditValue:=dxMx.fieldByname('BYZD6').Value;
      strCFWZ:='BYZD6';
    end
    else if dxmx.findfield('CFWZ')<>nil then
    begin
      fm.MePlace.EditValue:=dxMx.fieldByname('CFWZ').Value;
      strCFWZ:='CFWZ';
    end
    else
      exit;

猜你喜欢

转载自blog.csdn.net/qin_yaping/article/details/79391248
今日推荐