with Table do begin FieldByName("zd1").AsString = FieldByName("zd2").AsString; //赋值 FieldByName("zd3").AsString = ""; //清空 FieldByName("zd4").AsString = "";
end;
或者直接用SQL语句Update,方法很多的
如果采用ADO的,方法和楼上的一样的,也可以直接采用SQL语句 UPDATE Employees SET LastName = FirstName, Title = '' WHERE (EmployeeID = '1')采用的是SQL自带的EMPLOYEES表
begin
FieldByName("zd1").AsString = FieldByName("zd2").AsString; //赋值 FieldByName("zd3").AsString = ""; //清空
FieldByName("zd4").AsString = "";
end;
UPDATE Employees
SET LastName = FirstName, Title = ''
WHERE (EmployeeID = '1')采用的是SQL自带的EMPLOYEES表