Query1,Query2:TQuery;
Query1的CachedUpdates为True,RequestLive为True;
Query1中查询几个表的数据(是嵌套查询),在Query1的OnUpdateRecord事件中自己写入更新数据的代码
Query1UpdateRecord(DataSet: TDataSet;
UpdateKind: TUpdateKind; var UpdateAction: TUpdateAction);
begin
s_bzbh:=DataSet.FieldByName('f_bmbm').AsString ; //班组编号
s_desl:=StrToInt(DataSet.FieldByName('f_desl').AsString) ;
With Query2 do
beign
close;
sql.clear;
sql.add('Update______');
ExecSQL;
end;
end;
我在DBRrid上修改了多条数据为什么在更新时只更新一条数据(正好是当前记录)
谢谢!
Query1的CachedUpdates为True,RequestLive为True;
Query1中查询几个表的数据(是嵌套查询),在Query1的OnUpdateRecord事件中自己写入更新数据的代码
Query1UpdateRecord(DataSet: TDataSet;
UpdateKind: TUpdateKind; var UpdateAction: TUpdateAction);
begin
s_bzbh:=DataSet.FieldByName('f_bmbm').AsString ; //班组编号
s_desl:=StrToInt(DataSet.FieldByName('f_desl').AsString) ;
With Query2 do
beign
close;
sql.clear;
sql.add('Update______');
ExecSQL;
end;
end;
我在DBRrid上修改了多条数据为什么在更新时只更新一条数据(正好是当前记录)
谢谢!
Query1UpdateRecord(DataSet: TDataSet;
UpdateKind: TUpdateKind; var UpdateAction: TUpdateAction);
begin
s_bzbh:=DataSet.FieldByName('f_bmbm').AsString ; //班组编号
s_desl:=StrToInt(DataSet.FieldByName('f_desl').AsString) ;
With Query2 do
beign
close;
sql.clear;
sql.add('select * from ______');
Open;
while not eof do
begin
fieldbyname('fieldname').asstring := (....);
post;
next;
end;
end;
end;