diff --git a/components/rx/rxlookup.pas b/components/rx/rxlookup.pas
index 99b5c7f25..30379e144 100644
--- a/components/rx/rxlookup.pas
+++ b/components/rx/rxlookup.pas
@@ -573,6 +573,10 @@ procedure TRxCustomDBLookupEdit.InternalClosePopup(AResult: boolean);
 begin
   if Assigned(FOnClosePopup) then
     FOnClosePopup(Self, AResult);
+
+{$IFDEF WINDOWS}
+  FRxPopUpForm:=nil;
+{$ENDIF}
 end;
 
 procedure TRxCustomDBLookupEdit.LookupDataSetChanged(Sender: TObject);