var
CurrPos: TBookMark;
begin
with MasterCDS do begin
if not (State in [dsInsert, dsEdit]) then exit;
Post;
CurrPos := GetBookMark;
^^^^^^^^^^^^^^^^^^^^^^
ApplyUpdates(0);
Try
GotoBookMark(CurrPos);
^^^^^^^^^^^^^^^^^^^^^^
except
raise Exception.Create('fdkdfdk')
end;
end;
MasterCDS.ReadOnly := true;
end;Good luck
CurrPos: TBookMark;
begin
with MasterCDS do begin
if not (State in [dsInsert, dsEdit]) then exit;
Post;
CurrPos := GetBookMark;
^^^^^^^^^^^^^^^^^^^^^^
ApplyUpdates(0);
Try
GotoBookMark(CurrPos);
^^^^^^^^^^^^^^^^^^^^^^
except
raise Exception.Create('fdkdfdk')
end;
end;
MasterCDS.ReadOnly := true;
end;Good luck
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货