NonVisual.h 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526
  1. //---------------------------------------------------------------------------
  2. #ifndef NonVisualH
  3. #define NonVisualH
  4. //---------------------------------------------------------------------------
  5. #include <Classes.hpp>
  6. #include <Controls.hpp>
  7. #include <StdCtrls.hpp>
  8. #include <Forms.hpp>
  9. #include <ActnList.hpp>
  10. #include <Menus.hpp>
  11. #include <ImgList.hpp>
  12. #include <ExtCtrls.hpp>
  13. #include <Rights.h>
  14. #include "CustomScpExplorer.h"
  15. //---------------------------------------------------------------------------
  16. #define fcStatusBar 0x01
  17. #define fcToolBar 0x02
  18. #define fcCoolBar 0x03
  19. #define fcLocalCoolBar 0x11
  20. #define fcLocalStatusBar 0x12
  21. #define fcRemoteCoolBar 0x13
  22. #define fcRemoteStatusBar 0x14
  23. #define fcSessionCombo 0x15
  24. #define fcMenuToolBar 0x16
  25. #define fcExplorerMenuBand 0x0003
  26. #define fcExplorerAddressBand 0x0103
  27. #define fcExplorerToolbarBand 0x0203
  28. #define fcExplorerSelectionBand 0x0303
  29. #define fcExplorerSessionBand 0x0403
  30. #define fcExplorerPreferencesBand 0x0503
  31. #define fcExplorerSortBand 0x0603
  32. #define fcCommanderMenuBand 0x0003
  33. #define fcCommanderSessionBand 0x0103
  34. #define fcCommanderPreferencesBand 0x0203
  35. #define fcCommanderSelectionBand 0x0303
  36. #define fcCommanderToolbarBand 0x0403
  37. #define fcCommanderSortBand 0x0503
  38. #define fcCommanderCommandsBand 0x0603
  39. #define fcCommanderLocalHistoryBand 0x0111
  40. #define fcCommanderLocalNavigationBand 0x0211
  41. #define fcCommanderRemoteHistoryBand 0x0113
  42. #define fcCommanderRemoteNavigationBand 0x0213
  43. //---------------------------------------------------------------------------
  44. class TNonVisualDataModule : public TDataModule
  45. {
  46. __published: // IDE-managed Components
  47. TActionList *LogActions;
  48. TAction *LogClearAction;
  49. TAction *LogSelectAllAction;
  50. TAction *LogCopyAction;
  51. TAction *LogCloseAction;
  52. TPopupMenu *LogMemoPopup;
  53. TMenuItem *Clear1;
  54. TMenuItem *Close1;
  55. TMenuItem *Selectall1;
  56. TImageList *LogImages;
  57. TImageList *LogDisabledImages;
  58. TActionList *RightsActions;
  59. TImageList *RightsImages;
  60. TPopupMenu *RightsPopup;
  61. TAction *NoRightsAction;
  62. TAction *DefaultRightsAction;
  63. TAction *AllRightsAction;
  64. TMenuItem *Norights1;
  65. TMenuItem *Defaultrights1;
  66. TMenuItem *Allrights1;
  67. TImageList *ExplorerImages;
  68. TPopupMenu *RemoteDirViewPopup;
  69. TMenuItem *CurrentCopyMenuItem;
  70. TMenuItem *Delete1;
  71. TMenuItem *Properties1;
  72. TMenuItem *Rename1;
  73. TMenuItem *N1;
  74. TMenuItem *Moveto1;
  75. TAction *LocalSortByNameAction;
  76. TAction *LocalSortAscendingAction;
  77. TAction *LocalSortBySizeAction;
  78. TActionList *ExplorerActions;
  79. TAction *CurrentRenameAction;
  80. TAction *CurrentDeleteAction;
  81. TAction *CurrentCreateDirAction;
  82. TImageList *ExplorerDisabledImages;
  83. TAction *CurrentCycleStyleAction;
  84. TAction *CurrentIconAction;
  85. TAction *CurrentSmallIconAction;
  86. TAction *CurrentReportAction;
  87. TAction *CurrentListAction;
  88. TAction *CurrentCopyFocusedAction;
  89. TAction *CurrentMoveFocusedAction;
  90. TAction *CurrentDeleteFocusedAction;
  91. TAction *CurrentPropertiesFocusedAction;
  92. TAction *CurrentPropertiesAction;
  93. TAction *CurrentCopyAction;
  94. TAction *CurrentMoveAction;
  95. TMainMenu *ExplorerMenu;
  96. TMenuItem *ExplorerFileMenu;
  97. TMenuItem *Delete2;
  98. TMenuItem *Rename3;
  99. TMenuItem *Properties2;
  100. TMenuItem *N2;
  101. TMenuItem *Copyto2;
  102. TMenuItem *Moveto2;
  103. TMenuItem *ExplorerViewMenu;
  104. TMenuItem *LargeIcons2;
  105. TMenuItem *SmallIcons2;
  106. TMenuItem *List2;
  107. TMenuItem *Details2;
  108. TMenuItem *Createdirectory2;
  109. TMenuItem *Refresh1;
  110. TAction *RemoteBackAction;
  111. TAction *RemoteForwardAction;
  112. TAction *RemoteParentDirAction;
  113. TAction *RemoteRootDirAction;
  114. TAction *RemoteHomeDirAction;
  115. TAction *RemoteRefreshAction;
  116. TAction *AboutAction;
  117. TMenuItem *N4;
  118. TMenuItem *Toolbars1;
  119. TAction *StatusBarAction;
  120. TAction *ExplorerAddressBandAction;
  121. TAction *ExplorerMenuBandAction;
  122. TAction *ExplorerToolbarBandAction;
  123. TMenuItem *Address1;
  124. TMenuItem *Buttons1;
  125. TMenuItem *StatusBar1;
  126. TPopupMenu *ExplorerBarPopup;
  127. TMenuItem *Address2;
  128. TMenuItem *StandardButtons1;
  129. TMenuItem *N5;
  130. TMenuItem *StatusBar2;
  131. TPopupMenu *ExplorerStylePopup;
  132. TMenuItem *CurrentIconAction1;
  133. TMenuItem *CurrentSmallIconAction1;
  134. TMenuItem *CurrentListAction1;
  135. TMenuItem *CurrentReportAction1;
  136. TMenuItem *N6;
  137. TMenuItem *Goto1;
  138. TMenuItem *Back1;
  139. TMenuItem *Forward1;
  140. TMenuItem *Parentdirectory1;
  141. TMenuItem *Rootdirectory1;
  142. TMenuItem *Homedirectory1;
  143. TMenuItem *N7;
  144. TAction *RemoteOpenDirAction;
  145. TMenuItem *OpenDirectory1;
  146. TMenuItem *N8;
  147. TAction *SelectAction;
  148. TAction *UnselectAction;
  149. TAction *SelectAllAction;
  150. TAction *InvertSelectionAction;
  151. TAction *ExplorerSelectionBandAction;
  152. TAction *ClearSelectionAction;
  153. TMenuItem *SelectionButtons1;
  154. TMenuItem *SelectionButtons2;
  155. TTimer *SessionIdleTimer;
  156. TImageList *SessionImages;
  157. TAction *ViewLogAction;
  158. TMenuItem *LogWindow1;
  159. TAction *NewSessionAction;
  160. TAction *CloseSessionAction;
  161. TAction *SavedSessionsAction;
  162. TMainMenu *CommonScpMenu;
  163. TMenuItem *CommonSessionMenu;
  164. TMenuItem *Disconnect1;
  165. TMenuItem *Newsession1;
  166. TAction *ExplorerSessionBandAction;
  167. TMenuItem *SessionButtons1;
  168. TMenuItem *SessionButtons2;
  169. TMenuItem *SavedSessionsMenu;
  170. TMenuItem *N9;
  171. TMenuItem *N10;
  172. TMenuItem *Disconnect2;
  173. TAction *PreferencesAction;
  174. TAction *ExplorerPreferencesBandAction;
  175. TMenuItem *PreferencesButtons1;
  176. TMenuItem *PreferencesButtons2;
  177. TMenuItem *Preferences1;
  178. TAction *RemoteChangePathAction;
  179. TAction *LocalChangePathAction;
  180. TMainMenu *CommanderMenu;
  181. TMenuItem *CommanderLocalMenu;
  182. TMenuItem *Changedrive1;
  183. TMenuItem *CommanderRemoteMenu;
  184. TMenuItem *Changedirectory1;
  185. TMenuItem *CommonMarkMenu;
  186. TMenuItem *ClearSelection1;
  187. TMenuItem *InvertSelection1;
  188. TMenuItem *SelectAll2;
  189. TMenuItem *UnselectFiles1;
  190. TMenuItem *SelectFiles1;
  191. TMenuItem *CommanderFilesMenu;
  192. TMenuItem *Copyto3;
  193. TMenuItem *Moveto3;
  194. TMenuItem *Delete3;
  195. TMenuItem *Rename2;
  196. TMenuItem *Properties3;
  197. TMenuItem *N12;
  198. TMenuItem *Createdirectory1;
  199. TMenuItem *N13;
  200. TAction *LocalOpenDirAction;
  201. TAction *LocalBackAction;
  202. TAction *LocalForwardAction;
  203. TAction *LocalParentDirAction;
  204. TAction *LocalRootDirAction;
  205. TAction *LocalHomeDirAction;
  206. TAction *LocalRefreshAction;
  207. TMenuItem *GoTo2;
  208. TMenuItem *Forward2;
  209. TMenuItem *Back2;
  210. TMenuItem *N14;
  211. TMenuItem *HomeDirectory2;
  212. TMenuItem *RootDirectory2;
  213. TMenuItem *ParentDirectory2;
  214. TMenuItem *N15;
  215. TMenuItem *OpenDirectory2;
  216. TMenuItem *N16;
  217. TMenuItem *N17;
  218. TMenuItem *GoTo3;
  219. TMenuItem *Forward3;
  220. TMenuItem *Back3;
  221. TMenuItem *N18;
  222. TMenuItem *HomeDirectory3;
  223. TMenuItem *RootDirectory3;
  224. TMenuItem *ParentDirectory3;
  225. TMenuItem *N19;
  226. TMenuItem *OpenDirectory3;
  227. TMenuItem *Refresh2;
  228. TMenuItem *Refresh3;
  229. TMenuItem *CommanderOptionsMenu;
  230. TMenuItem *Preferences2;
  231. TMenuItem *N24;
  232. TMenuItem *LogWindow2;
  233. TMenuItem *StatusBar3;
  234. TMenuItem *Toolbars2;
  235. TAction *ToolBarAction;
  236. TMenuItem *CommandToolbar1;
  237. TAction *CommanderMenuBandAction;
  238. TAction *CommanderSessionBandAction;
  239. TAction *CommanderPreferencesBandAction;
  240. TAction *CommanderSelectionBandAction;
  241. TAction *CommanderToolbarBandAction;
  242. TAction *CommanderLocalHistoryBandAction;
  243. TAction *CommanderLocalNavigationBandAction;
  244. TAction *CommanderRemoteHistoryBandAction;
  245. TAction *CommanderRemoteNavigationBandAction;
  246. TMenuItem *SessionButtons3;
  247. TMenuItem *SessionButtons4;
  248. TMenuItem *PreferencesButtons3;
  249. TMenuItem *StandardButtons2;
  250. TMenuItem *Leftpanel1;
  251. TMenuItem *RemotePanel1;
  252. TMenuItem *N20;
  253. TMenuItem *HistoryButtons1;
  254. TMenuItem *NavigationButtons1;
  255. TAction *LocalStatusBarAction;
  256. TAction *RemoteStatusBarAction;
  257. TMenuItem *StatusBar4;
  258. TMenuItem *N21;
  259. TMenuItem *HistoryButtons2;
  260. TMenuItem *NavigationButtons2;
  261. TMenuItem *N22;
  262. TMenuItem *StatusBar5;
  263. TPopupMenu *CommanderBarPopup;
  264. TMenuItem *PreferencesButtons4;
  265. TMenuItem *SelectionButtons3;
  266. TMenuItem *SessionButtons5;
  267. TMenuItem *StandardButtons3;
  268. TMenuItem *LocalPanel1;
  269. TMenuItem *StatusBar6;
  270. TMenuItem *N23;
  271. TMenuItem *NavigationButtons3;
  272. TMenuItem *HistoryButtons3;
  273. TMenuItem *RemotePanel2;
  274. TMenuItem *StatusBar7;
  275. TMenuItem *N25;
  276. TMenuItem *NavigationButtons4;
  277. TMenuItem *HistoryButtons4;
  278. TMenuItem *N26;
  279. TMenuItem *StatusBar8;
  280. TMenuItem *CommandsToolbar1;
  281. TMenuItem *N27;
  282. TPopupMenu *RemotePanelPopup;
  283. TMenuItem *HistoryButtons5;
  284. TMenuItem *NavigationButtons5;
  285. TMenuItem *N28;
  286. TMenuItem *StatusBar9;
  287. TPopupMenu *LocalPanelPopup;
  288. TMenuItem *HistoryButtons6;
  289. TMenuItem *NavigationButtons6;
  290. TMenuItem *N29;
  291. TMenuItem *StatusBar10;
  292. TMenuItem *N30;
  293. TMenuItem *Sort1;
  294. TMenuItem *Vzestupn1;
  295. TMenuItem *N31;
  296. TMenuItem *N32;
  297. TAction *LocalSortByAttrAction;
  298. TAction *LocalSortByTypeAction;
  299. TAction *LocalSortByChangedAction;
  300. TAction *CommanderSortBandAction;
  301. TMenuItem *Sortbuttons1;
  302. TMenuItem *BySize1;
  303. TMenuItem *ByType1;
  304. TMenuItem *ByModification1;
  305. TMenuItem *ByAttributes1;
  306. TMenuItem *SortButtons2;
  307. TAction *RemoteSortAscendingAction;
  308. TAction *RemoteSortByNameAction;
  309. TAction *RemoteSortBySizeAction;
  310. TAction *RemoteSortByRightsAction;
  311. TAction *RemoteSortByChangedAction;
  312. TAction *RemoteSortByOwnerAction;
  313. TAction *RemoteSortByGroupAction;
  314. TMenuItem *Sort2;
  315. TMenuItem *ByAttributes2;
  316. TMenuItem *ByModification2;
  317. TMenuItem *BySize2;
  318. TMenuItem *ByName1;
  319. TMenuItem *N34;
  320. TMenuItem *Ascending1;
  321. TMenuItem *ByOwner1;
  322. TMenuItem *ByGroup1;
  323. TAction *CurrentSortByTypeAction;
  324. TAction *CurrentSortAscendingAction;
  325. TAction *CurrentSortByNameAction;
  326. TAction *CurrentSortBySizeAction;
  327. TAction *CurrentSortByRightsAction;
  328. TAction *CurrentSortByChangedAction;
  329. TAction *CurrentSortByOwnerAction;
  330. TAction *CurrentSortByGroupAction;
  331. TAction *ExplorerSortBandAction;
  332. TMenuItem *SortButtons3;
  333. TMenuItem *SortButtons4;
  334. TMenuItem *Sort3;
  335. TMenuItem *ByGroup2;
  336. TMenuItem *ByOwner2;
  337. TMenuItem *ByPermissions1;
  338. TMenuItem *BySize3;
  339. TMenuItem *ByModification3;
  340. TMenuItem *ByName2;
  341. TMenuItem *N35;
  342. TMenuItem *Ascending2;
  343. TMenuItem *N36;
  344. TMenuItem *CommonHelpMenu;
  345. TMenuItem *About1;
  346. TPopupMenu *LocalDirViewColumnPopup;
  347. TAction *SortColumnAscendingAction;
  348. TAction *SortColumnDescendingAction;
  349. TMenuItem *SortAscending1;
  350. TMenuItem *SortDescending1;
  351. TAction *HomepageAction;
  352. TAction *HistoryPageAction;
  353. TAction *RequirementsPageAction;
  354. TMenuItem *N11;
  355. TMenuItem *WinSCPhomepage1;
  356. TMenuItem *Versionhistory1;
  357. TMenuItem *Programrequirements1;
  358. TAction *SaveCurrentSessionAction;
  359. TMenuItem *Savesession1;
  360. TAction *LocalSortByExtAction;
  361. TAction *RemoteSortByExtAction;
  362. TAction *CurrentSortByExtAction;
  363. TMenuItem *ByExtension1;
  364. TMenuItem *ByExtension2;
  365. TMenuItem *ByExtension3;
  366. TAction *ShowHideRemoteNameColumnAction;
  367. TAction *ShowHideRemoteExtColumnAction;
  368. TAction *ShowHideRemoteSizeColumnAction;
  369. TAction *ShowHideRemoteChangedColumnAction;
  370. TAction *ShowHideRemoteRightsColumnAction;
  371. TAction *ShowHideRemoteOwnerColumnAction;
  372. TAction *ShowHideRemoteGroupColumnAction;
  373. TAction *ShowHideLocalNameColumnAction;
  374. TAction *ShowHideLocalExtColumnAction;
  375. TAction *ShowHideLocalTypeColumnAction;
  376. TAction *ShowHideLocalSizeColumnAction;
  377. TAction *ShowHideLocalChangedColumnAction;
  378. TAction *ShowHideLocalAttrColumnAction;
  379. TMenuItem *Showcolumns1;
  380. TMenuItem *Name1;
  381. TMenuItem *Size1;
  382. TMenuItem *Type1;
  383. TMenuItem *Modification1;
  384. TMenuItem *Attributes1;
  385. TMenuItem *Showcolumns2;
  386. TMenuItem *Attributes2;
  387. TMenuItem *Modification2;
  388. TMenuItem *Size2;
  389. TMenuItem *Name2;
  390. TMenuItem *Owner1;
  391. TMenuItem *Group1;
  392. TPopupMenu *RemoteDirViewColumnPopup;
  393. TMenuItem *MenuItem1;
  394. TMenuItem *MenuItem2;
  395. TMenuItem *Showcolumns3;
  396. TMenuItem *Attributes3;
  397. TMenuItem *Modification3;
  398. TMenuItem *Type2;
  399. TMenuItem *Size3;
  400. TMenuItem *Name3;
  401. TMenuItem *N37;
  402. TMenuItem *Showcolumns4;
  403. TMenuItem *Group2;
  404. TMenuItem *Owner2;
  405. TMenuItem *Permissions1;
  406. TMenuItem *Modification4;
  407. TMenuItem *Size4;
  408. TMenuItem *Name4;
  409. TMenuItem *N38;
  410. TMenuItem *Showcolumns5;
  411. TMenuItem *Group3;
  412. TMenuItem *Owner3;
  413. TMenuItem *Permissions2;
  414. TMenuItem *Modification5;
  415. TMenuItem *Size5;
  416. TMenuItem *Name5;
  417. TAction *HideColumnAction;
  418. TMenuItem *Hidecolumn1;
  419. TMenuItem *Hidecolumn2;
  420. TAction *CompareDirectoriesAction;
  421. TMenuItem *Comparedirectories1;
  422. TAction *CommanderCommandsBandAction;
  423. TMenuItem *CommandsButtons1;
  424. TMenuItem *CommandsButtons2;
  425. TAction *SynchronizeAction;
  426. TMenuItem *Keepremotedirectoryuptodate1;
  427. TImageList *ArrowImages;
  428. TAction *ForumPageAction;
  429. TMenuItem *Supportforum1;
  430. TAction *LocalAddBookmarkAction;
  431. TAction *RemoteAddBookmarkAction;
  432. TMenuItem *Addtobookmarks1;
  433. TMenuItem *N33;
  434. TMenuItem *Addtobookmarks2;
  435. TMenuItem *Addtobookmarks3;
  436. TAction *ConsoleAction;
  437. TMenuItem *OpenTerminal1;
  438. TMenuItem *ExporerCommandsMenu;
  439. TMenuItem *N3;
  440. TMenuItem *N40;
  441. TMenuItem *Openterminal2;
  442. TAction *LocalExploreDirectory;
  443. TMenuItem *Exploredirectory1;
  444. TAction *LeaveRightsAsIsAction;
  445. TMenuItem *Leaveasis1;
  446. TAction *CurrentEditAction;
  447. TMenuItem *CurentEditMenuItem;
  448. TMenuItem *Edit2;
  449. TMenuItem *Edit3;
  450. TAction *CurrentEditAlternativeAction;
  451. TMenuItem *Edit4;
  452. TMenuItem *Editalternative1;
  453. TAction *CurrentOpenAction;
  454. TMenuItem *CurrentOpenMenuItem;
  455. TMenuItem *Open2;
  456. TMenuItem *N41;
  457. TMenuItem *Open3;
  458. TMenuItem *N42;
  459. TAction *SynchorizeBrowsingAction;
  460. TMenuItem *Synchronizebrowsing1;
  461. TAction *AddEditLinkAction;
  462. TMenuItem *Addeditlink1;
  463. TMenuItem *Addeditlink2;
  464. TAction *CloseApplicationAction;
  465. TAction *OpenedSessionsAction;
  466. TMenuItem *OpenedSessionsMenu;
  467. TAction *CustomCommandsAction;
  468. TMenuItem *CustomCommandsMenu;
  469. TMenuItem *N43;
  470. TMenuItem *CommanderCommandsMenu;
  471. TMenuItem *N39;
  472. TMenuItem *CustomCommands1;
  473. TMenuItem *RemoteDirViewCustomCommandsMenu;
  474. TMenuItem *N45;
  475. TAction *CustomCommandsCustomizeAction;
  476. TAction *CheckForUpdatesAction;
  477. TMenuItem *N44;
  478. TMenuItem *CheckForUpdates1;
  479. TMenuItem *N46;
  480. TMenuItem *Quit1;
  481. TMenuItem *N47;
  482. TMenuItem *Quit2;
  483. TAction *PuttyAction;
  484. TMenuItem *OpeninPuTTY1;
  485. TMenuItem *OpeninPuTTY2;
  486. void __fastcall LogActionsUpdate(TBasicAction *Action, bool &Handled);
  487. void __fastcall LogActionsExecute(TBasicAction *Action, bool &Handled);
  488. void __fastcall RightsActionsExecute(TBasicAction *Action, bool &Handled);
  489. void __fastcall RightsActionsUpdate(TBasicAction *Action, bool &Handled);
  490. void __fastcall ExplorerActionsUpdate(TBasicAction *Action, bool &Handled);
  491. void __fastcall ExplorerActionsExecute(TBasicAction *Action, bool &Handled);
  492. void __fastcall SessionIdleTimerTimer(TObject *Sender);
  493. private:
  494. TRightsFrame * FRightsFrame;
  495. TListColumn * FListColumn;
  496. TCustomScpExplorerForm * FScpExplorer;
  497. bool FSessionIdleTimerExecuting;
  498. void __fastcall SetScpExplorer(TCustomScpExplorerForm * value);
  499. protected:
  500. void __fastcall CreateSessionListMenu();
  501. void __fastcall CreateCustomCommandsMenu(TAction * Action);
  502. TCustomDirView * __fastcall DirView(TOperationSide Side) { return ScpExplorer->DirView(Side); }
  503. void __fastcall SessionItemClick(TObject * Sender);
  504. void __fastcall OpenedSessionItemClick(TObject * Sender);
  505. void __fastcall CustomCommandClick(TObject * Sender);
  506. public:
  507. void __fastcall CommanderShortcuts();
  508. void __fastcall ExplorerShortcuts();
  509. void __fastcall CreateOpenedSessionListMenu();
  510. TShortCut __fastcall OpenSessionShortCut(int Index);
  511. void __fastcall OpenBrowser(AnsiString URL);
  512. __fastcall TNonVisualDataModule(TComponent * Owner);
  513. __property TListColumn * ListColumn = { read = FListColumn, write = FListColumn };
  514. __property TRightsFrame * RightsFrame = { read = FRightsFrame, write = FRightsFrame };
  515. __property TCustomScpExplorerForm * ScpExplorer = { read = FScpExplorer, write = SetScpExplorer };
  516. };
  517. //---------------------------------------------------------------------------
  518. extern PACKAGE TNonVisualDataModule *NonVisualDataModule;
  519. //---------------------------------------------------------------------------
  520. #endif