1 files changed, 7 insertions, 1 deletions
diff --git a/src/corelib/gfx_popupwindow.pas b/src/corelib/gfx_popupwindow.pas
index 5cc270b1..e19b8642 100644
--- a/src/corelib/gfx_popupwindow.pas
+++ b/src/corelib/gfx_popupwindow.pas
@@ -49,7 +49,8 @@ type
     procedure   DoOnClose; virtual;
   public
     constructor Create(AOwner: TComponent); override;
-    procedure   ShowAt(AWidget: TfpgWidget; x, y: TfpgCoord);
+    procedure   ShowAt(AWidget: TfpgWidget; x, y: TfpgCoord); overload;
+    procedure   ShowAt(x, y: TfpgCoord); overload;
     procedure   Close; virtual;
     property    DontCloseWidget: TfpgWidget read FDontCloseWidget write FDontCloseWidget;
     property    PopupFrame: boolean read FPopupFrame write SetPopupFrame;
@@ -310,6 +311,11 @@ begin
   HandleShow;
 end;
 
+procedure TfpgPopupWindow.ShowAt(x, y: TfpgCoord);
+begin
+  ShowAt(nil, x, y);
+end;
+
 procedure TfpgPopupWindow.Close;
 begin
   HandleClose;