inspectorbar.hpp

TMS component pack v4.2 for delphi

	/* TInspEditBtn.Destroy */ inline __fastcall virtual ~TInspectorEditBtn(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TInspectorEditBtn(HWND ParentWindow) : Inspedits::TInspEditBtn(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TInspectorDateTimePicker;
class PASCALIMPLEMENTATION TInspectorDateTimePicker : public Inspedits::TInspDateTimePicker 
{
	typedef Inspedits::TInspDateTimePicker inherited;
	
private:
	TInspectorItem* FInspectorItem;
	System::TDateTime FOrigValue;
	
protected:
	DYNAMIC void __fastcall DoExit(void);
	DYNAMIC void __fastcall KeyPress(char &Key);
	DYNAMIC void __fastcall KeyDown(Word &Key, Classes::TShiftState Shift);
	
public:
	__fastcall virtual TInspectorDateTimePicker(Classes::TComponent* AOwner);
	virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
	
__published:
	__property System::TDateTime OrigValue = {read=FOrigValue, write=FOrigValue};
	__property TInspectorItem* InspectorItem = {read=FInspectorItem, write=FInspectorItem};
public:
	#pragma option push -w-inl
	/* TCommonCalendar.Destroy */ inline __fastcall virtual ~TInspectorDateTimePicker(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TInspectorDateTimePicker(HWND ParentWindow) : Inspedits::TInspDateTimePicker(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TInspectorCaption;
class DELPHICLASS TInspectorBar;
class DELPHICLASS TInspectorPanels;
class PASCALIMPLEMENTATION TInspectorPanels : public Classes::TOwnedCollection 
{
	typedef Classes::TOwnedCollection inherited;
	
public:
	TInspectorPanel* operator[](int Index) { return Items[Index]; }
	
private:
	TInspectorBar* FOwner;
	HIDESBASE TInspectorPanel* __fastcall GetItem(int Index);
	HIDESBASE void __fastcall SetItem(int Index, const TInspectorPanel* Value);
	
protected:
	virtual void __fastcall Update(Classes::TCollectionItem* Item);
	
public:
	virtual TMetaClass* __fastcall CreateItemClass(void);
	__fastcall TInspectorPanels(TInspectorBar* AOwner);
	HIDESBASE TInspectorPanel* __fastcall Add(void);
	HIDESBASE TInspectorPanel* __fastcall Insert(int index);
	__property TInspectorPanel* Items[int Index] = {read=GetItem, write=SetItem/*, default*/};
public:
	#pragma option push -w-inl
	/* TCollection.Destroy */ inline __fastcall virtual ~TInspectorPanels(void) { }
	#pragma option pop
	
};


#pragma option push -b-
enum TInspectorBarMode { imSinglePanelActive, imMultiPanelActive };
#pragma option pop

#pragma option push -b-
enum TInplaceEditType { itCombo, itPicker, itBtnEdit, itNormal, itColorCombo };
#pragma option pop

class DELPHICLASS TInspectorBarDropTarget;
class PASCALIMPLEMENTATION TInspectorBarDropTarget : public Inspdd::TInspectorDropTarget 
{
	typedef Inspdd::TInspectorDropTarget inherited;
	
private:
	TInspectorBar* FInspectorBar;
	
public:
	__fastcall TInspectorBarDropTarget(TInspectorBar* AInspectorBar);
	__fastcall virtual ~TInspectorBarDropTarget(void);
	virtual void __fastcall DropText(const Types::TPoint &pt, AnsiString s);
	virtual void __fastcall DropURL(const Types::TPoint &pt, AnsiString s);
	virtual void __fastcall DropFiles(const Types::TPoint &pt, Classes::TStrings* Files);
	virtual void __fastcall DragMouseMove(const Types::TPoint &pt, bool &Allow, Inspdd::TDropFormats DropFormats);
	virtual void __fastcall DragMouseLeave(void);
};


class DELPHICLASS TInspectorHelp;
class PASCALIMPLEMENTATION TInspectorHelp : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	bool FVisible;
	int FHeight;
	Graphics::TColor FColor;
	Graphics::TFont* FFont;
	Classes::TNotifyEvent FOnChange;
	Controls::TBevelCut FBevelInner;
	Controls::TBevelCut FBevelOuter;
	int FBevelWidth;
	AnsiString FText;
	Graphics::TColor FColorTo;
	void __fastcall SetColor(const Graphics::TColor Value);
	void __fastcall SetFont(const Graphics::TFont* Value);
	void __fastcall SetHeight(const int Value);
	void __fastcall SetVisible(const bool Value);
	void __fastcall Changed(void);
	void __fastcall SetBevelInner(const Controls::TBevelCut Value);
	void __fastcall SetBevelOuter(const Controls::TBevelCut Value);
	void __fastcall SetBevelWidth(const int Value);
	void __fastcall SetText(const AnsiString Value);
	void __fastcall SetColorTo(const Graphics::TColor Value);
	
public:
	__fastcall TInspectorHelp(void);
	__fastcall virtual ~TInspectorHelp(void);
	
__published:
	__property Controls::TBevelCut BevelInner = {read=FBevelInner, write=SetBevelInner, nodefault};
	__property Controls::TBevelCut BevelOuter = {read=FBevelOuter, write=SetBevelOuter, nodefault};
	__property int BevelWidth = {read=FBevelWidth, write=SetBevelWidth, nodefault};
	__property Graphics::TColor Color = {read=FColor, write=SetColor, default=-16777201};
	__property Graphics::TColor ColorTo = {read=FColorTo, write=SetColorTo, default=536870911};
	__property Graphics::TFont* Font = {read=FFont, write=SetFont};
	__property int Height = {read=FHeight, write=SetHeight, nodefault};
	__property AnsiString Text = {read=FText, write=SetText};
	__property bool Visible = {read=FVisible, write=SetVisible, nodefault};
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
};


class DELPHICLASS TEditAlign;
class PASCALIMPLEMENTATION TEditAlign : public Stdctrls::TEdit 
{
	typedef Stdctrls::TEdit inherited;
	
protected:
	Classes::TAlignment FAlignment;
	virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
	void __fastcall SetAlignment(Classes::TAlignment AValue);
	
__published:
	__property Classes::TAlignment Alignment = {read=FAlignment, write=SetAlignment, nodefault};
public:
	#pragma option push -w-inl
	/* TCustomEdit.Create */ inline __fastcall virtual TEditAlign(Classes::TComponent* AOwner) : Stdctrls::TEdit(AOwner) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TEditAlign(HWND ParentWindow) : Stdctrls::TEdit(ParentWindow) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TWinControl.Destroy */ inline __fastcall virtual ~TEditAlign(void) { }
	#pragma option pop
	
};


#pragma option push -b-
enum TGradientDirection { gdVertical, gdHorizontal };
#pragma option pop

class PASCALIMPLEMENTATION TInspectorBar : public Extctrls::TCustomPanel 
{
	typedef Extctrls::TCustomPanel inherited;
	
private:
	Extctrls::TTimer* FRepeatTimer;
	TInspectorPanels* FPanels;
	int FTopPanel;
	TInspectorCaption* FInspectorCaption;
	bool FShowUP;
	bool FShowDown;
	AnsiString FHotAnchor;
	int FLastOpen;
	int FFirstOpen;
	TInspectorBarMode FMode;
	Stdctrls::TScrollBar* FScrollBar;
	int FOldWidth;
	Controls::TCursor FDefCursor;
	TInspectorItem* FMouseItem;
	int FMousePanel;
	bool FMouseDown;
	Graphics::TBitmap* FShadedHeader;
	bool FFlat;
	TInspectorEdit* FInspectorEdit;
	TInspectorCombo* FInspectorCombo;
	TInspectorColorCombo* FInspectorColorCombo;
	TInspectorSpin* FInspectorSpin;
	TInspectorEditBtn* FInspectorEditBtn;
	TInspectorDateTimePicker* FInspectorDateTimePicker;
	bool FEditing;
	TInspectorItem* FEditItem;
	TInspectorItem* FEditLast;
	bool FDisableExit;
	TInspectorItemEvent FOnItemClick;
	TInspectorPanelEvent FOnPanelOpen;
	TInspectorPanelEvent FOnPanelClose;
	TStartLabelEdit FOnStartLabelEdit;
	TStopLabelEdit FOnStopLabelEdit;
	Controls::TImageList* FImages;
	bool FIsWinXP;
	AnsiString FOldHint;
	TInspectorItemEvent FOnEditStart;
	TInspectorItemEvent FOnEditStop;
	TGetValueListEvent FOnGetValueList;
	TItemDrawEvent FOnItemDraw;
	TPanelDrawEvent FOnPanelDraw;
	bool FAutoAdvance;
	TInplaceEditType FEditType;
	TInspectorItemEvent FOnEditUpdate;
	TInspectorItemEvent FOnEditDblClick;
	TInspectorItemEvent FOnEditBtnClick;
	TInspectorURLEvent FOnURLClick;
	bool FAcceptFiles;
	TInspectorFileDropEvent FOnFileDrop;
	TInspectorItemEvent FOnItemRightClick;
	bool FShowFocus;
	bool FOleDropTarget;
	Menus::TPopupMenu* FMainPopupMenu;
	TInspectorBarDropTarget* FInspectorDropTarget;
	bool FOleDropTargetAssigned;
	TInspectorFileDropEvent FOnURLDrop;
	TCustomEditButtonEvent FOnCustomEditButton;
	TCustomEditDrawEvent FOnCustomEditDraw;
	bool FShowEditorAlways;
	TInspectorHelp* FInspectorHelp;
	TInspectorItemEvent FOnButtonClick;
	TInspectorItemEditEvent FOnEditSpinUp;
	TInspectorItemEditEvent FOnEditSpinDown;
	TInspectorItemEditEvent FOnEditSpinChange;
	TInspectorItemComboEvent FOnEditComboChange;
	TInspectorItemColorEvent FOnEditColorChange;
	AnsiString FCheckTrue;
	AnsiString FCheckFalse;
	#pragma pack(push,1)
	Types::TRect FButtonRect;
	#pragma pack(pop)
	bool FButtonUpPress;
	bool FButtonDownPress;
	TInspectorItemAnchorEvent FOnItemAnchorClick;
	TInspectorItemEvent FOnItemClose;
	TInspectorItemEvent FOnItemOpen;
	THelpAnchorEvent FOnHelpAnchorClick;
	TInspectorItemEvent FOnEditAutoAdvance;
	TInspectorItemEvent FOnItemDblClick;
	TInspectorItem* iteminplace;
	TEditAlign* FEditInplace;
	Stdctrls::TMemo* FmemoInplace;
	Stdctrls::TMemo* FhideMemo;
	bool FEllipsis;
	int FUpdateCount;
	bool FCheckTextShow;
	TInspectorBarStyle FStyle;
	Graphics::TColor FColorTo;
	TGradientDirection FDefaultGradientDirection;
	bool FAutoThemeAdapt;
	Graphics::TColor FHoverColorTo;
	TInspectorPanelEvent FOnPanelOpened;
	Graphics::TBitmap* FNodeOpenGlyph;