diff options
-rw-r--r-- | src/gui/fpg_popupcalendar.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/gui/fpg_popupcalendar.pas b/src/gui/fpg_popupcalendar.pas index 05eb0194..494efe9d 100644 --- a/src/gui/fpg_popupcalendar.pas +++ b/src/gui/fpg_popupcalendar.pas @@ -643,7 +643,7 @@ begin begin FYearPopupWindow := TYearSelectForm.CreateCustom(nil, YearOf(MinDate), YearOf(MaxDate)); FYearPopupWindow.OnClose := @YearPopupWindowClose; - FYearPopupWindow.DontCloseWidget := self; // now we can control when the popup window closes +// FYearPopupWindow.DontCloseWidget := self; // now we can control when the popup window closes FYearPopupWindow.Year := Year; end; FYearPopupWindow.ShowAt(self, edtYear.Left, edtYear.Bottom); @@ -1071,7 +1071,7 @@ begin if not Assigned(FMonthsPopupMenu) then begin FMonthsPopupMenu := TfpgPopupMenu.Create(nil); - FMonthsPopupMenu.DontCloseWidget := self; // now we can control when the popup window closes +// FMonthsPopupMenu.DontCloseWidget := self; // now we can control when the popup window closes itm := FMonthsPopupMenu.AddMenuItem(rslongjan, '', @miMonthClicked); itm.Tag := 1; itm := FMonthsPopupMenu.AddMenuItem(rslongfeb, '', @miMonthClicked); |