fix autoszie if RxLoockup

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1196 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2010-04-08 17:26:33 +00:00
parent aaa4fc90da
commit 0653014d4e
2 changed files with 21 additions and 6 deletions

View File

@ -787,6 +787,7 @@ begin
FPopup := CreatePopupCalendar(Self {$IFDEF USED_BiDi}, BiDiMode {$ENDIF});
FPopup.OnCloseUp := @PopupCloseUp;
FPopup.Color := FPopupColor;
FPopup.Visible:=false;
{$ELSE}
FPopup:=nil;
{$ENDIF DEFAULT_POPUP_CALENDAR}