Ready to improve network connectivity? Watch this webinar to learn how SD-WANs and a one-click instant connect tool can boost provisions, deployment, and management of your cloud connection.
procedure TForm.EditBtnClick(Sender:TObject); begin // Mark is form variable. It's private Mark = cdsMain.GetBookmark; // blabalbal . . . end; procedure TForm.OkBtnClick(Sender:TObject); var mistakes: Integer; begin //Validation stuff and transaction control //removed to not clutter the code If cdsMain.ChangeCount <> 0 then mistakes := cdsMain.AppyUpdates(-1); cdsMain.Refresh; try cdsMain.GotoBookmark(Mark); // Yes, I know I would have to call FreeBookmark // but I'm just reproducing except cdsMain.First; end; end;
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.