delphi刷新界面所选行丢失问题

2019独角兽企业重金招聘Python工程师标准>>>

procedure TFram.ado_khAfterPost(DataSet: TDataSet);

var

IDs: string;

begin

inherited;

dxDBGrid_khClick(nil); //刷新界面记住所选行

IDs := ado_kh.FieldByName('cCusCode').AsString;

ado_kh.Close;

ado_kh.Open;

ado_kh.Locate('cCusCode', IDs, []);

end;

转载于:https://my.oschina.net/u/3328774/blog/1600761