planner.hpp

TMS component pack v4.2 for delphi

// CodeGear C++ Builder
// Copyright (c) 1995, 2007 by CodeGear
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Planner.pas' rev: 11.00

#ifndef PlannerHPP
#define PlannerHPP

#pragma delphiheader begin
#pragma option push
#pragma option -w-      // All warnings off
#pragma option -Vx      // Zero-length empty class member functions
#pragma pack(push,8)
#include <System.hpp>	// Pascal unit
#include <Sysinit.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Sysutils.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Stdctrls.hpp>	// Pascal unit
#include <Extctrls.hpp>	// Pascal unit
#include <Grids.hpp>	// Pascal unit
#include <Buttons.hpp>	// Pascal unit
#include <Comctrls.hpp>	// Pascal unit
#include <Menus.hpp>	// Pascal unit
#include <Mask.hpp>	// Pascal unit
#include <Richedit.hpp>	// Pascal unit
#include <Printers.hpp>	// Pascal unit
#include <Clipbrd.hpp>	// Pascal unit
#include <Planutil.hpp>	// Pascal unit
#include <Planobj.hpp>	// Pascal unit
#include <Plancheck.hpp>	// Pascal unit
#include <Planhtml.hpp>	// Pascal unit
#include <Plancombo.hpp>	// Pascal unit
#include <Picturecontainer.hpp>	// Pascal unit
#include <Comobj.hpp>	// Pascal unit
#include <Commctrl.hpp>	// Pascal unit
#include <Inifiles.hpp>	// Pascal unit
#include <Actnlist.hpp>	// Pascal unit
#include <Advstyleif.hpp>	// Pascal unit
#include <Planxpvs.hpp>	// Pascal unit
#include <Planuni.hpp>	// Pascal unit
#include <Variants.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

#include "winuser.h"


namespace Planner
{
//-- type declarations -------------------------------------------------------
typedef AnsiString Planner__1[6];

class DELPHICLASS EPlannerError;
class PASCALIMPLEMENTATION EPlannerError : public Sysutils::Exception 
{
	typedef Sysutils::Exception inherited;
	
public:
	#pragma option push -w-inl
	/* Exception.Create */ inline __fastcall EPlannerError(const AnsiString Msg) : Sysutils::Exception(Msg) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateFmt */ inline __fastcall EPlannerError(const AnsiString Msg, System::TVarRec const * Args, const int Args_Size) : Sysutils::Exception(Msg, Args, Args_Size) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateRes */ inline __fastcall EPlannerError(int Ident)/* overload */ : Sysutils::Exception(Ident) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResFmt */ inline __fastcall EPlannerError(int Ident, System::TVarRec const * Args, const int Args_Size)/* overload */ : Sysutils::Exception(Ident, Args, Args_Size) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateHelp */ inline __fastcall EPlannerError(const AnsiString Msg, int AHelpContext) : Sysutils::Exception(Msg, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateFmtHelp */ inline __fastcall EPlannerError(const AnsiString Msg, System::TVarRec const * Args, const int Args_Size, int AHelpContext) : Sysutils::Exception(Msg, Args, Args_Size, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResHelp */ inline __fastcall EPlannerError(int Ident, int AHelpContext)/* overload */ : Sysutils::Exception(Ident, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResFmtHelp */ inline __fastcall EPlannerError(System::PResStringRec ResStringRec, System::TVarRec const * Args, const int Args_Size, int AHelpContext)/* overload */ : Sysutils::Exception(ResStringRec, Args, Args_Size, AHelpContext) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~EPlannerError(void) { }
	#pragma option pop
	
};


#pragma option push -b-
enum XPColorScheme { xpNone, xpBlue, xpGreen, xpGray, xpNoTheme };
#pragma option pop

class DELPHICLASS TPlannerItem;
typedef void __fastcall (__closure *TItemEvent)(System::TObject* Sender, TPlannerItem* Item);

typedef void __fastcall (__closure *TPlannerAnchorEvent)(System::TObject* Sender, int X, int Y, AnsiString Anchor);

typedef void __fastcall (__closure *TItemControlEvent)(System::TObject* Sender, int X, int Y, TPlannerItem* Item, AnsiString ControlID, AnsiString ControlType, AnsiString ControlValue);

typedef void __fastcall (__closure *TItemComboControlEvent)(System::TObject* Sender, int X, int Y, TPlannerItem* Item, AnsiString ControlID, AnsiString ControlValue, int ComboIdx, System::TObject* ComboObject);

typedef void __fastcall (__closure *TItemControlListEvent)(System::TObject* Sender, TPlannerItem* Item, AnsiString ControlID, AnsiString ControlValue, bool &Edit, Classes::TStringList* Values, int &Dropheight);

typedef void __fastcall (__closure *TItemAnchorEvent)(System::TObject* Sender, TPlannerItem* Item, AnsiString Anchor);

typedef void __fastcall (__closure *TItemImageEvent)(System::TObject* Sender, TPlannerItem* Item, int ImageIndex);

typedef void __fastcall (__closure *TItemHintEvent)(System::TObject* Sender, TPlannerItem* Item, AnsiString &Hint);

typedef void __fastcall (__closure *TItemLinkEvent)(System::TObject* Sender, TPlannerItem* Item, AnsiString Link, bool &AutoHandle);

typedef void __fastcall (__closure *TItemMoveEvent)(System::TObject* Sender, TPlannerItem* Item, int FromBegin, int FromEnd, int FromPos, int ToBegin, int ToEnd, int ToPos);

typedef void __fastcall (__closure *TItemMovingEvent)(System::TObject* Sender, TPlannerItem* Item, int DeltaBegin, int DeltaPos, bool &Allow);

typedef void __fastcall (__closure *TItemUpdateEvent)(System::TObject* Sender, TPlannerItem* Item, int &NewBegin, int &NewEnd, int &NewPos);

typedef void __fastcall (__closure *TItemSizingEvent)(System::TObject* Sender, TPlannerItem* Item, int DeltaBegin, int DeltaEnd, bool &Allow);

typedef void __fastcall (__closure *TItemDragEvent)(System::TObject* Sender, TPlannerItem* Item, bool &Allow);

typedef void __fastcall (__closure *TItemBalloonEvent)(System::TObject* Sender, TPlannerItem* APlannerItem, AnsiString &ATitle, AnsiString &AText, int &AIcon);

typedef void __fastcall (__closure *TPlannerBalloonEvent)(System::TObject* Sender, int X, int Y, AnsiString &ATitle, AnsiString &AText, int &AIcon);

#pragma option push -b-
enum TItemClipboardAction { itCut, itCopy, itPaste };
#pragma option pop

typedef void __fastcall (__closure *TItemClipboardEvent)(System::TObject* Sender, TPlannerItem* Item, TItemClipboardAction Action, AnsiString &Text);

typedef void __fastcall (__closure *TItemSizeEvent)(System::TObject* Sender, TPlannerItem* Item, int Position, int FromBegin, int FromEnd, int ToBegin, int ToEnd);

typedef void __fastcall (__closure *TItemPopupPrepareEvent)(System::TObject* Sender, Menus::TPopupMenu* PopupMenu, TPlannerItem* Item);

typedef void __fastcall (__closure *TPlannerEvent)(System::TObject* Sender, int Position, int FromSel, int FromSelPrecise, int ToSel, int ToSelPrecise);

typedef void __fastcall (__closure *TPlannerKeyEvent)(System::TObject* Sender, char &Key, int Position, int FromSel, int FromSelPrecis, int ToSel, int ToSelPrecis);

typedef void __fastcall (__closure *TPlannerKeyDownEvent)(System::TObject* Sender, Word &Key, Classes::TShiftState Shift, int Position, int FromSel, int FromSelPrecis, int ToSel, int ToSelPrecis);

typedef void __fastcall (__closure *TPlannerItemDraw)(System::TObject* Sender, TPlannerItem* PlannerItem, Graphics::TCanvas* Canvas, const Types::TRect &Rect, bool Selected);

typedef void __fastcall (__closure *TPlannerItemText)(System::TObject* Sender, TPlannerItem* PlannerItem, AnsiString &Text);

typedef void __fastcall (__closure *TPlannerSideDraw)(System::TObject* Sender, Graphics::TCanvas* Canvas, const Types::TRect &Rect, int Index);

typedef void __fastcall (__closure *TPlannerSideProp)(System::TObject* Sender, int Index, Graphics::TBrush* ABrush, Graphics::TFont* AFont, Graphics::TColor &ColorTo);

typedef void __fastcall (__closure *TPlannerBkgDraw)(System::TObject* Sender, Graphics::TCanvas* Canvas, const Types::TRect &Rect, int Index, int Position);

typedef void __fastcall (__closure *TPlannerHeaderDraw)(System::TObject* Sender, Graphics::TCanvas* Canvas, const Types::TRect &Rect, int Index, bool &DoDraw);

typedef void __fastcall (__closure *TPlannerHeaderProp)(System::TObject* Sender, Graphics::TBrush* ABrush, Graphics::TColor &ColorTo, Graphics::TFont* AFont, Classes::TAlignment &AAlignment);

typedef void __fastcall (__closure *THeaderHeightChangeEvent)(System::TObject* Sender, int NewSize);

typedef void __fastcall (__closure *TPlannerCaptionDraw)(System::TObject* Sender, Graphics::TCanvas* Canvas, const Types::TRect &Rect, bool &DoDraw);

typedef void __fastcall (__closure *TPlannerPlanTimeToStrings)(System::TObject* Sender, unsigned MinutesValue, AnsiString &HoursString, AnsiString &MinutesString, AnsiString &AmPmString);

typedef void __fastcall (__closure *TPlannerGetSideBarLines)(System::TObject* Sender, int Index, int Position, AnsiString &HourString, AnsiString &MinuteString, AnsiString &AmPmString);

typedef void __fastcall (__closure *TPlannerPrintEvent)(System::TObject* Sender, Graphics::TCanvas* Canvas);

typedef void __fastcall (__closure *TPlannerSelectCellEvent)(System::TObject* Sender, int Index, int Pos, bool &CanSelect);

typedef void __fastcall (__closure *TPlannerBottomLineEvent)(System::TObject* Sender, int Index, int Pos, Graphics::TPen* APen);

typedef void __fastcall (__closure *TGetCurrentTimeEvent)(System::TObject* Sender, System::TDateTime &CurrentTime);

typedef void __fastcall (__closure *TPlannerBtnEvent)(System::TObject* Sender);

#pragma option push -b-
enum TSideBarPosition { spLeft, spRight, spTop, spLeftRight };
#pragma option pop

#pragma option push -b-
enum TSideBarOrientation { soHorizontal, soVertical };
#pragma option pop

typedef void __fastcall (__closure *TCustomEditEvent)(System::TObject* Sender, const Types::TRect &R, TPlannerItem* Item);

typedef void __fastcall (__closure *TPlannerPositionToDay)(System::TObject* Sender, int Pos, System::TDateTime &Day);

typedef void __fastcall (__closure *TPlannerPositionZoom)(System::TObject* Sender, int Pos, bool ZoomIn);

typedef void __fastcall (__closure *TPlannerBeforePositionZoom)(System::TObject* Sender, int Pos, bool ZoomIn, bool &Allow);

typedef void __fastcall (__closure *TPlannerActiveEvent)(System::TObject* Sender, int Index, int Position, bool &Active);

typedef void __fastcall (__closure *TPlannerPrintHFEvent)(System::TObject* Sender, Graphics::TCanvas* ACanvas, const Types::TRect &DrawRect);

typedef void __fastcall (__closure *TPlannerHeaderSizeEvent)(System::TObject* Sender, int APosition, int AWidth);

typedef void __fastcall (__closure *TCustomITEvent)(System::TObject* Sender, int Index, System::TDateTime &DT);

typedef void __fastcall (__closure *TCustomTIEvent)(System::TObject* Sender, System::TDateTime DT, int &Index);

typedef void __fastcall (__closure *TDragOverHeaderEvent)(System::TObject* Sender, System::TObject* Source, int Position, Controls::TDragState State, bool &Accept);

typedef void __fastcall (__closure *TDragDropHeaderEvent)(System::TObject* Sender, System::TObject* Source, int Position);

class DELPHICLASS TCompletion;
class PASCALIMPLEMENTATION TCompletion : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	bool FStacked;
	bool FShowBorder;
	bool FShowGradient;
	bool FCompletionSmooth;
	bool FShowPercentage;
	int FLevel2Perc;
	int FSteps;
	int FLevel1Perc;
	Graphics::TColor FLevel0Color;
	Graphics::TColor FLevel1Color;
	Graphics::TColor FLevel3Color;
	Graphics::TColor FLevel3ColorTo;
	Graphics::TColor FLevel2ColorTo;
	Graphics::TColor FLevel2Color;
	Graphics::TColor FBorderColor;
	Graphics::TColor FLevel1ColorTo;
	Graphics::TColor FBackgroundColor;
	Graphics::TColor FLevel0ColorTo;
	Graphics::TFont* FFont;
	Classes::TNotifyEvent FOnChange;
	void __fastcall SetBackGroundColor(const Graphics::TColor Value);
	void __fastcall SetBorderColor(const Graphics::TColor Value);
	void __fastcall SetCompletionSmooth(const bool Value);
	void __fastcall SetFont(const Graphics::TFont* Value);
	void __fastcall SetLevel0Color(const Graphics::TColor Value);
	void __fastcall SetLevel0ColorTo(const Graphics::TColor Value);
	void __fastcall SetLevel1Color(const Graphics::TColor Value);
	void __fastcall SetLevel1ColorTo(const Graphics::TColor Value);
	void __fastcall SetLevel1Perc(const int Value);
	void __fastcall SetLevel2Color(const Graphics::TColor Value);
	void __fastcall SetLevel2ColorTo(const Graphics::TColor Value);
	void __fastcall SetLevel2Perc(const int Value);
	void __fastcall SetLevel3Color(const Graphics::TColor Value);
	void __fastcall SetLevel3ColorTo(const Graphics::TColor Value);
	void __fastcall SetShowBorder(const bool Value);
	void __fastcall SetShowGradient(const bool Value);
	void __fastcall SetShowPercentage(const bool Value);
	void __fastcall SetStacked(const bool Value);
	void __fastcall SetSteps(const int Value);
	
public:
	__fastcall TCompletion(void);
	__fastcall virtual ~TCompletion(void);
	void __fastcall Changed(void);
	
__published:
	__property Graphics::TColor Level0Color = {read=FLevel0Color, write=SetLevel0Color, default=65280};
	__property Graphics::TColor Level0ColorTo = {read=FLevel0ColorTo, write=SetLevel0ColorTo, default=16777215};
	__property Graphics::TColor Level1Color = {read=FLevel1Color, write=SetLevel1Color, default=65535};
	__property Graphics::TColor Level1ColorTo = {read=FLevel1ColorTo, write=SetLevel1ColorTo, default=16777215};
	__property Graphics::TColor Level2Color = {read=FLevel2Color, write=SetLevel2Color, default=50943};
	__property Graphics::TColor Level2ColorTo = {read=FLevel2ColorTo, write=SetLevel2ColorTo, default=16777215};
	__property Graphics::TColor Level3Color = {read=FLevel3Color, write=SetLevel3Color, default=255};
	__property Graphics::TColor Level3ColorTo = {read=FLevel3ColorTo, write=SetLevel3ColorTo, default=16777215};
	__property int Level1Perc = {read=FLevel1Perc, write=SetLevel1Perc, default=70};
	__property int Level2Perc = {read=FLevel2Perc, write=SetLevel2Perc, default=90};
	__property Graphics::TColor BorderColor = {read=FBorderColor, write=SetBorderColor, default=8421504};
	__property bool ShowBorder = {read=FShowBorder, write=SetShowBorder, default=1};
	__property bool Stacked = {read=FStacked, write=SetStacked, default=0};
	__property bool ShowPercentage = {read=FShowPercentage, write=SetShowPercentage, default=1};
	__property Graphics::TFont* Font = {read=FFont, write=SetFont};
	__property bool CompletionSmooth = {read=FCompletionSmooth, write=SetCompletionSmooth, default=1};
	__property bool ShowGradient = {read=FShowGradient, write=SetShowGradient, default=1};
	__property int Steps = {read=FSteps, write=SetSteps, default=8};
	__property Graphics::TColor BackgroundColor = {read=FBackgroundColor, write=SetBackGroundColor, default=-16777201};
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
};


class DELPHICLASS TBalloonSettings;
class PASCALIMPLEMENTATION TBalloonSettings : public Classes::TPersistent