paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-06 00:18:57 +01:00
Code Issues Packages Projects Releases Wiki Activity

DateTimePicker: Change popup mode of CalendarForm from pmAuto to pmExplicit (makes difference when ParentForm of DateTimePicker is TCustomForm, not TForm)

Browse Source 
git-svn-id: trunk@62623 -
This commit is contained in:
zoran 2020-02-11 10:33:51 +00:00
parent 2efc246c6b
commit 0dc05db67d
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
components/datetimectrls/datetimepicker.pas
View File

@ -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);