advoutlooklist.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) 'Advoutlooklist.pas' rev: 11.00

#ifndef AdvoutlooklistHPP
#define AdvoutlooklistHPP

#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 <Classes.hpp>	// Pascal unit
#include <Sysutils.hpp>	// Pascal unit
#include <Outlookgroupedlist.hpp>	// Pascal unit
#include <Extctrls.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Imglist.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Stdctrls.hpp>	// Pascal unit
#include <Comobj.hpp>	// Pascal unit
#include <Activex.hpp>	// Pascal unit
#include <Shlobj.hpp>	// Pascal unit
#include <Axctrls.hpp>	// Pascal unit
#include <Math.hpp>	// Pascal unit
#include <Picturecontainer.hpp>	// Pascal unit
#include <Advstyleif.hpp>	// Pascal unit
#include <Menus.hpp>	// Pascal unit

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

namespace Advoutlooklist
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TProOutlookGroupedList;
class PASCALIMPLEMENTATION TProOutlookGroupedList : public Outlookgroupedlist::TOutlookGroupedList 
{
	typedef Outlookgroupedlist::TOutlookGroupedList inherited;
	
public:
	#pragma option push -w-inl
	/* TOutlookGroupedList.Create */ inline __fastcall virtual TProOutlookGroupedList(Classes::TComponent* AOwner) : Outlookgroupedlist::TOutlookGroupedList(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TOutlookGroupedList.Destroy */ inline __fastcall virtual ~TProOutlookGroupedList(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TProOutlookGroupedList(HWND ParentWindow) : Outlookgroupedlist::TOutlookGroupedList(ParentWindow) { }
	#pragma option pop
	
};


#pragma option push -b-
enum TColumnType { ctText, ctImage, ctURL, ctCheckBox, ctProgress };
#pragma option pop

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

#pragma option push -b-
enum TCheckBoxStyle { cbsClassic, cbsFlat, cbsWinXP, cbsBorland };
#pragma option pop

#pragma option push -b-
enum TURLType { utHTTP, utHTTPS, utFTP, utMailTo, utNNTP };
#pragma option pop

#pragma option push -b-
enum TSortType { stNone, stTextCase, stTextNoCase, stNumeric, stBoolean, stDate, stTime, stDateTime, stCustom, stFloat };
#pragma option pop

#pragma option push -b-
enum TSortDirection { sdAscending, sdDescending };
#pragma option pop

#pragma option push -b-
enum TDragDropSetting { ddEnabled, ddDisabled };
#pragma option pop

#pragma option push -b-
enum TLookUpMethod { lmDirect, lmIncremental };
#pragma option pop

#pragma option push -b-
enum TGroupColumnDisplay { gdHidden, gdVisible };
#pragma option pop

#pragma option push -b-
enum TAdvOutlookListStyle { olsOffice2003Blue, olsOffice2003Silver, olsOffice2003Olive, olsOffice2003Classic, olsOffice2007Luna, olsOffice2007Obsidian, olsWindowsXP, olsWhidbey, olsCustom, olsOffice2007Silver };
#pragma option pop

class DELPHICLASS TAdvOutlookColumn;
class PASCALIMPLEMENTATION TAdvOutlookColumn : public Classes::TCollectionItem 
{
	typedef Classes::TCollectionItem inherited;
	
private:
	AnsiString FCaption;
	int FWidth;
	int FHeaderImageIndex;
	Classes::TAlignment FAlignment;
	Classes::TAlignment FHeaderAlignment;
	Graphics::TColor FHeaderColor;
	Graphics::TColor FHeaderColorTo;
	Graphics::TColor FColor;
	TColumnType FColumnType;
	Graphics::TFont* FHeaderFont;
	Graphics::TFont* FFont;
	TGradientDir FHeaderGradientDir;
	TURLType FURLType;
	TSortType FSortType;
	AnsiString FHeaderHint;
	bool FHeaderShowHint;
	AnsiString FHint;
	bool FShowHint;
	int FHeaderSecIndex;
	bool FVisible;
	int FGroupImageIndex;
	void __fastcall OnFontChanged(System::TObject* Sender);
	void __fastcall SetCaption(const AnsiString Value);
	void __fastcall SetWidth(const int Value);
	void __fastcall SetAlignment(const Classes::TAlignment Value);
	void __fastcall SetColor(const Graphics::TColor Value);
	void __fastcall SetColumnType(const TColumnType Value);
	void __fastcall SetFont(const Graphics::TFont* Value);
	void __fastcall SetHeaderAlignment(const Classes::TAlignment Value);
	void __fastcall SetHeaderColor(const Graphics::TColor Value);
	void __fastcall SetHeaderColorTo(const Graphics::TColor Value);
	void __fastcall SetHeaderFont(const Graphics::TFont* Value);
	void __fastcall SetHeaderImageIndex(const int Value);
	void __fastcall SetHeaderGradientDir(const TGradientDir Value);
	void __fastcall SetURLType(const TURLType Value);
	void __fastcall SetSortType(const TSortType Value);
	void __fastcall SetHeaderSecIndex(const int Value);
	void __fastcall SetVisible(const bool Value);
	void __fastcall SetGroupImageIndex(const int Value);
	
protected:
	HIDESBASE void __fastcall Changed(void);
	void __fastcall Refresh(void);
	virtual AnsiString __fastcall GetDisplayName();
	virtual void __fastcall SetIndex(int Value);
	__property int HeaderSecIndex = {read=FHeaderSecIndex, write=SetHeaderSecIndex, nodefault};
	
public:
	__fastcall virtual TAdvOutlookColumn(Classes::TCollection* Collection);
	__fastcall virtual ~TAdvOutlookColumn(void);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	
__published:
	__property AnsiString Caption = {read=FCaption, write=SetCaption};
	__property int Width = {read=FWidth, write=SetWidth, default=50};
	__property Graphics::TFont* Font = {read=FFont, write=SetFont};
	__property Graphics::TColor Color = {read=FColor, write=SetColor, default=536870911};
	__property Classes::TAlignment Alignment = {read=FAlignment, write=SetAlignment, default=0};
	__property TColumnType ColumnType = {read=FColumnType, write=SetColumnType, default=0};
	__property TURLType URLType = {read=FURLType, write=SetURLType, default=0};
	__property Graphics::TFont* HeaderFont = {read=FHeaderFont, write=SetHeaderFont};
	__property Graphics::TColor HeaderColor = {read=FHeaderColor, write=SetHeaderColor, default=16777215};
	__property Graphics::TColor HeaderColorTo = {read=FHeaderColorTo, write=SetHeaderColorTo, default=-16777201};
	__property TGradientDir HeaderGradientDir = {read=FHeaderGradientDir, write=SetHeaderGradientDir, default=0};
	__property Classes::TAlignment HeaderAlignment = {read=FHeaderAlignment, write=SetHeaderAlignment, default=2};
	__property int HeaderImageIndex = {read=FHeaderImageIndex, write=SetHeaderImageIndex, default=-1};
	__property AnsiString HeaderHint = {read=FHeaderHint, write=FHeaderHint};
	__property bool HeaderShowHint = {read=FHeaderShowHint, write=FHeaderShowHint, default=0};
	__property AnsiString Hint = {read=FHint, write=FHint};
	__property bool ShowHint = {read=FShowHint, write=FShowHint, default=0};
	__property TSortType SortType = {read=FSortType, write=SetSortType, default=2};
	__property bool Visible = {read=FVisible, write=SetVisible, default=1};
	__property int GroupImageIndex = {read=FGroupImageIndex, write=SetGroupImageIndex, default=-1};
};


class DELPHICLASS TAdvOutlookColumns;
class DELPHICLASS TAdvOutlookList;
class DELPHICLASS TAdvOutLookHeader;
typedef void __fastcall (__closure *THeaderClickEvent)(System::TObject* Sender, int SectionIndex);

typedef void __fastcall (__closure *THeaderDragDropEvent)(System::TObject* Sender, int FromSection, int ToSection);

class PASCALIMPLEMENTATION TAdvOutLookHeader : public Extctrls::THeader 
{
	typedef Extctrls::THeader inherited;
	
private:
	TAdvOutlookList* FOutLookList;
	THeaderClickEvent FOnClick;
	THeaderClickEvent FOnRightClick;
	THeaderClickEvent FOnDblClick;
	bool FSectionDragDrop;
	bool FDragging;
	int FDragStart;
	int FOffset;
	THeaderDragDropEvent FOnDragDrop;
	int FMouseOverSec;
	#pragma pack(push,1)
	Types::TPoint FMouseDragPos;
	#pragma pack(pop)
	bool FReSizing;
	Extctrls::TSectionEvent FOnSized;
	void __fastcall OwnOnDragDrop(System::TObject* Sender, int FromSection, int ToSection);
	void __fastcall OwnSizing(System::TObject* Sender, int ASection, int AWidth);
	void __fastcall OwnSized(System::TObject* Sender, int ASection, int AWidth);
	HIDESBASE MESSAGE void __fastcall CMHintShow(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall WMLButtonDown(Messages::TWMMouse &Message);
	HIDESBASE MESSAGE void __fastcall WMLButtonUp(Messages::TWMMouse &Message);
	HIDESBASE MESSAGE void __fastcall WMLButtonDblClk(Messages::TWMMouse &Message);
	HIDESBASE MESSAGE void __fastcall WMRButtonDown(Messages::TWMMouse &Message);
	HIDESBASE MESSAGE void __fastcall WMRButtonUp(Messages::TWMMouse &Message);
	
protected:
	virtual void __fastcall Paint(void);
	DYNAMIC void __fastcall MouseMove(Classes::TShiftState Shift, int X, int Y);
	int __fastcall XYToSection(int X, int Y);
	Types::TRect __fastcall GetSectionRect(int X);
	int __fastcall GetColIndex(int SecIndex);
	void __fastcall DrawSortIndicator(Graphics::TCanvas* Canvas, const Types::TRect &SectionRect, int X, int Y);
	
public:
	__fastcall virtual TAdvOutLookHeader(Classes::TComponent* AOwner);
	__fastcall virtual ~TAdvOutLookHeader(void);
	DYNAMIC void __fastcall Click(void);
	
__published:
	__property bool SectionDragDrop = {read=FSectionDragDrop, write=FSectionDragDrop, nodefault};
	__property THeaderClickEvent OnClick = {read=FOnClick, write=FOnClick};
	__property THeaderDragDropEvent OnDragDrop = {read=FOnDragDrop, write=FOnDragDrop};
	__property THeaderClickEvent OnDblClick = {read=FOnDblClick, write=FOnDblClick};
	__property THeaderClickEvent OnRightClick = {read=FOnRightClick, write=FOnRightClick};
	__property Extctrls::TSectionEvent OnSized = {read=FOnSized, write=FOnSized};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAdvOutLookHeader(HWND ParentWindow) : Extctrls::THeader(ParentWindow) { }
	#pragma option pop
	
};