slstbox.hpp

TMS component pack v4.2 for delphi

	__property TListSectionState State = {read=FState, write=SetState, nodefault};
	__property Classes::TStringList* SubItems = {read=FSubItems, write=SetSubItems};
	__property Graphics::TColor Color = {read=FColor, write=SetColor, nodefault};
	__property TSectionLines Lines = {read=FLines, write=SetLines, nodefault};
	__property Graphics::TFont* Font = {read=FFont, write=SetFont};
	__property TFontUsage FontUsage = {read=FFontUsage, write=SetFontUsage, nodefault};
	__property bool EndEllipsis = {read=FEndEllipsis, write=SetEndEllipsis, nodefault};
	__property TSectionControlType ControlType = {read=FControlType, write=SetControlType, nodefault};
	__property int RadioIndex = {read=FRadioIndex, write=SetRadioIndex, nodefault};
	__property TSortDirection SortDirection = {read=FSortDirection, write=SetSortDirection, nodefault};
	__property bool SortShow = {read=FSortShow, write=SetSortShow, nodefault};
	__property int Tag = {read=FTag, write=FTag, nodefault};
	__property bool OwnerDraw = {read=FOwnerdraw, write=SetOwnerDraw, nodefault};
	__property bool ReadOnly = {read=FReadOnly, write=SetReadOnly, nodefault};
	__property int ItemHeight = {read=FItemHeight, write=SetItemHeight, nodefault};
};


class DELPHICLASS TListSectionCollection;
class DELPHICLASS TSectionListBox;
class DELPHICLASS TTabPositionCollection;
class DELPHICLASS TTabPositionItem;
class PASCALIMPLEMENTATION TTabPositionCollection : public Classes::TCollection 
{
	typedef Classes::TCollection inherited;
	
private:
	TSectionListBox* FOwner;
	TTabPositionItem* __fastcall GetTabPos(int i);
	void __fastcall SetTabPos(int i, TTabPositionItem* tabpos);
	
public:
	__fastcall TTabPositionCollection(TSectionListBox* aOwner);
	HIDESBASE TTabPositionItem* __fastcall Add(void);
	__property TTabPositionItem* Items[int Index] = {read=GetTabPos, write=SetTabPos};
	
protected:
	DYNAMIC Classes::TPersistent* __fastcall GetOwner(void);
public:
	#pragma option push -w-inl
	/* TCollection.Destroy */ inline __fastcall virtual ~TTabPositionCollection(void) { }
	#pragma option pop
	
};


class DELPHICLASS TSectionMemo;
class PASCALIMPLEMENTATION TSectionMemo : public Stdctrls::TMemo 
{
	typedef Stdctrls::TMemo inherited;
	
private:
	HIDESBASE MESSAGE void __fastcall WMKeyDown(Messages::TWMKey &Msg);
	
protected:
	DYNAMIC void __fastcall DoEnter(void);
	DYNAMIC void __fastcall DoExit(void);
	
public:
	int SectionIdx;
	int SubItemIdx;
	int ItemIdx;
	TListSection* FListSection;
public:
	#pragma option push -w-inl
	/* TCustomMemo.Create */ inline __fastcall virtual TSectionMemo(Classes::TComponent* AOwner) : Stdctrls::TMemo(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCustomMemo.Destroy */ inline __fastcall virtual ~TSectionMemo(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TSectionMemo(HWND ParentWindow) : Stdctrls::TMemo(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TURLSettings;
class PASCALIMPLEMENTATION TURLSettings : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	bool FURLAware;
	Graphics::TColor FURLColor;
	bool FURLFull;
	Classes::TNotifyEvent FOnChange;
	void __fastcall SetURLAware(bool value);
	void __fastcall SetURLColor(Graphics::TColor value);
	void __fastcall SetURLFull(bool value);
	
public:
	__fastcall TURLSettings(void);
	__fastcall virtual ~TURLSettings(void);
	
__published:
	__property bool URLAware = {read=FURLAware, write=SetURLAware, nodefault};
	__property Graphics::TColor URLColor = {read=FURLColor, write=SetURLColor, nodefault};
	__property bool URLFull = {read=FURLFull, write=SetURLFull, nodefault};
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
};


class PASCALIMPLEMENTATION TSectionListBox : public Stdctrls::TCustomListBox 
{
	typedef Stdctrls::TCustomListBox inherited;
	
private:
	bool FHasScrollBar;
	bool FFlat;
	bool FWordWrap;
	Graphics::TBitmap* FWallpaper;
	short FImageSpacing;
	int FDtStyle;
	bool FFullFocus;
	bool FScrollTrack;
	Graphics::TFont* FSectionFont;
	int FSectionIndent;
	TListSectionCollection* FSections;
	Picturecontainer::THTMLPictureCache* FImageCache;
	Picturecontainer::TPictureContainer* FContainer;
	int FSectionHeight;
	int FSubItemIndent;
	int FSubItemHeight;
	TTabPositionCollection* FTabPositions;
	TExpandSectionEvent FOnExpandSection;
	TContractSectionEvent FOnContractSection;
	TContractSectionEvent FOnSectionRClick;
	TContractSectionEvent FOnSectionClick;
	TContractSectionEvent FOnSectionDblClk;
	TSubItemClickEvent FOnChange;
	TSubItemClickEvent FOnSubItemClick;
	TSubItemClickEvent FOnCheckBoxClick;
	TSubItemClickEvent FOnRadioClick;
	TSubItemClickEvent FOnSubItemRClick;
	TSubItemClickEvent FOnSubItemDblClk;
	TSubItemClickEvent FOnSubItemRDblClk;
	TInsertSubItemEvent FOnInsertSubItem;
	TDeleteSubItemEvent FOnDeleteSubItem;
	TInsertSectionEvent FOnInsertSection;
	TDeleteSectionEvent FOnDeleteSection;
	TDrawItemEvent FOnDrawItem;
	TDrawItemPropEvent FOnDrawItemProp;
	TEditEvent FOnStartEdit;
	TEditEvent FOnEndEdit;
	TAnchorClick FAnchorClick;
	TAnchorEvent FAnchorEnter;
	TAnchorEvent FAnchorExit;
	Controls::TCursor FOldCursor;
	Comctrls::TRichEdit* FRichEdit;
	TSectionMemo* FMemo;
	Controls::TImageList* FSectionImages;
	Controls::TImageList* FSubItemImages;
	TURLSettings* FURLSettings;
	int FUpdateCount;
	bool FOneExpanded;
	bool FExpandDisable;
	Graphics::TBitmap* FExpandGlyph;
	bool FContractDisable;
	Graphics::TBitmap* FContractGlyph;
	Graphics::TColor FSectionColor;
	TActiveSection FActiveSection;
	TListNodeType FNodeType;
	TSectionFocus FSectionFocus;
	TSListScrollStyle FScrollStyle;
	Graphics::TColor FScrollColor;
	int FScrollWidth;
	Graphics::TColor FSelectionColor;
	Graphics::TColor FSelectionTextColor;
	bool FTabSelect;
	bool FTabMove;
	bool FTabPosMove;
	int FTabPos;
	int FOldTabPos;
	AnsiString FOldAnchor;
	HIDESBASE MESSAGE void __fastcall CNDrawItem(Messages::TWMDrawItem &Message);
	HIDESBASE MESSAGE void __fastcall CNCommand(Messages::TWMCommand &Message);
	HIDESBASE MESSAGE void __fastcall WMVScroll(Messages::TWMScroll &WMScroll);
	HIDESBASE MESSAGE void __fastcall WMHScroll(Messages::TWMScroll &WMScroll);
	HIDESBASE MESSAGE void __fastcall WMEraseBkGnd(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall WMLButtonDblClk(Messages::TWMMouse &Message);
	HIDESBASE MESSAGE void __fastcall WMRButtonDBlClk(Messages::TWMMouse &Message);
	HIDESBASE MESSAGE void __fastcall WMLButtonDown(Messages::TWMMouse &Message);
	HIDESBASE MESSAGE void __fastcall WMLButtonUp(Messages::TWMMouse &Message);
	HIDESBASE MESSAGE void __fastcall WMRButtonDown(Messages::TWMMouse &Message);
	HIDESBASE MESSAGE void __fastcall WMDestroy(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall WMMouseMove(Messages::TWMMouse &Message);
	HIDESBASE MESSAGE void __fastcall WMSize(Messages::TWMSize &Msg);
	HIDESBASE MESSAGE void __fastcall WMPaint(Messages::TWMPaint &Msg);
	void __fastcall SetSections(TListSectionCollection* value);
	void __fastcall SetTabPositions(TTabPositionCollection* value);
	void __fastcall SetTabPosMove(bool value);
	void __fastcall SetSectionHeight(int value);
	void __fastcall SetSectionFont(Graphics::TFont* value);
	void __fastcall SetWordWrap(const bool value);
	void __fastcall SetOneExpanded(const bool value);
	void __fastcall SetURLSettings(TURLSettings* value);
	void __fastcall ToggleSectionState(int idx);
	HIDESBASE void __fastcall FontChanged(System::TObject* Sender);
	void __fastcall SetFlat(const bool value);
	void __fastcall SetWallpaper(Graphics::TBitmap* Value);
	void __fastcall WallPaperChanged(void);
	void __fastcall SetImageSpacing(const short value);
	void __fastcall SetSectionIndent(const int Value);
	void __fastcall SetSubItemIndent(const int Value);
	void __fastcall SetSubItemHeight(const int Value);
	void __fastcall SetSectionImages(const Controls::TImageList* Value);
	void __fastcall SetSubItemImages(const Controls::TImageList* Value);
	void __fastcall SetSectionColor(const Graphics::TColor Value);
	int __fastcall LinesInText(AnsiString s, bool multiline, int height);
	void __fastcall SetContractGlyph(const Graphics::TBitmap* Value);
	void __fastcall SetExpandGlyph(const Graphics::TBitmap* Value);
	void __fastcall SetNodeType(const TListNodeType Value);
	void __fastcall UpdateStyle(void);
	void __fastcall UpdateVScrollBar(void);
	void __fastcall UpdateHScrollBar(void);
	void __fastcall UpdateColor(void);
	void __fastcall UpdateWidth(void);
	void __fastcall SetScrollStyle(const TSListScrollStyle Value);
	void __fastcall SetScrollColor(const Graphics::TColor Value);
	HIDESBASE void __fastcall SetScrollWidth(const int Value);
	void __fastcall FlatSetScrollPos(int code, int pos, BOOL fRedraw);
	void __fastcall FlatSetScrollProp(int index, int newValue, BOOL fRedraw);
	void __fastcall FlatSetScrollInfo(int code, tagSCROLLINFO &scrollinfo, BOOL fRedraw);
	void __fastcall FlatShowScrollBar(int code, BOOL show);
	void __fastcall QuickSortSections(int left, int right);
	void __fastcall SetContainer(const Picturecontainer::TPictureContainer* Value);
	AnsiString __fastcall GetVersion();
	void __fastcall SetVersion(const AnsiString Value);
	
protected:
	bool FDestroyed;
	bool FExpandContractBusy;
	__property Items ;
	virtual int __fastcall GetVersionNr(void);
	void __fastcall UpdateItemHeight(void);
	void __fastcall UpdateHeight(int Index);
	virtual void __fastcall DrawItem(int Index, const Types::TRect &Rect, Windows::TOwnerDrawState State);
	virtual void __fastcall MeasureItem(int Index, int &Height);
	virtual void __fastcall CreateWnd(void);
	virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
	DYNAMIC void __fastcall KeyPress(char &ch);
	DYNAMIC void __fastcall KeyDown(Word &Key, Classes::TShiftState Shift);
	virtual void __fastcall Loaded(void);
	virtual void __fastcall WndProc(Messages::TMessage &Message);
	void __fastcall UpdateHorzScrollbar(void);
	void __fastcall DoPaint(void);