diff --git a/components/heidisql/source/heidicomp.pas b/components/heidisql/source/heidicomp.pas
index e3cd8c1d..9b146357 100644
--- a/components/heidisql/source/heidicomp.pas
+++ b/components/heidisql/source/heidicomp.pas
@@ -73,6 +73,7 @@ type
     kind: Integer;
  protected
     procedure InternalPost; override;
+    procedure InternalRefresh; override;
  public
     constructor Create(AOwner: TComponent; PostCallback: TAsyncPostRunner); reintroduce;
     procedure ExecSQL; override;
@@ -92,6 +93,13 @@ begin
   else callback(self);
 end;
 
+procedure TDeferDataSet.InternalRefresh;
+begin
+  kind := 3;
+  if @callback = nil then DoAsync
+  else callback(self);
+end;
+
 procedure TDeferDataSet.ExecSql;
 begin
   kind := 2;
@@ -110,6 +118,7 @@ begin
   case kind of
     1: inherited InternalPost;
     2: inherited ExecSQL;
+    3: inherited InternalRefresh;
   end;
 end;