开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Delphi控件源码 > 查看源码
fctreeview.hpp
资源名称：qqdelphiprog.rar　[点击查看]
上传用户：hylc_2004
上传日期：2014-01-23
资源大小：46800k
文件大小：35k
源码类别：

Delphi控件源码

开发平台：

Delphi

fctreeview.hpp：源码内容
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1999 by Borland International
  3. // All rights reserved
  5. // (DO NOT EDIT: machine generated header) 'fcTreeView.pas' rev: 5.00
  7. #ifndef fcTreeViewHPP
  8. #define fcTreeViewHPP
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #pragma option push -Vx
  13. #include <Menus.hpp> // Pascal unit
  14. #include <ImgList.hpp> // Pascal unit
  15. #include <ShellAPI.hpp> // Pascal unit
  16. #include <fcCommon.hpp> // Pascal unit
  17. #include <ExtCtrls.hpp> // Pascal unit
  18. #include <fcCanvas.hpp> // Pascal unit
  19. #include <fccustomdraw.hpp> // Pascal unit
  20. #include <ComCtrls.hpp> // Pascal unit
  21. #include <Consts.hpp> // Pascal unit
  22. #include <ComStrs.hpp> // Pascal unit
  23. #include <Commctrl.hpp> // Pascal unit
  24. #include <Dialogs.hpp> // Pascal unit
  25. #include <Forms.hpp> // Pascal unit
  26. #include <Controls.hpp> // Pascal unit
  27. #include <Graphics.hpp> // Pascal unit
  28. #include <Classes.hpp> // Pascal unit
  29. #include <SysUtils.hpp> // Pascal unit
  30. #include <Messages.hpp> // Pascal unit
  31. #include <Windows.hpp> // Pascal unit
  32. #include <SysInit.hpp> // Pascal unit
  33. #include <System.hpp> // Pascal unit
  35. //-- user supplied -----------------------------------------------------------
  37. namespace Fctreeview
  38. {
  39. //-- type declarations -------------------------------------------------------
  40. #pragma option push -b-
  41. enum TfcItemState { fcisSelected, fcisGrayed, fcisDisabled, fcisChecked, fcisFocused, fcisDefault, fcisHot, 
  42. fcisMarked, fcisIndeterminate };
  43. #pragma option pop
  45. typedef Set<TfcItemState, fcisSelected, fcisIndeterminate>  TfcItemStates;
  47. class DELPHICLASS TfcCustomTreeView;
  48. class DELPHICLASS TfcTreeNode;
  49. typedef void __fastcall (__closure *TfcTVDrawTextEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* Node
  50. , const Windows::TRect &ARect, TfcItemStates AItemState, bool &DefaultDrawing);
  52. typedef void __fastcall (__closure *TfcTreeMouseMoveEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* 
  53. Node, Classes::TShiftState Shift, int X, int Y);
  55. typedef void __fastcall (__closure *TfcTreeMouseEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* Node
  56. , Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
  58. #pragma option push -b-
  59. enum TfcNodeState { fcnsCut, fcnsDropHilited, fcnsFocused, fcnsSelected, fcnsExpanded };
  60. #pragma option pop
  62. #pragma option push -b-
  63. enum TfcNodeAttachMode { fcnaAdd, fcnaAddFirst, fcnaAddChild, fcnaAddChildFirst, fcnaInsert, fcnaInsertAfter 
  64. };
  65. #pragma option pop
  67. #pragma option push -b-
  68. enum TfcAddMode { fctaAddFirst, fctaAdd, fctaInsert };
  69. #pragma option pop
  71. #pragma option push -b-
  72. enum TfcTreeViewCheckboxType { tvctNone, tvctCheckbox, tvctRadioGroup };
  73. #pragma option pop
  75. #pragma option push -b-
  76. enum TfcTreeViewOption { tvoExpandOnDblClk, tvoExpandButtons3D, tvoFlatCheckBoxes, tvoHideSelection, 
  77. tvoRowSelect, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoHotTrack, tvoAutoURL, tvoToolTips, tvoEditText, 
  78. tvo3StateCheckbox };
  79. #pragma option pop
  81. typedef Set<TfcTreeViewOption, tvoExpandOnDblClk, tvo3StateCheckbox>  TfcTreeViewOptions;
  83. struct TfcNodeInfo;
  84. typedef TfcNodeInfo *PfcNodeInfo;
  86. #pragma pack(push, 1)
  87. struct TfcNodeInfo
  88. {
  89. int ImageIndex;
  90. int SelectedIndex;
  91. int StateIndex;
  92. int OverlayIndex;
  93. TfcTreeViewCheckboxType CheckboxType;
  94. Byte Checked;
  95. bool Expanded;
  96. char DummyPad[3];
  97. void *Data;
  98. int StringDataSize1;
  99. int StringDataSize2;
  100. int Count;
  101. System::SmallString<255>  Text;
  102. } ;
  103. #pragma pack(pop)
  105. class DELPHICLASS TfcTreeNodes;
  106. struct TfcNodeCache
  107. {
  108. TfcTreeNode* CacheNode;
  109. int CacheIndex;
  110. } ;
  112. #pragma option push -b-
  113. enum TwwStoreData { sdStoreText, sdStoreData1, sdStoreData2 };
  114. #pragma option pop
  116. class PASCALIMPLEMENTATION TfcTreeNodes : public Classes::TPersistent 
  117. {
  118. typedef Classes::TPersistent inherited;
  120. private:
  121. TfcCustomTreeView* FOwner;
  122. int FUpdateCount;
  123. TfcNodeCache FNodeCache;
  124. bool InDestroy;
  125. void __fastcall AddedNode(TfcTreeNode* Value);
  126. HWND __fastcall GetHandle(void);
  127. TfcTreeNode* __fastcall GetNodeFromIndex(int Index);
  128. void __fastcall ReadData(Classes::TStream* Stream);
  129. void __fastcall Repaint(TfcTreeNode* Node);
  130. void __fastcall WriteData(Classes::TStream* Stream);
  131. void __fastcall ClearCache(void);
  132. void __fastcall ReadStreamVersion(Classes::TReader* Reader);
  133. void __fastcall WriteStreamVersion(Classes::TWriter* Writer);
  135. protected:
  136. HTREEITEM __fastcall AddItem(HTREEITEM Parent, HTREEITEM Target, const tagTVITEMA &Item, TfcAddMode 
  137. AddMode);
  138. TfcTreeNode* __fastcall InternalAddObject(TfcTreeNode* Node, const AnsiString S, void * Ptr, TfcAddMode 
  139. AddMode);
  140. virtual void __fastcall DefineProperties(Classes::TFiler* Filer);
  141. tagTVITEMA __fastcall CreateItem(TfcTreeNode* Node);
  142. int __fastcall GetCount(void);
  143. void __fastcall SetItem(int Index, TfcTreeNode* Value);
  144. void __fastcall SetUpdateState(bool Updating);
  146. public:
  147. __fastcall TfcTreeNodes(TfcCustomTreeView* AOwner);
  148. __fastcall virtual ~TfcTreeNodes(void);
  149. TfcTreeNode* __fastcall AddChildFirst(TfcTreeNode* Node, const AnsiString S);
  150. TfcTreeNode* __fastcall AddChild(TfcTreeNode* Node, const AnsiString S);
  151. TfcTreeNode* __fastcall AddChildObjectFirst(TfcTreeNode* Node, const AnsiString S, void * Ptr);
  152. TfcTreeNode* __fastcall AddChildObject(TfcTreeNode* Node, const AnsiString S, void * Ptr);
  153. TfcTreeNode* __fastcall AddFirst(TfcTreeNode* Node, const AnsiString S);
  154. TfcTreeNode* __fastcall Add(TfcTreeNode* Node, const AnsiString S);
  155. TfcTreeNode* __fastcall AddObjectFirst(TfcTreeNode* Node, const AnsiString S, void * Ptr);
  156. TfcTreeNode* __fastcall AddObject(TfcTreeNode* Node, const AnsiString S, void * Ptr);
  157. virtual void __fastcall Assign(Classes::TPersistent* Source);
  158. void __fastcall BeginUpdate(void);
  159. void __fastcall Clear(void);
  160. void __fastcall Delete(TfcTreeNode* Node);
  161. void __fastcall EndUpdate(void);
  162. TfcTreeNode* __fastcall GetFirstNode(void);
  163. TfcTreeNode* __fastcall GetNode(HTREEITEM ItemId);
  164. TfcTreeNode* __fastcall Insert(TfcTreeNode* Node, const AnsiString S);
  165. TfcTreeNode* __fastcall InsertObject(TfcTreeNode* Node, const AnsiString S, void * Ptr);
  166. TfcTreeNode* __fastcall FindNode(AnsiString SearchText, bool VisibleOnly);
  167. TfcTreeNode* __fastcall FindNodeInfo(AnsiString SearchText, bool VisibleOnly, TwwStoreData StoreDataUsing
  168. );
  169. __property int Count = {read=GetCount, nodefault};
  170. __property HWND Handle = {read=GetHandle, nodefault};
  171. __property TfcTreeNode* Item[int Index] = {read=GetNodeFromIndex/*, default*/};
  172. __property TfcCustomTreeView* Owner = {read=FOwner};
  173. };
  176. class PASCALIMPLEMENTATION TfcTreeNode : public Classes::TPersistent 
  177. {
  178. typedef Classes::TPersistent inherited;
  180. private:
  181. bool FMultiSelected;
  182. TfcTreeViewCheckboxType FCheckboxType;
  183. bool FChecked;
  184. TfcTreeNodes* FOwner;
  185. AnsiString FText;
  186. AnsiString FStringData1;
  187. AnsiString FStringData2;
  188. void *FData;
  189. _TREEITEM *FItemId;
  190. int FImageIndex;
  191. int FSelectedIndex;
  192. int FOverlayIndex;
  193. int FStateIndex;
  194. bool FDeleting;
  195. bool FInTree;
  196. bool FGrayed;
  197. void __fastcall SetCheckboxType(TfcTreeViewCheckboxType val);
  198. bool __fastcall CompareCount(int CompareMe);
  199. bool __fastcall DoCanExpand(bool Expand);
  200. void __fastcall DoExpand(bool Expand);
  201. void __fastcall ExpandItem(bool Expand, bool Recurse);
  202. int __fastcall GetAbsoluteIndex(void);
  203. bool __fastcall GetExpanded(void);
  204. int __fastcall GetLevel(void);
  205. TfcTreeNode* __fastcall GetParent(void);
  206. bool __fastcall GetChildren(void);
  207. bool __fastcall GetCut(void);
  208. bool __fastcall GetDropTarget(void);
  209. bool __fastcall GetFocused(void);
  210. int __fastcall GetIndex(void);
  211. TfcTreeNode* __fastcall GetItem(int Index);
  212. bool __fastcall GetSelected(void);
  213. bool __fastcall GetState(TfcNodeState NodeState);
  214. int __fastcall GetCount(void);
  215. TfcCustomTreeView* __fastcall GetTreeView(void);
  216. void __fastcall InternalMove(TfcTreeNode* ParentNode, TfcTreeNode* Node, HTREEITEM HItem, TfcAddMode 
  217. AddMode);
  218. bool __fastcall IsNodeVisible(void);
  219. void __fastcall SetChildren(bool Value);
  220. void __fastcall SetCut(bool Value);
  221. void __fastcall SetData(void * Value);
  222. void __fastcall SetDropTarget(bool Value);
  223. void __fastcall SetItem(int Index, TfcTreeNode* Value);
  224. void __fastcall SetExpanded(bool Value);
  225. void __fastcall SetFocused(bool Value);
  226. void __fastcall SetImageIndex(int Value);
  227. void __fastcall SetOverlayIndex(int Value);
  228. void __fastcall SetSelectedIndex(int Value);
  229. void __fastcall SetSelected(bool Value);
  230. void __fastcall SetStateIndex(int Value);
  231. void __fastcall SetText(const AnsiString S);
  232. bool __fastcall GetMultiSelected(void);
  233. void __fastcall SetMultiSelected(bool Value);
  234. void __fastcall SetChecked(bool val);
  235. void __fastcall SetGrayed(bool val);
  237. protected:
  238. int ReadDataSize;
  239. virtual void __fastcall Invalidate(void);
  240. virtual int __fastcall GetSizeOfNodeInfo(void);
  241. virtual void __fastcall ReadData(Classes::TStream* Stream, PfcNodeInfo Info);
  242. virtual void __fastcall WriteData(Classes::TStream* Stream, PfcNodeInfo Info);
  244. public:
  245. Variant Patch;
  246. int __fastcall GetStateIndex(void);
  247. bool __fastcall IsRadioGroup(void);
  248. virtual AnsiString __fastcall GetSortText(void);
  249. __fastcall virtual TfcTreeNode(TfcTreeNodes* AOwner);
  250. __fastcall virtual ~TfcTreeNode(void);
  251. bool __fastcall AlphaSort(void);
  252. virtual void __fastcall Assign(Classes::TPersistent* Source);
  253. void __fastcall Collapse(bool Recurse);
  254. bool __fastcall CustomSort(PFNTVCOMPARE SortProc, int Data);
  255. void __fastcall Delete(void);
  256. void __fastcall DeleteChildren(void);
  257. Windows::TRect __fastcall DisplayRect(bool TextOnly);
  258. bool __fastcall EditText(void);
  259. void __fastcall EndEdit(bool Cancel);
  260. void __fastcall Expand(bool Recurse);
  261. TfcTreeNode* __fastcall GetFirstChild(void);
  262. HWND __fastcall GetHandle(void);
  263. TfcTreeNode* __fastcall GetLastChild(void);
  264. TfcTreeNode* __fastcall GetNext(void);
  265. TfcTreeNode* __fastcall GetNextChild(TfcTreeNode* Value);
  266. TfcTreeNode* __fastcall GetNextSibling(void);
  267. TfcTreeNode* __fastcall GetNextVisible(void);
  268. TfcTreeNode* __fastcall GetPrev(void);
  269. TfcTreeNode* __fastcall GetPrevChild(TfcTreeNode* Value);
  270. TfcTreeNode* __fastcall GetPrevSibling(void);
  271. TfcTreeNode* __fastcall GetPrevVisible(void);
  272. bool __fastcall HasAsParent(TfcTreeNode* Value);
  273. int __fastcall IndexOf(TfcTreeNode* Value);
  274. void __fastcall MakeVisible(void);
  275. virtual void __fastcall MoveTo(TfcTreeNode* Destination, TfcNodeAttachMode Mode);
  276. __property int AbsoluteIndex = {read=GetAbsoluteIndex, nodefault};
  277. __property int Count = {read=GetCount, nodefault};
  278. __property bool Cut = {read=GetCut, write=SetCut, nodefault};
  279. __property void * Data = {read=FData, write=SetData};
  280. __property bool Deleting = {read=FDeleting, nodefault};
  281. __property bool Focused = {read=GetFocused, write=SetFocused, nodefault};
  282. __property bool DropTarget = {read=GetDropTarget, write=SetDropTarget, nodefault};
  283. __property bool Selected = {read=GetSelected, write=SetSelected, nodefault};
  284. __property bool Expanded = {read=GetExpanded, write=SetExpanded, nodefault};
  285. __property HWND Handle = {read=GetHandle, nodefault};
  286. __property bool HasChildren = {read=GetChildren, write=SetChildren, nodefault};
  287. __property int ImageIndex = {read=FImageIndex, write=SetImageIndex, nodefault};
  288. __property int Index = {read=GetIndex, nodefault};
  289. __property bool IsVisible = {read=IsNodeVisible, nodefault};
  290. __property TfcTreeNode* Item[int Index] = {read=GetItem, write=SetItem/*, default*/};
  291. __property HTREEITEM ItemId = {read=FItemId};
  292. __property int Level = {read=GetLevel, nodefault};
  293. __property int OverlayIndex = {read=FOverlayIndex, write=SetOverlayIndex, nodefault};
  294. __property TfcTreeNodes* Owner = {read=FOwner};
  295. __property TfcTreeNode* Parent = {read=GetParent};
  296. __property int SelectedIndex = {read=FSelectedIndex, write=SetSelectedIndex, nodefault};
  297. __property int StateIndex = {read=FStateIndex, write=SetStateIndex, nodefault};
  298. __property AnsiString Text = {read=FText, write=SetText};
  299. __property AnsiString StringData = {read=FStringData1, write=FStringData1};
  300. __property AnsiString StringData2 = {read=FStringData2, write=FStringData2};
  301. __property TfcCustomTreeView* TreeView = {read=GetTreeView};
  302. __property bool Checked = {read=FChecked, write=SetChecked, nodefault};
  303. __property bool Grayed = {read=FGrayed, write=SetGrayed, nodefault};
  304. __property TfcTreeViewCheckboxType CheckboxType = {read=FCheckboxType, write=SetCheckboxType, nodefault
  305. };
  306. __property bool MultiSelected = {read=GetMultiSelected, write=SetMultiSelected, nodefault};
  307. };
  310. typedef TfcNodeCache *PfcNodeCache;
  312. class DELPHICLASS TfcTVMultiSelectAttributes;
  313. class PASCALIMPLEMENTATION TfcTVMultiSelectAttributes : public Classes::TPersistent 
  314. {
  315. typedef Classes::TPersistent inherited;
  317. private:
  318. bool FEnabled;
  319. bool FAutoUnselect;
  320. int FMultiSelectLevel;
  321. bool FMultiSelectCheckbox;
  322. TfcCustomTreeView* TreeView;
  323. void __fastcall SetEnabled(bool val);
  324. void __fastcall SetMultiSelectLevel(int val);
  325. void __fastcall SetMultiSelectCheckBox(bool val);
  327. public:
  328. __fastcall TfcTVMultiSelectAttributes(Classes::TComponent* Owner);
  329. virtual void __fastcall Assign(Classes::TPersistent* Source);
  331. __published:
  332. __property bool AutoUnselect = {read=FAutoUnselect, write=FAutoUnselect, default=1};
  333. __property bool Enabled = {read=FEnabled, write=SetEnabled, default=0};
  334. __property int MultiSelectLevel = {read=FMultiSelectLevel, write=SetMultiSelectLevel, default=0};
  335. __property bool MultiSelectCheckbox = {read=FMultiSelectCheckbox, write=SetMultiSelectCheckBox, default=1
  336. };
  337. public:
  338. #pragma option push -w-inl
  339. /* TPersistent.Destroy */ inline __fastcall virtual ~TfcTVMultiSelectAttributes(void) { }
  340. #pragma option pop
  342. };
  345. #pragma option push -b-
  346. enum TfcHitTest { fchtAbove, fchtBelow, fchtNowhere, fchtOnItem, fchtOnButton, fchtOnIcon, fchtOnIndent, 
  347. fchtOnLabel, fchtOnRight, fchtOnStateIcon, fchtToLeft, fchtToRight };
  348. #pragma option pop
  350. typedef Set<TfcHitTest, fchtAbove, fchtToRight>  TfcHitTests;
  352. #pragma option push -b-
  353. enum TfcSortType { fcstNone, fcstData, fcstText, fcstBoth };
  354. #pragma option pop
  356. class DELPHICLASS EfcTreeViewError;
  357. class PASCALIMPLEMENTATION EfcTreeViewError : public Sysutils::Exception 
  358. {
  359. typedef Sysutils::Exception inherited;
  361. public:
  362. #pragma option push -w-inl
  363. /* Exception.Create */ inline __fastcall EfcTreeViewError(const AnsiString Msg) : Sysutils::Exception(
  364. Msg) { }
  365. #pragma option pop
  366. #pragma option push -w-inl
  367. /* Exception.CreateFmt */ inline __fastcall EfcTreeViewError(const AnsiString Msg, const System::TVarRec 
  368. * Args, const int Args_Size) : Sysutils::Exception(Msg, Args, Args_Size) { }
  369. #pragma option pop
  370. #pragma option push -w-inl
  371. /* Exception.CreateRes */ inline __fastcall EfcTreeViewError(int Ident)/* overload */ : Sysutils::Exception(
  372. Ident) { }
  373. #pragma option pop
  374. #pragma option push -w-inl
  375. /* Exception.CreateResFmt */ inline __fastcall EfcTreeViewError(int Ident, const System::TVarRec * 
  376. Args, const int Args_Size)/* overload */ : Sysutils::Exception(Ident, Args, Args_Size) { }
  377. #pragma option pop
  378. #pragma option push -w-inl
  379. /* Exception.CreateHelp */ inline __fastcall EfcTreeViewError(const AnsiString Msg, int AHelpContext
  380. ) : Sysutils::Exception(Msg, AHelpContext) { }
  381. #pragma option pop
  382. #pragma option push -w-inl
  383. /* Exception.CreateFmtHelp */ inline __fastcall EfcTreeViewError(const AnsiString Msg, const System::TVarRec 
  384. * Args, const int Args_Size, int AHelpContext) : Sysutils::Exception(Msg, Args, Args_Size, AHelpContext
  385. ) { }
  386. #pragma option pop
  387. #pragma option push -w-inl
  388. /* Exception.CreateResHelp */ inline __fastcall EfcTreeViewError(int Ident, int AHelpContext)/* overload */
  389.  : Sysutils::Exception(Ident, AHelpContext) { }
  390. #pragma option pop
  391. #pragma option push -w-inl
  392. /* Exception.CreateResFmtHelp */ inline __fastcall EfcTreeViewError(System::PResStringRec ResStringRec
  393. , const System::TVarRec * Args, const int Args_Size, int AHelpContext)/* overload */ : Sysutils::Exception(
  394. ResStringRec, Args, Args_Size, AHelpContext) { }
  395. #pragma option pop
  397. public:
  398. #pragma option push -w-inl
  399. /* TObject.Destroy */ inline __fastcall virtual ~EfcTreeViewError(void) { }
  400. #pragma option pop
  402. };
  405. typedef void __fastcall (__closure *TfcTVChangingEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* Node
  406. , bool &AllowChange);
  408. typedef void __fastcall (__closure *TfcTVChangedEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* Node
  409. );
  411. typedef void __fastcall (__closure *TfcTVEditingEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* Node
  412. , bool &AllowEdit);
  414. typedef void __fastcall (__closure *TfcTVEditedEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* Node
  415. , AnsiString &S);
  417. typedef void __fastcall (__closure *TfcTVExpandingEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* Node
  418. , bool &AllowExpansion);
  420. typedef void __fastcall (__closure *TfcTVCollapsingEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* 
  421. Node, bool &AllowCollapse);
  423. typedef void __fastcall (__closure *TfcTVExpandedEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* Node
  424. );
  426. typedef void __fastcall (__closure *TfcTVCompareEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* Node1
  427. , TfcTreeNode* Node2, int Data, int &Compare);
  429. typedef void __fastcall (__closure *TfcTVCustomDrawEvent)(TfcCustomTreeView* TreeView, const Windows::TRect 
  430. &ARect, bool &DefaultDraw);
  432. typedef void __fastcall (__closure *TfcCalcNodeAttributesEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* 
  433. Node, TfcItemStates State);
  435. #pragma option push -b-
  436. enum TfcItemChangeAction { icaAdd, icaDelete, icaText, icaImageIndex };
  437. #pragma option pop
  439. typedef void __fastcall (__closure *TfcItemChangeEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* Node
  440. , TfcItemChangeAction Action, const Variant &NewValue);
  442. typedef void __fastcall (__closure *TfcToggleCheckboxEvent)(TfcCustomTreeView* TreeView, TfcTreeNode* 
  443. Node);
  445. typedef TMetaClass*TfcTreeNodeClass;
  447. class PASCALIMPLEMENTATION TfcCustomTreeView : public Controls::TWinControl 
  448. {
  449. typedef Controls::TWinControl inherited;
  451. private:
  452. TfcItemChangeEvent FOnItemChange;
  453. bool FAutoExpand;
  454. Forms::TFormBorderStyle FBorderStyle;
  455. Fccanvas::TfcCanvas* FCanvas;
  456. Fccanvas::TfcCanvas* FPaintCanvas;
  457. bool FCanvasChanged;
  458. void *FDefEditProc;
  459. bool FDragged;
  460. Controls::TDragImageList* FDragImage;
  461. TfcTreeNode* FDragNode;
  462. HWND FEditHandle;
  463. void *FEditInstance;
  464. Imglist::TChangeLink* FImageChangeLink;
  465. Imglist::TCustomImageList* FImages;
  466. TfcTreeNode* FLastDropTarget;
  467. bool FManualNotify;
  468. Classes::TMemoryStream* FMemStream;
  469. TfcTreeNode* FRClickNode;
  470. bool FRightClickSelects;
  471. bool FReadOnly;
  472. int FSaveIndex;
  473. int FSaveIndent;
  474. Classes::TStringList* FSaveItems;
  475. int FSaveTopIndex;
  476. TfcSortType FSortType;
  477. bool FStateChanging;
  478. Imglist::TCustomImageList* FStateImages;
  479. Imglist::TChangeLink* FStateChangeLink;
  480. bool FStreamExpandedNode;
  481. TfcTreeNodes* FTreeNodes;
  482. WideString FWideText;
  483. TfcTVEditingEvent FOnEditing;
  484. TfcTVEditedEvent FOnEdited;
  485. TfcTVExpandedEvent FOnExpanded;
  486. TfcTVExpandingEvent FOnExpanding;
  487. TfcTVExpandedEvent FOnCollapsed;
  488. TfcTVCollapsingEvent FOnCollapsing;
  489. TfcTVChangingEvent FOnChanging;
  490. TfcTVChangedEvent FOnChange;
  491. TfcTVCompareEvent FOnCompare;
  492. TfcTVExpandedEvent FOnDeletion;
  493. TfcTVExpandedEvent FOnGetImageIndex;
  494. TfcTVExpandedEvent FOnGetSelectedIndex;
  495. Graphics::TColor FLineColor;
  496. Graphics::TColor FInactiveFocusColor;
  497. TfcTreeMouseEvent FOnMouseDown;
  498. TfcTreeMouseEvent FOnMouseUp;
  499. TfcTreeMouseEvent FOnDblClick;
  500. TfcTreeMouseMoveEvent FOnMouseMove;
  501. TfcToggleCheckboxEvent FOnToggleCheckbox;
  502. TMetaClass*FNodeClass;
  503. TfcTVMultiSelectAttributes* FMultiSelectAttributes;
  504. TfcCalcNodeAttributesEvent FOnCalcNodeAttributes;
  505. int FBorderWidth;
  506. TfcTVDrawTextEvent FOnDrawText;
  507. TfcTreeViewOptions FOptions;
  508. bool FDisableThemes;
  509. Graphics::TBitmap* FPaintBitmap;
  510. int FIndent;
  511. TfcTreeNode* LastSelectedNode;
  512. TfcTreeNode* MouseNode;
  513. TfcTreeNode* LastMouseMoveNode;
  514. TfcHitTests LastMouseHitTest;
  515. TfcTreeNode* ClickedNode;
  516. bool Down;
  517. TfcTreeNode* EditNode;
  518. TfcTreeNode* BeforeMouseDownNode;
  519. int FStreamVersion;
  520. bool FUsePaintBuffering;
  521. void __fastcall CanvasChanged(System::TObject* Sender);
  522. HIDESBASE MESSAGE void __fastcall CMColorChanged(Messages::TMessage &Message);
  523. HIDESBASE MESSAGE void __fastcall CMCtl3DChanged(Messages::TMessage &Message);
  524. HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &Message);
  525. HIDESBASE MESSAGE void __fastcall CMDrag(Controls::TCMDrag &Message);
  526. MESSAGE void __fastcall CNNotify(Messages::TWMNotify &Message);
  527. HIDESBASE MESSAGE void __fastcall WMNCHitTest(Messages::TWMNCHitTest &Message);
  528. void __fastcall EditWndProc(Messages::TMessage &Message);
  529. void __fastcall DoDragOver(Controls::TDragObject* Source, int X, int Y, bool CanDrop);
  530. int __fastcall GetChangeDelay(void);
  531. TfcTreeNode* __fastcall GetDropTarget(void);
  532. int __fastcall GetIndent(void);
  533. TfcTreeNode* __fastcall GetNodeFromItem(const tagTVITEMA &Item);
  534. TfcTreeNode* __fastcall GetSelection(void);
  535. TfcTreeNode* __fastcall GetTopItem(void);
  536. void __fastcall ImageListChange(System::TObject* Sender);
  537. void __fastcall SetAutoExpand(bool Value);
  538. void __fastcall SetBorderStyle(Forms::TBorderStyle Value);
  539. void __fastcall SetChangeDelay(int Value);
  540. void __fastcall SetDropTarget(TfcTreeNode* Value);
  541. void __fastcall SetImageList(unsigned Value, int Flags);
  542. void __fastcall SetIndent(int Value);
  543. void __fastcall SetImages(Imglist::TCustomImageList* Value);
  544. void __fastcall SetReadOnly(bool Value);
  545. void __fastcall SetSelection(TfcTreeNode* Value);
  546. void __fastcall SetSortType(TfcSortType Value);
  547. void __fastcall SetStateImages(Imglist::TCustomImageList* Value);
  548. void __fastcall SeTfcTreeNodes(TfcTreeNodes* Value);
  549. void __fastcall SetTopItem(TfcTreeNode* Value);
  550. void __fastcall OnChangeTimer(System::TObject* Sender);
  551. HIDESBASE MESSAGE void __fastcall WMLButtonDown(Messages::TWMMouse &Message);
  552. HIDESBASE MESSAGE void __fastcall WMRButtonDown(Messages::TWMMouse &Message);
  553. HIDESBASE MESSAGE void __fastcall WMRButtonUp(Messages::TWMMouse &Message);
  554. HIDESBASE MESSAGE void __fastcall WMLButtonDblClk(Messages::TWMMouse &Message);
  555. HIDESBASE MESSAGE void __fastcall WMNotify(Messages::TWMNotify &Message);
  556. HIDESBASE MESSAGE void __fastcall CMSysColorChange(Messages::TMessage &Message);
  557. HIDESBASE MESSAGE void __fastcall WMPaint(Messages::TWMPaint &Message);
  558. HIDESBASE MESSAGE void __fastcall WMEraseBkgnd(Messages::TWMEraseBkgnd &Message);
  559. HIDESBASE MESSAGE void __fastcall CMExit(Messages::TMessage &Message);
  560. HIDESBASE MESSAGE void __fastcall CMDesignHitTest(Messages::TWMMouse &Message);
  561. HIDESBASE MESSAGE void __fastcall WMDestroy(Messages::TWMNoParams &Message);
  562. bool __fastcall ValidMultiSelectLevel(int ALevel);
  563. bool __fastcall CheckboxNeeded(TfcTreeNode* Node);
  564. Windows::TPoint __fastcall GetCenterPoint(const Windows::TRect &ARect);
  565. void __fastcall SetOptions(TfcTreeViewOptions Value);
  566. void __fastcall SetLineColor(Graphics::TColor Value);
  567. void __fastcall SetInactiveFocusColor(Graphics::TColor Value);
  568. Shortint __fastcall GetItemHeight(void);
  569. void __fastcall SetItemHeight(Shortint Value);
  570. int __fastcall GetScrollTime(void);
  571. void __fastcall SetScrollTime(int Value);
  572. int __fastcall GetMultiSelectListCount(void);
  573. TfcTreeNode* __fastcall GetMultiSelectItem(int Index);
  574. void __fastcall HintTimerEvent(System::TObject* Sender);
  575. Fccanvas::TfcCanvas* __fastcall GetPaintCanvas(void);
  577. protected:
  578. Classes::TList* FMultiSelectList;
  579. bool SkipErase;
  580. bool SkipChangeMessages;
  581. bool InLoading;
  582. Extctrls::TTimer* FChangeTimer;
  583. int DisplayedItems;
  584. bool FMouseInControl;
  585. Controls::THintWindow* HintWindow;
  586. Extctrls::TTimer* HintTimer;
  587. int HintTimerCount;
  588. TfcTreeNode* LastHintNode;
  589. DYNAMIC bool __fastcall CanEdit(TfcTreeNode* Node);
  590. DYNAMIC bool __fastcall CanChange(TfcTreeNode* Node);
  591. DYNAMIC bool __fastcall CanCollapse(TfcTreeNode* Node);
  592. DYNAMIC bool __fastcall CanExpand(TfcTreeNode* Node);
  593. DYNAMIC void __fastcall Change(TfcTreeNode* Node);
  594. DYNAMIC void __fastcall Collapse(TfcTreeNode* Node);
  595. virtual TfcTreeNode* __fastcall CreateNode(void);
  596. virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
  597. virtual void __fastcall CreateWnd(void);
  598. DYNAMIC void __fastcall Delete(TfcTreeNode* Node);
  599. virtual void __fastcall DestroyWnd(void);
  600. DYNAMIC void __fastcall DoEndDrag(System::TObject* Target, int X, int Y);
  601. DYNAMIC void __fastcall DoStartDrag(Controls::TDragObject* &DragObject);
  602. DYNAMIC void __fastcall Edit(const tagTVITEMA &Item);
  603. DYNAMIC void __fastcall Expand(TfcTreeNode* Node);
  604. virtual Controls::TDragImageList* __fastcall GetDragImages(void);
  605. virtual void __fastcall GetImageIndex(TfcTreeNode* Node);
  606. virtual void __fastcall GetSelectedIndex(TfcTreeNode* Node);
  607. virtual void __fastcall Loaded(void);
  608. DYNAMIC void __fastcall KeyPress(char &Key);
  609. DYNAMIC void __fastcall KeyDown(Word &Key, Classes::TShiftState Shift);
  610. virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation
  611. );
  612. virtual void __fastcall SetDragMode(Controls::TDragMode Value);
  613. virtual void __fastcall WndProc(Messages::TMessage &Message);
  614. __property bool AutoExpand = {read=FAutoExpand, write=SetAutoExpand, default=0};
  615. __property Forms::TBorderStyle BorderStyle = {read=FBorderStyle, write=SetBorderStyle, default=1};
  616. __property int ChangeDelay = {read=GetChangeDelay, write=SetChangeDelay, default=0};
  617. __property Imglist::TCustomImageList* Images = {read=FImages, write=SetImages};
  618. __property int Indent = {read=GetIndent, write=SetIndent, nodefault};
  619. __property bool ReadOnly = {read=FReadOnly, write=SetReadOnly, default=0};
  620. __property bool RightClickSelects = {read=FRightClickSelects, write=FRightClickSelects, default=0};
  622. __property TfcSortType SortType = {read=FSortType, write=SetSortType, default=0};
  623. __property Imglist::TCustomImageList* StateImages = {read=FStateImages, write=SetStateImages};
  624. __property bool StreamExpandedNode = {read=FStreamExpandedNode, write=FStreamExpandedNode, default=0
  625. };
  626. __property TfcTVEditingEvent OnEditing = {read=FOnEditing, write=FOnEditing};
  627. __property TfcTVEditedEvent OnEdited = {read=FOnEdited, write=FOnEdited};
  628. __property TfcTVExpandingEvent OnExpanding = {read=FOnExpanding, write=FOnExpanding};
  629. __property TfcTVExpandedEvent OnExpanded = {read=FOnExpanded, write=FOnExpanded};
  630. __property TfcTVCollapsingEvent OnCollapsing = {read=FOnCollapsing, write=FOnCollapsing};
  631. __property TfcTVExpandedEvent OnCollapsed = {read=FOnCollapsed, write=FOnCollapsed};
  632. __property TfcTVChangingEvent OnChanging = {read=FOnChanging, write=FOnChanging};
  633. __property TfcTVChangedEvent OnChange = {read=FOnChange, write=FOnChange};
  634. __property TfcTVCompareEvent OnCompare = {read=FOnCompare, write=FOnCompare};
  635. __property TfcTVExpandedEvent OnDeletion = {read=FOnDeletion, write=FOnDeletion};
  636. __property TfcTVExpandedEvent OnGetImageIndex = {read=FOnGetImageIndex, write=FOnGetImageIndex};
  637. __property TfcTVExpandedEvent OnGetSelectedIndex = {read=FOnGetSelectedIndex, write=FOnGetSelectedIndex
  638. };
  639. virtual void __fastcall MultiSelectNode(TfcTreeNode* Node, bool Select, bool redraw);
  640. virtual bool __fastcall IsVisible(TfcTreeNode* Node, bool PartialOK);
  641. Windows::TRect __fastcall ItemRect(TfcTreeNode* Node, bool LabelOnly);
  642. void __fastcall PaintButton(TfcTreeNode* Node, const Windows::TPoint &pt, int size);
  643. void __fastcall PaintLines(TfcTreeNode* Node);
  644. void __fastcall PaintImage(TfcTreeNode* Node, TfcItemStates State);
  645. Windows::TRect __fastcall LevelRect(TfcTreeNode* ANode);
  646. virtual void __fastcall DoDrawText(TfcCustomTreeView* TreeView, TfcTreeNode* Node, const Windows::TRect 
  647. &ARect, TfcItemStates AItemState, bool &DefaultDrawing);
  648. virtual void __fastcall Compare(TfcTreeNode* Node1, TfcTreeNode* Node2, int lParam, int &Result);
  649. virtual void __fastcall CalcNodeAttributes(TfcTreeNode* Node, TfcItemStates AItemState);
  650. virtual AnsiString __fastcall GetDisplayText(TfcTreeNode* Node);
  651. void __fastcall LoadCanvasDefaults(TfcTreeNode* Node, TfcItemStates AItemState);
  652. virtual bool __fastcall ProcessKeyPress(char Key, Classes::TShiftState shift);
  653. virtual bool __fastcall IsRowSelect(void);
  654. virtual void __fastcall MouseLoop(int X, int Y);
  655. DYNAMIC void __fastcall MouseDown(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, 
  656. int Y);
  657. bool __fastcall UseImages(TfcTreeNode* Node);
  658. bool __fastcall UseStateImages(TfcTreeNode* Node);
  659. virtual void __fastcall BeginPainting(void);
  660. virtual void __fastcall EndPainting(void);
  661. virtual void __fastcall BeginItemPainting(TfcTreeNode* Node, const Windows::TRect &ARect, TfcItemStates 
  662. AItemState);
  663. virtual void __fastcall EndItemPainting(TfcTreeNode* Node, const Windows::TRect &ARect, TfcItemStates 
  664. AItemState);
  665. virtual void __fastcall PaintItem(TfcTreeNode* Node);
  666. void __fastcall ClearStateImageIndexes(void);
  667. DYNAMIC void __fastcall MouseMove(Classes::TShiftState Shift, int X, int Y);
  668. DYNAMIC void __fastcall MouseUp(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int 
  669. Y);
  670. virtual void __fastcall DoToggleCheckbox(TfcTreeNode* Node);
  671. virtual void __fastcall FreeHintWindow(void);
  672. virtual Controls::THintWindow* __fastcall CreateHintWindow(TfcTreeNode* Node);
  673. void __fastcall UnselectAllNodes(TfcTreeNode* IgnoreNode);
  674. void __fastcall InvalidateNoErase(void);
  675. __property Shortint ItemHeight = {read=GetItemHeight, write=SetItemHeight, nodefault};
  676. __property TfcCalcNodeAttributesEvent OnCalcNodeAttributes = {read=FOnCalcNodeAttributes, write=FOnCalcNodeAttributes
  677. };
  678. __property int ScrollTime = {read=GetScrollTime, write=SetScrollTime, nodefault};
  679. __property TMetaClass* NodeClass = {read=FNodeClass, write=FNodeClass};
  681. public:
  682. Variant Patch;
  683. void __fastcall ResetStateImages(void);
  684. __property int StreamVersion = {read=FStreamVersion, nodefault};
  685. TfcTreeNode* __fastcall GetFirstSibling(TfcTreeNode* Node);
  686. void __fastcall InvalidateNode(TfcTreeNode* Node);
  687. bool __fastcall MultiSelectCheckboxNeeded(TfcTreeNode* Node);
  688. void __fastcall UnselectAll(void);
  689. __fastcall virtual TfcCustomTreeView(Classes::TComponent* AOwner);
  690. __fastcall virtual ~TfcCustomTreeView(void);
  691. bool __fastcall AlphaSort(void);
  692. bool __fastcall CustomSort(PFNTVCOMPARE SortProc, int Data);
  693. void __fastcall FullCollapse(void);
  694. void __fastcall FullExpand(void);
  695. TfcHitTests __fastcall GetHitTestInfoAt(int X, int Y);
  696. TfcTreeNode* __fastcall GetNodeAt(int X, int Y);
  697. bool __fastcall IsEditing(void);
  698. void __fastcall LoadFromFile(const AnsiString FileName);
  699. void __fastcall LoadFromStream(Classes::TStream* Stream);
  700. void __fastcall SaveToFile(const AnsiString FileName);
  701. void __fastcall SaveToStream(Classes::TStream* Stream);
  702. __property Fccanvas::TfcCanvas* Canvas = {read=GetPaintCanvas};
  703. __property TfcTreeNode* DropTarget = {read=GetDropTarget, write=SetDropTarget};
  704. __property TfcTreeNode* Selected = {read=GetSelection, write=SetSelection};
  705. __property TfcTreeNode* TopItem = {read=GetTopItem, write=SetTopItem};
  706. __property TfcTreeNode* RightClickNode = {read=FRClickNode};
  707. __property TfcTreeViewOptions Options = {read=FOptions, write=SetOptions, default=1257};
  708. __property TfcTreeNodes* Items = {read=FTreeNodes, write=SeTfcTreeNodes};
  709. __property TfcTVMultiSelectAttributes* MultiSelectAttributes = {read=FMultiSelectAttributes, write=
  710. FMultiSelectAttributes};
  711. __property TfcTVDrawTextEvent OnDrawText = {read=FOnDrawText, write=FOnDrawText};
  712. __property TfcItemChangeEvent OnItemChange = {read=FOnItemChange, write=FOnItemChange};
  713. __property TfcTreeNode* MultiSelectList[int Index] = {read=GetMultiSelectItem};
  714. __property int MultiSelectListCount = {read=GetMultiSelectListCount, nodefault};
  715. __property Graphics::TColor LineColor = {read=FLineColor, write=SetLineColor, default=-2147483632};
  717. __property Graphics::TColor InactiveFocusColor = {read=FInactiveFocusColor, write=SetInactiveFocusColor
  718. , default=-2147483633};
  719. __property TfcTreeMouseMoveEvent OnMouseMove = {read=FOnMouseMove, write=FOnMouseMove};
  720. __property TfcTreeMouseEvent OnMouseDown = {read=FOnMouseDown, write=FOnMouseDown};
  721. __property TfcTreeMouseEvent OnMouseUp = {read=FOnMouseUp, write=FOnMouseUp};
  722. __property TfcTreeMouseEvent OnDblClick = {read=FOnDblClick, write=FOnDblClick};
  723. __property TfcToggleCheckboxEvent OnToggleCheckbox = {read=FOnToggleCheckbox, write=FOnToggleCheckbox
  724. };
  725. __property bool UsePaintBuffering = {read=FUsePaintBuffering, write=FUsePaintBuffering, default=0};
  727. __property bool DisableThemes = {read=FDisableThemes, write=FDisableThemes, default=0};
  728. public:
  729. #pragma option push -w-inl
  730. /* TWinControl.CreateParented */ inline __fastcall TfcCustomTreeView(HWND ParentWindow) : Controls::TWinControl(
  731. ParentWindow) { }
  732. #pragma option pop
  734. };
  737. class DELPHICLASS TfcTreeView;
  738. class PASCALIMPLEMENTATION TfcTreeView : public TfcCustomTreeView 
  739. {
  740. typedef TfcCustomTreeView inherited;
  742. __published:
  743. __property DisableThemes ;
  744. __property Align ;
  745. __property Anchors ;
  746. __property AutoExpand ;
  747. __property BiDiMode ;
  748. __property BorderStyle ;
  749. __property ChangeDelay ;
  750. __property Color ;
  751. __property LineColor ;
  752. __property InactiveFocusColor ;
  753. __property Ctl3D ;
  754. __property Constraints ;
  755. __property DragKind ;
  756. __property DragCursor ;
  757. __property DragMode ;
  758. __property Enabled ;
  759. __property Font ;
  760. __property Images ;
  761. __property Indent ;
  762. __property MultiSelectAttributes ;
  763. __property Options ;
  764. __property Items ;
  765. __property ParentBiDiMode ;
  766. __property ParentColor ;
  767. __property ParentCtl3D ;
  768. __property ParentFont ;
  769. __property ParentShowHint ;
  770. __property UsePaintBuffering ;
  771. __property PopupMenu ;
  772. __property ReadOnly ;
  773. __property RightClickSelects ;
  774. __property ShowHint ;
  775. __property SortType ;
  776. __property StateImages ;
  777. __property StreamExpandedNode ;
  778. __property TabOrder ;
  779. __property TabStop ;
  780. __property Visible ;
  781. __property OnChange ;
  782. __property OnChanging ;
  783. __property OnClick ;
  784. __property OnCollapsing ;
  785. __property OnCollapsed ;
  786. __property OnCompare ;
  787. __property OnDblClick ;
  788. __property OnDeletion ;
  789. __property OnDragDrop ;
  790. __property OnDragOver ;
  791. __property OnEdited ;
  792. __property OnEditing ;
  793. __property OnEndDock ;
  794. __property OnEndDrag ;
  795. __property OnEnter ;
  796. __property OnExit ;
  797. __property OnExpanding ;
  798. __property OnExpanded ;
  799. __property OnGetImageIndex ;
  800. __property OnGetSelectedIndex ;
  801. __property OnKeyDown ;
  802. __property OnKeyPress ;
  803. __property OnKeyUp ;
  804. __property OnMouseDown ;
  805. __property OnMouseMove ;
  806. __property OnMouseUp ;
  807. __property OnToggleCheckbox ;
  808. __property OnStartDock ;
  809. __property OnStartDrag ;
  810. __property OnCalcNodeAttributes ;
  811. __property OnDrawText ;
  812. public:
  813. #pragma option push -w-inl
  814. /* TfcCustomTreeView.Create */ inline __fastcall virtual TfcTreeView(Classes::TComponent* AOwner) : 
  815. TfcCustomTreeView(AOwner) { }
  816. #pragma option pop
  817. #pragma option push -w-inl
  818. /* TfcCustomTreeView.Destroy */ inline __fastcall virtual ~TfcTreeView(void) { }
  819. #pragma option pop
  821. public:
  822. #pragma option push -w-inl
  823. /* TWinControl.CreateParented */ inline __fastcall TfcTreeView(HWND ParentWindow) : TfcCustomTreeView(
  824. ParentWindow) { }
  825. #pragma option pop
  827. };
  830. //-- var, const, procedure ---------------------------------------------------
  831. extern PACKAGE void __fastcall fcTreeViewError(const AnsiString Msg);
  833. } /* namespace Fctreeview */
  834. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  835. using namespace Fctreeview;
  836. #endif
  837. #pragma option pop // -w-
  838. #pragma option pop // -Vx
  840. #pragma delphiheader end.
  841. //-- end unit ----------------------------------------------------------------
  842. #endif // fcTreeView