Query1.RequestLive:=True;
Query1.Active:=False;
Query1.SQL.Clear;
Query1.SQL.Add('Select syg1,byg1 From "ydjl.dbf" Where bh="'+sbh+'"');
Query1.Active:=True;
Query1.Edit;
Query1.FieldbyName('syg1').AsString:=Query1.FieldbyName('byg1').AsString;
Query1.FieldbyName('byg1').AsString:=bxd;
Query1.Post;
Query1.Active:=False;
Query1.SQL.Clear;
Query1.SQL.Add('Select syg1,byg1 From "ydjl.dbf" Where bh="'+sbh+'"');
Query1.Active:=True;
Query1.Edit;
Query1.FieldbyName('syg1').AsString:=Query1.FieldbyName('byg1').AsString;
Query1.FieldbyName('byg1').AsString:=bxd;
Query1.Post;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货