async-event and page refresh

[jeroen.rottink]

Following works for me. Call it from your Async... event

Code:

procedure TDlgBase.TriggerFullPostFromAsyncEvent;
var js: string;
begin
  // https://forums.embarcadero.com/thread.jspa?messageID=675140&#675140
  js := 'location.reload();';

  WebApplication.CallBackResponse.AddJavaScriptToExecuteAsCDATA(js);
end;