plannercal.hpp

来自「TMSPack基本上涵盖了Delphi所有的基础控件」· HPP 代码 · 共 1,313 行 · 第 1/5 页

	__property AnsiString WeekName = {read=FWeekName, write=SetWeekName, stored=true};
	__property Graphics::TColor TextColor = {read=FTextcolor, write=SetTextColor, nodefault};
	__property Graphics::TColor SelectColor = {read=FSelectColor, write=SetSelectColor, nodefault};
	__property Graphics::TColor SelectFontColor = {read=FSelectFontColor, write=SetSelectFontColor, nodefault};
	__property Graphics::TColor InActiveColor = {read=FInactiveColor, write=SetInactiveColor, nodefault};
	__property Graphics::TColor HeaderColor = {read=FHeaderColor, write=SetHeaderColor, nodefault};
	__property Graphics::TColor FocusColor = {read=FFocusColor, write=SetFocusColor, nodefault};
	__property Graphics::TColor InversColor = {read=FInverscolor, write=SetInversColor, nodefault};
	__property Graphics::TColor WeekendColor = {read=FWeekendColor, write=SetWeekendColor, nodefault};
	__property TNameOfDays* NameOfDays = {read=FNameOfDays, write=SetNameofDays};
	__property TNameOfMonths* NameOfMonths = {read=FNameOfMonths, write=SetNameofMonths};
	__property TMinMaxDate* MaxDate = {read=FMaxDate, write=FMaxDate};
	__property TMinMaxDate* MinDate = {read=FMinDate, write=FMinDate};
	__property PopupMenu ;
	__property bool ReturnIsSelect = {read=FReturnIsSelect, write=FReturnIsSelect, default=0};
	__property bool ShowDaysBefore = {read=FShowDaysBefore, write=SetShowDaysBefore, default=1};
	__property bool ShowDaysAfter = {read=FShowDaysAfter, write=SetShowDaysAfter, default=1};
	__property bool ShowGotoToday = {read=FShowGotoToday, write=SetShowGotoToday, default=0};
	__property bool ShowSelection = {read=FShowSelection, write=SetShowSelection, default=1};
	__property bool ShowToday = {read=FShowToday, write=SetShowToday, default=0};
	__property bool ShowWeeks = {read=FShowWeeks, write=SetShowWeeks, default=0};
	__property bool ShowMonthSelector = {read=FShowMonthSelector, write=FShowMonthSelector, default=1};
	__property bool ShowYearSelector = {read=FShowYearSelector, write=FShowYearSelector, default=1};
	__property int StartDay = {read=FStartDay, write=SetStartDay, nodefault};
	__property AnsiString TodayFormat = {read=FTodayFormat, write=SetTodayFormat};
	__property TTodayStyle TodayStyle = {read=FTodayStyle, write=SetTodayStyle, default=0};
	__property TYearStartAt* YearStartAt = {read=FYearStartAt, write=FYearStartAt};
	__property Word Day = {read=GetCalDay, write=SetCalDay, default=1};
	__property Word Month = {read=GetCalMonth, write=SetCalMonth, default=1};
	__property Word Year = {read=GetCalYear, write=SetCalYear, default=1};
	__property ShowHint ;
	__property ParentShowHint  = {default=1};
	__property TabStop  = {default=0};
	__property TabOrder  = {default=-1};
	__property bool WeekSelect = {read=FWeekSelect, write=FWeekSelect, default=0};
	__property Graphics::TFont* Font = {read=fFont, write=SetFont};
	__property bool EventHints = {read=FEventHints, write=FEventHints, default=0};
	__property Graphics::TColor CaptionColor = {read=FCaptionColor, write=SetCaptionColor, nodefault};
	__property Graphics::TColor CaptionTextColor = {read=FCaptionTextColor, write=SetCaptionTextColor, nodefault};
	__property TCellDrawEvent OnCellDraw = {read=FOnCellDraw, write=FOnCellDraw};
	__property TDaySelectEvent OnDaySelect = {read=FOnDaySelect, write=FOnDaySelect};
	__property Classes::TNotifyEvent OnMonthSelect = {read=FOnMonthSelect, write=FOnMonthSelect};
	__property TGetDateEvent OnGetDateHint = {read=FOnGetDateEvent, write=FOnGetDateEvent};
	__property TGetDateEventHint OnGetDateHintString = {read=FOnGetDateEventHint, write=FOnGetDateEventHint};
	__property TEventPropEvent OnGetEventProp = {read=FOnGetEventProp, write=FOnGetEventProp};
	__property TDateChangeEvent OnMonthChange = {read=FOnMonthChange, write=FOnMonthChange};
	__property TDateChangeEvent OnYearChange = {read=FOnYearChange, write=FOnYearChange};
	__property TDateChangeEvent OnDayChange = {read=FOnDayChange, write=FOnDayChange};
	__property TDateChangeEvent OnDateChange = {read=FOnDateChange, write=FOnDateChange};
	__property TCancelledChangeEvent OnCancelledChange = {read=FOnCancelledChange, write=FOnCancelledChange};
	__property Classes::TNotifyEvent OnWeekSelect = {read=FOnWeekSelect, write=FOnWeekSelect};
	__property Classes::TNotifyEvent OnAllDaySelect = {read=FOnAllDaySelect, write=FOnAllDaySelect};
	__property OnKeyDown ;
	__property OnKeyPress ;
	__property OnKeyUp ;
	__property OnMouseMove ;
	__property OnMouseDown ;
	__property OnMouseUp ;
	__property OnDblClick ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnStartDrag ;
	__property OnEndDrag ;
	__property OnEnter ;
	__property OnExit ;
	__property OnResize ;
	__property Graphics::TColor LineColor = {read=FLineColor, write=SetLineColor, nodefault};
	__property bool Line3D = {read=FLine3D, write=SetLine3D, nodefault};
	__property Graphics::TColor GradientStartColor = {read=FGradientStartColor, write=SetGradientStartColor, nodefault};
	__property Graphics::TColor GradientEndColor = {read=FGradientEndColor, write=SetGradientEndColor, nodefault};
	__property TGradientDirection GradientDirection = {read=FGradientDirection, write=SetGradientDirection, nodefault};
	__property Graphics::TColor MonthGradientStartColor = {read=FMonthGradientStartColor, write=SetMonthGradientStartColor, nodefault};
	__property Graphics::TColor MonthGradientEndColor = {read=FMonthGradientEndColor, write=SetMonthGradientEndColor, nodefault};
	__property TGradientDirection MonthGradientDirection = {read=FMonthGradientDirection, write=SetMonthGradientDirection, nodefault};
	__property TCalGlyphs* Glyphs = {read=FGlyphs, write=SetGlyphs};
	__property AnsiString HintPrevYear = {read=FHintPrevYear, write=SetHintPrevYear};
	__property AnsiString HintPrevMonth = {read=FHintPrevMonth, write=SetHintPrevMonth};
	__property AnsiString HintNextMonth = {read=FHintNextMonth, write=SetHintNextMonth};
	__property AnsiString HintNextYear = {read=FHintNextYear, write=SetHintNextYear};
	__property AnsiString Version = {read=GetVersion, write=SetVersion};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TPlannerCalendar(HWND ParentWindow) : TCustomCalendarPanel(ParentWindow) { }
	#pragma option pop
	
private:
	void *__ITMSStyle;	/* Advstyleif::ITMSStyle */
	
public:
	operator ITMSStyle*(void) { return (ITMSStyle*)&__ITMSStyle; }
	
};


class PASCALIMPLEMENTATION TMinMaxDate : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	TPlannerCalendar* FOwner;
	short FDay;
	short FMonth;
	short FYear;
	bool FUse;
	void __fastcall SetDay(short avalue);
	void __fastcall SetMonth(short avalue);
	void __fastcall SetYear(short avalue);
	void __fastcall SetUse(bool avalue);
	System::TDateTime __fastcall GetDate(void);
	void __fastcall SetDate(const System::TDateTime Value);
	
public:
	__fastcall TMinMaxDate(TPlannerCalendar* aOwner);
	__property System::TDateTime Date = {read=GetDate, write=SetDate};
	
__published:
	__property short Day = {read=FDay, write=SetDay, default=0};
	__property short Month = {read=FMonth, write=SetMonth, default=0};
	__property short Year = {read=FYear, write=SetYear, default=0};
	__property bool Use = {read=FUse, write=SetUse, default=0};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TMinMaxDate(void) { }
	#pragma option pop
	
};


class DELPHICLASS TPlannerCalendarGroup;
class PASCALIMPLEMENTATION TPlannerCalendarGroup : public TCustomCalendarPanel 
{
	typedef TCustomCalendarPanel inherited;
	
private:
	Advimage::TAdvImage* FImage;
	TBackGroundPosition FBackgroundPosition;
	Classes::TList* FCalendars;
	int FColCount;
	int FRowCount;
	Extctrls::TPanel* FResizeVertical;
	Extctrls::TPanel* FResizeHorizontal;
	Byte fspliterV;
	Byte fspliterH;
	bool FLetResize;
	int FCalendarWidth;
	int FCalendarHeight;
	Graphics::TFont* fFont;
	int FStartMonth;
	int FStartYear;
	TDaySelectEvent FOnDaySelect;
	Classes::TNotifyEvent FOnMonthSelect;
	TGetDateEvent FOnGetDateEvent;
	TGetDateEventHint FOnGetDateEventHint;
	TDateChangeEvent FOnDateChange;
	TDateChangeEvent FOnMonthChange;
	TDateChangeEvent FOnYearChange;
	TDateChangeEvent FOnDayChange;
	TCancelledChangeEvent FOnCancelledChange;
	Classes::TNotifyEvent FOnWeekSelect;
	Classes::TNotifyEvent FOnAllDaySelect;
	bool Fctltdown;
	Controls::TKeyEvent FOnKeyDown;
	Controls::TKeyPressEvent FOnKeyPress;
	Controls::TKeyEvent FOnKeyUp;
	Controls::TMouseMoveEvent FOnMouseMove;
	Controls::TMouseEvent FOnMouseDown;
	Controls::TMouseEvent FOnMouseUp;
	Controls::TDragDropEvent FOnDragDrop;
	Controls::TDragOverEvent FOnDragOver;
	Controls::TEndDragEvent FOnEndDrag;
	Controls::TStartDragEvent FOnStartDrag;
	TCellDrawEvent FOnCellDraw;
	Word FDay;
	Word FMonth;
	Word FYear;
	TPlannerCalendarLook FLook;
	Graphics::TFont* FDayFont;
	Graphics::TFont* FWeekFont;
	AnsiString FWeekName;
	Graphics::TColor FTextColor;
	Graphics::TColor FSelectColor;
	Graphics::TColor FSelectFontColor;
	Graphics::TColor FInactiveColor;
	Graphics::TColor FHeaderColor;
	Graphics::TColor FFocusColor;
	Graphics::TColor FInversColor;
	Graphics::TColor FWeekendColor;
	TNameOfDays* FNameOfDays;
	TNameOfMonths* FNameOfMonths;
	bool FShowSelection;
	bool FShowWeeks;
	bool FEventHints;
	bool FSPlitterBevel;
	Graphics::TColor FSplitterColor;
	int FBevelWidth;
	Forms::TFormBorderStyle FBorderStyle;
	int FBorderWidth;
	Controls::TBevelCut FBevelOuter;
	Controls::TBevelCut FBevelInner;
	bool FMultiSelect;
	bool FShowToday;
	TSelDateItems* FEventCol;
	TSelDateItems* FDates;
	bool FAllDaySelect;
	bool FWeekSelect;
	Graphics::TColor FCaptionColor;
	int FStartDay;
	Graphics::TColor FLineColor;
	bool FLine3D;
	TGradientDirection FGradientDirection;
	Graphics::TColor FGradientStartColor;
	Graphics::TColor FGradientEndColor;
	TGradientDirection FMonthGradientDirection;
	Graphics::TColor FMonthGradientStartColor;
	Graphics::TColor FMonthGradientEndColor;
	TCalendarBrowsers* FBrowsers;
	AnsiString FHintNextMonth;
	AnsiString FHintNextYear;
	AnsiString FHintPrevYear;
	AnsiString FHintPrevMonth;
	TCalGlyphs* FGlyphs;
	Graphics::TColor FCaptionTextColor;
	System::TDateTime FLastDay;
	TYearStartAt* FYearStartAt;
	TPlannerCalendarStyle FStyle;
	Graphics::TColor FDateSelectColor;
	Graphics::TColor FDateSelectBorderColor;
	Graphics::TColor FDateHoverColor;
	Graphics::TColor FDateDownColor;
	bool FAutoThemeAdapt;
	bool FShowMonthSelector;
	bool FShowYearSelector;
	void __fastcall SetColCount(const int Value);
	void __fastcall SetRowCount(const int Value);
	void __fastcall SetCalendarWidth(const int Value);
	void __fastcall SetCalendarHeight(const int Value);
	HIDESBASE void __fastcall SetFont(const Graphics::TFont* Value);
	void __fastcall SetStartMonth(const int Value);
	void __fastcall SetStartYear(const int Value);
	void __fastcall SetSpliterH(const Byte Value);
	void __fastcall SetSpliterV(const Byte Value);
	void __fastcall UpdateFields(void);
	void __fastcall UpdateEvents(void);
	TSelDateItems* __fastcall GetDates(void);
	void __fastcall SetDates(const TSelDateItems* Value);
	void __fastcall SetDay(Word Value);
	void __fastcall SetMonth(Word Value);
	void __fastcall SetYear(Word Value);
	Word __fastcall GetMonth(void);
	Word __fastcall GetYear(void);
	void __fastcall SetLook(TPlannerCalendarLook AValue);
	void __fastcall SetDayFont(Graphics::TFont* AValue);
	void __fastcall SetWeekFont(Graphics::TFont* AValue);
	void __fastcall SetWeekName(const AnsiString Value);
	void __fastcall SetTextColor(Graphics::TColor AColor);
	void __fastcall SetSelectColor(Graphics::TColor AColor);
	void __fastcall SetSelectFontColor(Graphics::TColor AColor);
	void __fastcall SetInactiveColor(Graphics::TColor AColor);
	void __fastcall SetHeaderColor(Graphics::TColor AColor);
	void __fastcall SetFocusColor(Graphics::TColor AColor);
	void __fastcall SetInversColor(Graphics::TColor AColor);
	void __fastcall SetWeekendColor(Graphics::TColor AColor);
	void __fastcall SetNameOfDays(const TNameOfDays* Value);