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