From 0dc05db67d89ad2a70df3fe3520452553f035748 Mon Sep 17 00:00:00 2001
From: zoran <zoran@lazarus-ide.org>
Date: Tue, 11 Feb 2020 10:33:51 +0000
Subject: [PATCH] DateTimePicker: Change popup mode of CalendarForm from pmAuto
 to pmExplicit (makes difference when ParentForm of DateTimePicker is
 TCustomForm, not TForm)

git-svn-id: trunk@62623 -
---
 components/datetimectrls/datetimepicker.pas | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/components/datetimectrls/datetimepicker.pas b/components/datetimectrls/datetimepicker.pas
index ca9fe5deb6..60c12f4abf 100644
--- a/components/datetimectrls/datetimepicker.pas
+++ b/components/datetimectrls/datetimepicker.pas
@@ -872,8 +872,10 @@ begin
   if Assigned(DTPickersParentForm) then begin
     DTPickersParentForm.AddHandlerOnVisibleChanged(@VisibleOfParentChanged);
     DTPickersParentForm.FreeNotification(Self);
-  end;
-  PopupMode := pmAuto;
+    PopupParent := DTPickersParentForm;
+    PopupMode := pmExplicit;
+  end else
+    PopupMode := pmAuto;
 
   P := Point(0, 0);