NonVisual.h 25 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707
  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. #include "TB2Item.hpp"
  16. #include "TBX.hpp"
  17. #include "TB2ExtItems.hpp"
  18. #include "TBXExtItems.hpp"
  19. #include <ShellAnimations.hpp>
  20. #include "TBXToolPals.hpp"
  21. #include <System.Actions.hpp>
  22. //---------------------------------------------------------------------------
  23. #define fcStatusBar 0x01
  24. #define fcToolBar2 0x02
  25. #define fcLocalStatusBar 0x12
  26. #define fcRemoteStatusBar 0x14
  27. #define fcRemotePopup 0x17
  28. #define fcCommandLinePanel 0x18
  29. #define fcQueueView 0x19
  30. #define fcQueueToolbar 0x1A
  31. #define fcLocalTree 0x1B
  32. #define fcRemoteTree 0x1C
  33. #define fcSessionToolbar 0x1E
  34. #define fcCustomCommandsBand 0x1F
  35. #define fcColorMenu 0x20
  36. #define fcTransferDropDown 0x22
  37. #define fcTransferList 0x23
  38. #define fcTransferLabel 0x24
  39. #define fcSessionsTabs 0x25
  40. #define fcLocalPopup 0x26
  41. #define fcRemotePathComboBox 0x27
  42. #define fcExplorerMenuBand 0x31
  43. #define fcExplorerAddressBand 0x32
  44. #define fcExplorerToolbarBand 0x33
  45. #define fcExplorerSelectionBand 0x34
  46. #define fcExplorerSessionBand 0x35
  47. #define fcExplorerPreferencesBand 0x36
  48. #define fcExplorerSortBand 0x37
  49. #define fcExplorerUpdatesBand 0x38
  50. #define fcExplorerTransferBand 0x39
  51. #define fcExplorerCustomCommandsBand 0x40
  52. #define fcCommanderMenuBand 0x51
  53. #define fcCommanderSessionBand 0x52
  54. #define fcCommanderPreferencesBand 0x53
  55. #define fcCommanderSortBand 0x56
  56. #define fcCommanderCommandsBand 0x57
  57. #define fcCommanderUpdatesBand 0x58
  58. #define fcCommanderTransferBand 0x59
  59. #define fcCommanderCustomCommandsBand 0x61
  60. #define fcCommanderLocalHistoryBand 0x71
  61. #define fcCommanderLocalNavigationBand 0x72
  62. #define fcCommanderLocalFileBand 0x73
  63. #define fcCommanderLocalSelectionBand 0x74
  64. #define fcCommanderRemoteHistoryBand 0x75
  65. #define fcCommanderRemoteNavigationBand 0x76
  66. #define fcCommanderRemoteFileBand 0x77
  67. #define fcCommanderRemoteSelectionBand 0x78
  68. //---------------------------------------------------------------------------
  69. class TNonVisualDataModule : public TDataModule
  70. {
  71. __published: // IDE-managed Components
  72. TActionList *LogActions;
  73. TAction *LogClearAction;
  74. TAction *LogSelectAllAction2;
  75. TAction *LogCopyAction;
  76. TTBXPopupMenu *LogMemoPopup;
  77. TTBXItem *Clear1;
  78. TTBXItem *Close1;
  79. TTBXItem *Selectall1;
  80. TAction *LogPreferencesAction2;
  81. TAction *LocalSortByNameAction;
  82. TAction *LocalSortAscendingAction;
  83. TAction *LocalSortBySizeAction;
  84. TActionList *ExplorerActions;
  85. TAction *CurrentRenameAction;
  86. TAction *CurrentDeleteAction;
  87. TAction *CurrentCreateDirAction;
  88. TAction *CurrentCycleStyleAction;
  89. TAction *CurrentIconAction;
  90. TAction *CurrentSmallIconAction;
  91. TAction *CurrentReportAction;
  92. TAction *CurrentListAction;
  93. TAction *CurrentDeleteFocusedAction;
  94. TAction *CurrentPropertiesFocusedAction;
  95. TAction *CurrentPropertiesAction;
  96. TAction *RemoteBackAction;
  97. TAction *RemoteForwardAction;
  98. TAction *RemoteParentDirAction;
  99. TAction *RemoteRootDirAction;
  100. TAction *RemoteHomeDirAction;
  101. TAction *RemoteRefreshAction;
  102. TAction *AboutAction;
  103. TAction *StatusBarAction;
  104. TAction *SessionsTabsAction;
  105. TAction *ExplorerAddressBandAction;
  106. TAction *ExplorerMenuBandAction;
  107. TAction *ExplorerToolbarBandAction;
  108. TAction *RemoteOpenDirAction;
  109. TAction *SelectAction;
  110. TAction *UnselectAction;
  111. TAction *SelectAllAction;
  112. TAction *InvertSelectionAction;
  113. TAction *ExplorerSelectionBandAction;
  114. TAction *ClearSelectionAction;
  115. TTimer *SessionIdleTimer;
  116. TAction *ViewLogAction;
  117. TAction *NewSessionAction;
  118. TAction *SiteManagerAction;
  119. TAction *CloseSessionAction;
  120. TAction *SavedSessionsAction2;
  121. TAction *WorkspacesAction;
  122. TAction *ExplorerSessionBandAction;
  123. TAction *PreferencesAction;
  124. TAction *ExplorerPreferencesBandAction;
  125. TAction *RemoteChangePathAction;
  126. TAction *LocalChangePathAction;
  127. TAction *LocalOpenDirAction;
  128. TAction *LocalBackAction;
  129. TAction *LocalForwardAction;
  130. TAction *LocalParentDirAction;
  131. TAction *LocalRootDirAction;
  132. TAction *LocalHomeDirAction;
  133. TAction *LocalRefreshAction;
  134. TAction *ToolBar2Action;
  135. TAction *CommanderMenuBandAction;
  136. TAction *CommanderSessionBandAction;
  137. TAction *CommanderPreferencesBandAction;
  138. TAction *CommanderLocalHistoryBandAction;
  139. TAction *CommanderLocalNavigationBandAction;
  140. TAction *CommanderRemoteHistoryBandAction;
  141. TAction *CommanderRemoteNavigationBandAction;
  142. TAction *LocalStatusBarAction;
  143. TAction *RemoteStatusBarAction;
  144. TAction *LocalSortByAttrAction;
  145. TAction *LocalSortByTypeAction;
  146. TAction *LocalSortByChangedAction;
  147. TAction *CommanderSortBandAction;
  148. TAction *RemoteSortAscendingAction;
  149. TAction *RemoteSortByNameAction;
  150. TAction *RemoteSortBySizeAction;
  151. TAction *RemoteSortByRightsAction;
  152. TAction *RemoteSortByChangedAction;
  153. TAction *RemoteSortByOwnerAction;
  154. TAction *RemoteSortByGroupAction;
  155. TAction *CurrentSortByTypeAction;
  156. TAction *CurrentSortAscendingAction;
  157. TAction *CurrentSortByNameAction;
  158. TAction *CurrentSortBySizeAction;
  159. TAction *CurrentSortByRightsAction;
  160. TAction *CurrentSortByChangedAction;
  161. TAction *CurrentSortByOwnerAction;
  162. TAction *CurrentSortByGroupAction;
  163. TAction *ExplorerSortBandAction;
  164. TAction *SortColumnAscendingAction;
  165. TAction *SortColumnDescendingAction;
  166. TAction *HomepageAction;
  167. TAction *HistoryPageAction;
  168. TAction *SaveCurrentSessionAction2;
  169. TAction *LocalSortByExtAction;
  170. TAction *RemoteSortByExtAction;
  171. TAction *CurrentSortByExtAction;
  172. TAction *ShowHideRemoteNameColumnAction;
  173. TAction *ShowHideRemoteExtColumnAction;
  174. TAction *ShowHideRemoteSizeColumnAction;
  175. TAction *ShowHideRemoteChangedColumnAction;
  176. TAction *ShowHideRemoteRightsColumnAction;
  177. TAction *ShowHideRemoteOwnerColumnAction;
  178. TAction *ShowHideRemoteGroupColumnAction;
  179. TAction *ShowHideLocalNameColumnAction;
  180. TAction *ShowHideLocalExtColumnAction;
  181. TAction *ShowHideLocalTypeColumnAction;
  182. TAction *ShowHideLocalSizeColumnAction;
  183. TAction *ShowHideLocalChangedColumnAction;
  184. TAction *ShowHideLocalAttrColumnAction;
  185. TAction *HideColumnAction;
  186. TAction *CompareDirectoriesAction;
  187. TAction *CommanderCommandsBandAction;
  188. TAction *SynchronizeAction;
  189. TAction *ForumPageAction;
  190. TAction *LocalAddBookmarkAction;
  191. TAction *RemoteAddBookmarkAction;
  192. TAction *ConsoleAction;
  193. TAction *LocalExploreDirectoryAction;
  194. TAction *CurrentEditAction;
  195. TAction *CurrentOpenAction;
  196. TAction *SynchronizeBrowsingAction;
  197. TAction *CurrentAddEditLinkAction;
  198. TAction *CloseApplicationAction;
  199. TAction *OpenedSessionsAction;
  200. TAction *CustomCommandsFileAction;
  201. TAction *CustomCommandsCustomizeAction;
  202. TAction *CheckForUpdatesAction;
  203. TAction *PuttyAction;
  204. TAction *DonatePageAction;
  205. TAction *FileSystemInfoAction;
  206. TAction *ClearCachesAction;
  207. TAction *FullSynchronizeAction;
  208. TAction *RemoteMoveToAction;
  209. TAction *RemoteMoveToFocusedAction;
  210. TAction *SelectOneAction;
  211. TAction *ShowHiddenFilesAction;
  212. TAction *FormatSizeBytesNoneAction;
  213. TAction *CommandLinePanelAction;
  214. TAction *LocalPathToClipboardAction;
  215. TAction *RemotePathToClipboardAction;
  216. TAction *GoToCommandLineAction;
  217. TAction *FileListToCommandLineAction;
  218. TAction *FileListToClipboardAction;
  219. TAction *FullFileListToClipboardAction;
  220. TAction *QueueItemQueryAction;
  221. TAction *QueueItemPromptAction;
  222. TAction *QueueItemErrorAction;
  223. TAction *QueueItemDeleteAction;
  224. TAction *QueueItemExecuteAction;
  225. TAction *QueueGoToAction;
  226. TAction *QueueItemUpAction;
  227. TAction *QueueItemDownAction;
  228. TAction *QueueToggleShowAction;
  229. TAction *QueueShowAction;
  230. TAction *QueueHideWhenEmptyAction;
  231. TAction *QueueHideAction;
  232. TAction *QueueToolbarAction;
  233. TAction *QueuePreferencesAction;
  234. TAction *PasteAction2;
  235. TAction *RemoteTreeAction;
  236. TAction *LocalTreeAction;
  237. TAction *GoToTreeAction;
  238. TAction *NewFileAction;
  239. TAction *RemoteCopyToFocusedAction;
  240. TAction *RemoteCopyToAction;
  241. TAction *FileGenerateUrlAction2;
  242. TAction *TableOfContentsAction;
  243. TTBXPopupMenu *CommanderBarPopup;
  244. TTBXItem *SessionButtons5;
  245. TTBXItem *PreferencesButtons4;
  246. TTBXItem *SortButtons2;
  247. TTBXItem *CommandsButtons2;
  248. TTBXSeparatorItem *N26;
  249. TTBXItem *CommandLine2;
  250. TTBXItem *CommandsToolbar1;
  251. TTBXItem *StatusBar8;
  252. TTBXSeparatorItem *N27;
  253. TTBXSubmenuItem *LocalPanel1;
  254. TTBXItem *HistoryButtons3;
  255. TTBXItem *NavigationButtons3;
  256. TTBXSeparatorItem *N23;
  257. TTBXItem *Tree7;
  258. TTBXSeparatorItem *N77;
  259. TTBXItem *StatusBar6;
  260. TTBXSubmenuItem *RemotePanel2;
  261. TTBXItem *HistoryButtons4;
  262. TTBXItem *NavigationButtons4;
  263. TTBXSeparatorItem *N25;
  264. TTBXItem *Tree8;
  265. TTBXSeparatorItem *N78;
  266. TTBXItem *StatusBar7;
  267. TTBXSubmenuItem *Options1;
  268. TTBXItem *Show5;
  269. TTBXItem *HidewhenEmpty5;
  270. TTBXItem *Hide4;
  271. TTBXSeparatorItem *N69;
  272. TTBXItem *Toolbar4;
  273. TTBXSeparatorItem *N68;
  274. TTBXItem *Customize4;
  275. TTBXPopupMenu *RemotePanelPopup;
  276. TTBXItem *CopyPathtoClipboard1;
  277. TTBXItem *OpenDirectoryBookmark1;
  278. TTBXSeparatorItem *N51;
  279. TTBXItem *HistoryButtons5;
  280. TTBXItem *NavigationButtons5;
  281. TTBXSeparatorItem *N28;
  282. TTBXItem *Tree5;
  283. TTBXSeparatorItem *N75;
  284. TTBXItem *StatusBar9;
  285. TTBXPopupMenu *LocalPanelPopup;
  286. TTBXItem *CopyPathtoClipboard2;
  287. TTBXItem *OpenDirectoryBookmark2;
  288. TTBXSeparatorItem *N52;
  289. TTBXItem *HistoryButtons6;
  290. TTBXItem *NavigationButtons6;
  291. TTBXSeparatorItem *N29;
  292. TTBXItem *Tree6;
  293. TTBXSeparatorItem *N76;
  294. TTBXItem *StatusBar10;
  295. TTBXPopupMenu *RemoteFilePopup;
  296. TTBXItem *RemoteOpenMenuItem;
  297. TTBXSubmenuItem *RemoteEditMenuItem;
  298. TTBXSubmenuItem *RemoteCopyMenuItem;
  299. TTBXItem *Duplicate3;
  300. TTBXItem *Moveto1;
  301. TTBXItem *Moveto6;
  302. TTBXItem *Delete1;
  303. TTBXItem *Rename1;
  304. TTBXSeparatorItem *N45;
  305. TTBXSubmenuItem *RemoteFilePopupCustomCommandsMenu;
  306. TTBXSubmenuItem *FileNames3;
  307. TTBXItem *InserttoCommandLine2;
  308. TTBXItem *CopytoClipboard3;
  309. TTBXItem *CopytoClipboardIncludePaths3;
  310. TTBXItem *CopyURLtoClipboard3;
  311. TTBXSeparatorItem *N1;
  312. TTBXItem *Properties1;
  313. TTBXPopupMenu *RemoteDirViewPopup;
  314. TTBXSubmenuItem *GoTo4;
  315. TTBXItem *OpenDirectoryBookmark3;
  316. TTBXSeparatorItem *N81;
  317. TTBXItem *ParentDirectory4;
  318. TTBXItem *RootDirectory4;
  319. TTBXItem *HomeDirectory4;
  320. TTBXSeparatorItem *N80;
  321. TTBXItem *Back4;
  322. TTBXItem *Forward4;
  323. TTBXItem *Refresh4;
  324. TTBXItem *AddToBookmarks4;
  325. TTBXItem *CopyPathtoClipboard6;
  326. TTBXSeparatorItem *N79;
  327. TTBXPopupMenu *LocalDirViewPopup;
  328. TTBXSubmenuItem *GoTo5;
  329. TTBXItem *OpenDirectoryBookmark4;
  330. TTBXItem *ExploreDirectory2;
  331. TTBXSeparatorItem *N84;
  332. TTBXItem *ParentDirectory5;
  333. TTBXItem *RootDirectory5;
  334. TTBXItem *HomeDirectory5;
  335. TTBXSeparatorItem *N83;
  336. TTBXItem *Back5;
  337. TTBXItem *Forward5;
  338. TTBXItem *Refresh5;
  339. TTBXItem *AddToBookmarks5;
  340. TTBXItem *CopyPathtoClipboard7;
  341. TTBXSeparatorItem *N82;
  342. TTBXPopupMenu *LocalDirViewColumnPopup;
  343. TTBXItem *SortAscending1;
  344. TTBXItem *SortDescending1;
  345. TTBXItem *Hidecolumn1;
  346. TTBXSeparatorItem *N37;
  347. TTBXSubmenuItem *Showcolumns3;
  348. TTBXItem *Name3;
  349. TTBXItem *Size3;
  350. TTBXItem *Type2;
  351. TTBXItem *Modification3;
  352. TTBXItem *Attributes3;
  353. TTBXPopupMenu *RemoteDirViewColumnPopup;
  354. TTBXItem *MenuItem1;
  355. TTBXItem *MenuItem2;
  356. TTBXItem *Hidecolumn2;
  357. TTBXSeparatorItem *N38;
  358. TTBXSubmenuItem *Showcolumns4;
  359. TTBXItem *Name4;
  360. TTBXItem *Size4;
  361. TTBXItem *Modification4;
  362. TTBXItem *Permissions1;
  363. TTBXItem *Owner2;
  364. TTBXItem *Group2;
  365. TTBXPopupMenu *SessionsPopup;
  366. TTBXPopupMenu *QueuePopup;
  367. TTBXItem *ShowQuery1;
  368. TTBXItem *ShowError1;
  369. TTBXItem *ShowPrompt1;
  370. TTBXSeparatorItem *N53;
  371. TTBXItem *ExecuteNow1;
  372. TTBXItem *Delete4;
  373. TTBXSeparatorItem *N54;
  374. TTBXItem *MoveUp1;
  375. TTBXItem *MoveDown1;
  376. TTBXItem *QueueEnableItem;
  377. TTBXSeparatorItem *N67;
  378. TTBXSubmenuItem *Queue2;
  379. TTBXItem *Show4;
  380. TTBXItem *HidewhenEmpty4;
  381. TTBXItem *Hide3;
  382. TTBXSeparatorItem *N66;
  383. TTBXItem *Toolbar3;
  384. TTBXSeparatorItem *N65;
  385. TTBXItem *Customize3;
  386. TTBXPopupMenu *ExplorerBarPopup;
  387. TTBXItem *Address2;
  388. TTBXItem *StandardButtons1;
  389. TTBXItem *SelectionButtons1;
  390. TTBXItem *SessionButtons2;
  391. TTBXItem *PreferencesButtons1;
  392. TTBXItem *SortButtons3;
  393. TTBXSeparatorItem *N5;
  394. TTBXItem *StatusBar2;
  395. TTBXSeparatorItem *N72;
  396. TTBXSubmenuItem *Queue7;
  397. TTBXItem *Show6;
  398. TTBXItem *HidewhenEmpty6;
  399. TTBXItem *Hide5;
  400. TTBXSeparatorItem *N71;
  401. TTBXItem *Toolbar5;
  402. TTBXSeparatorItem *N70;
  403. TTBXItem *Customize5;
  404. TTBXItem *Tree4;
  405. TTBXItem *RemoteSortByExtColumnPopupItem;
  406. TTBXItem *TBXItem67;
  407. TTBXItem *LocalSortByExtColumnPopupItem;
  408. TAction *FileListFromClipboardAction;
  409. TAction *ShowHideRemoteLinkTargetColumnAction;
  410. TTBXItem *TBXItem1;
  411. TAction *DownloadPageAction;
  412. TAction *CommanderUpdatesBandAction;
  413. TTBXItem *TBXItem2;
  414. TAction *UpdatesPreferencesAction;
  415. TAction *ExplorerUpdatesBandAction;
  416. TTBXItem *TBXItem3;
  417. TAction *ExplorerTransferBandAction;
  418. TAction *CommanderTransferBandAction;
  419. TTBXItem *TBXItem4;
  420. TTBXItem *TBXItem5;
  421. TAction *PresetsPreferencesAction;
  422. TAction *BestFitColumnAction;
  423. TAction *CustomCommandsEnterAction;
  424. TAction *LockToolbarsAction;
  425. TTBXItem *TBXItem6;
  426. TTBXItem *TBXItem7;
  427. TAction *ShowHideRemoteTypeColumnAction;
  428. TTBXItem *TBXItem8;
  429. TAction *RemoteSortByTypeAction;
  430. TAction *QueueItemPauseAction;
  431. TTBXItem *TBXItem9;
  432. TAction *QueueItemResumeAction;
  433. TTBXItem *TBXItem10;
  434. TAction *QueuePauseAllAction;
  435. TAction *QueueResumeAllAction;
  436. TAction *QueueDeleteAllDoneAction;
  437. TAction *QueueEnableAction;
  438. TTBXSubmenuItem *TBXSubmenuItem1;
  439. TTBXItem *TBXItem11;
  440. TTBXItem *TBXItem12;
  441. TAction *EditorListCustomizeAction;
  442. TAction *RestoreSelectionAction;
  443. TAction *CurrentEditFocusedAction;
  444. TAction *NewLinkAction;
  445. TAction *NewDirAction;
  446. TTBXSubmenuItem *TBXSubmenuItem26;
  447. TTBXItem *TBXItem135;
  448. TTBXItem *TBXItem136;
  449. TTBXItem *TBXItem209;
  450. TAction *QueueDisconnectOnceEmptyAction2;
  451. TTBXItem *TBXItem13;
  452. TAction *LocalCopyAction;
  453. TAction *RemoteCopyAction;
  454. TAction *ExplorerCustomCommandsBandAction;
  455. TAction *CommanderCustomCommandsBandAction;
  456. TTBXItem *TBXItem15;
  457. TTBXItem *TBXItem16;
  458. TAction *CustomCommandsBandAction;
  459. TAction *ColorMenuAction;
  460. TAction *AutoReadDirectoryAfterOpAction;
  461. TTBXPopupMenu *RemoteAddressPopup;
  462. TTBXSubmenuItem *TBXSubmenuItem2;
  463. TTBXItem *TBXItem17;
  464. TTBXSeparatorItem *TBXSeparatorItem1;
  465. TTBXItem *TBXItem18;
  466. TTBXItem *TBXItem19;
  467. TTBXItem *TBXItem20;
  468. TTBXSeparatorItem *TBXSeparatorItem2;
  469. TTBXItem *TBXItem21;
  470. TTBXItem *TBXItem22;
  471. TTBXItem *TBXItem24;
  472. TTBXItem *TBXItem25;
  473. TAction *DuplicateSessionAction;
  474. TAction *CustomCommandsLastAction;
  475. TAction *CustomCommandsLastFocusedAction;
  476. TAction *CustomCommandsEnterFocusedAction;
  477. TAction *CurrentAddEditLinkContextAction;
  478. TTBXItem *TBXItem23;
  479. TTBEditAction *QueueItemSpeedAction;
  480. TTBXComboBoxItem *QueuePopupSpeedComboBoxItem;
  481. TAction *CurrentDeleteAlternativeAction;
  482. TAction *CurrentEditWithAction;
  483. TAction *LocalFilterAction;
  484. TAction *RemoteFilterAction;
  485. TTBXItem *TBXItem26;
  486. TTBXItem *TBXItem27;
  487. TAction *QueueShutDownOnceEmptyAction2;
  488. TAction *QueueIdleOnceEmptyAction;
  489. TTBXSubmenuItem *TBXSubmenuItem3;
  490. TTBXItem *TBXItem28;
  491. TTBXItem *TBXItem29;
  492. TAction *QueueCycleOnceEmptyAction;
  493. TAction *RemoteFindFilesAction;
  494. TTBXItem *TBXItem30;
  495. TTBXItem *TBXItem31;
  496. TTBXItem *TBXItem32;
  497. TTBXItem *TBXItem33;
  498. TTBXItem *TBXItem34;
  499. TTBXItem *TBXItem35;
  500. TTBXItem *TBXItem36;
  501. TTBXItem *TBXItem37;
  502. TTBXItem *TBXItem38;
  503. TShellResources *ShellResources;
  504. TTBXColorItem *ColorMenuItem;
  505. TAction *CurrentEditInternalAction;
  506. TAction *SaveWorkspaceAction;
  507. TAction *LocalRenameAction;
  508. TAction *LocalEditAction;
  509. TAction *LocalMoveAction;
  510. TAction *LocalCreateDirAction;
  511. TAction *LocalDeleteAction;
  512. TAction *LocalPropertiesAction;
  513. TAction *RemoteRenameAction;
  514. TAction *RemoteEditAction;
  515. TAction *RemoteMoveAction;
  516. TAction *RemoteCreateDirAction;
  517. TAction *RemoteDeleteAction;
  518. TAction *RemotePropertiesAction;
  519. TAction *LocalAddEditLinkAction;
  520. TAction *RemoteAddEditLinkAction;
  521. TAction *CommanderLocalFileBandAction;
  522. TAction *CommanderRemoteFileBandAction;
  523. TTBXItem *TBXItem14;
  524. TTBXItem *TBXItem39;
  525. TTBXItem *TBXItem40;
  526. TTBXItem *TBXItem41;
  527. TAction *RemoteCopyFocusedAction;
  528. TAction *RemoteMoveFocusedAction;
  529. TAction *LocalSelectAction;
  530. TAction *LocalUnselectAction;
  531. TAction *LocalSelectAllAction;
  532. TAction *RemoteSelectAction;
  533. TAction *RemoteUnselectAction;
  534. TAction *RemoteSelectAllAction;
  535. TAction *CommanderLocalSelectionBandAction;
  536. TAction *CommanderRemoteSelectionBandAction;
  537. TTBXItem *TBXItem42;
  538. TTBXItem *TBXItem43;
  539. TTBXItem *TBXItem44;
  540. TTBXItem *TBXItem45;
  541. TAction *SelectiveToolbarTextAction;
  542. TTBXItem *TBXItem46;
  543. TTBXItem *TBXItem47;
  544. TTBXItem *TBXItem48;
  545. TTBXItem *TBXItem49;
  546. TTBXPopupMenu *LocalFilePopup;
  547. TTBXItem *LocalOpenMenuItem;
  548. TTBXSubmenuItem *LocalEditMenuItem;
  549. TTBXSubmenuItem *LocalCopyMenuItem;
  550. TTBXItem *TBXItem54;
  551. TTBXItem *TBXItem57;
  552. TTBXItem *TBXItem58;
  553. TTBXSeparatorItem *TBXSeparatorItem3;
  554. TTBXSubmenuItem *LocalFilePopupCustomCommandsMenu;
  555. TTBXSubmenuItem *TBXSubmenuItem5;
  556. TTBXItem *TBXItem59;
  557. TTBXItem *TBXItem60;
  558. TTBXItem *TBXItem61;
  559. TTBXItem *TBXItem62;
  560. TTBXSeparatorItem *TBXSeparatorItem4;
  561. TTBXItem *TBXItem63;
  562. TAction *LocalCopyFocusedAction;
  563. TAction *LocalMoveFocusedAction;
  564. TTBXItem *TBXItem50;
  565. TAction *CurrentSystemMenuFocusedAction;
  566. TTBXItem *TBXItem51;
  567. TTBXSeparatorItem *TBXSeparatorItem5;
  568. TTBXSeparatorItem *TBXSeparatorItem6;
  569. TTBXItem *TBXItem56;
  570. TAction *SessionGenerateUrlAction2;
  571. TTBXItem *TBXItem52;
  572. TAction *FormatSizeBytesKilobytesAction;
  573. TAction *FormatSizeBytesShortAction;
  574. TTBXSubmenuItem *RemoteFormatSizeBytesPopupItem;
  575. TTBXItem *TBXItem53;
  576. TTBXItem *TBXItem55;
  577. TTBXSeparatorItem *TBXSeparatorItem7;
  578. TTBXSeparatorItem *TBXSeparatorItem8;
  579. TTBXSubmenuItem *LocalFormatSizeBytesPopupItem;
  580. TTBXItem *TBXItem64;
  581. TTBXItem *TBXItem65;
  582. TTBXItem *TBXItem66;
  583. TAction *QueueSuspendOnceEmptyAction2;
  584. TTBXItem *TBXItem68;
  585. TAction *CurrentEditWithFocusedAction;
  586. TAction *CurrentEditInternalFocusedAction;
  587. TTBXSubmenuItem *TBXSubmenuItem7;
  588. TTBXItem *TBXItem70;
  589. TTBXItem *TBXItem71;
  590. TAction *QueueDeleteAllAction;
  591. TTBXItem *TBXItem142;
  592. TTBXItem *TBXItem72;
  593. TTBXItem *TBXItem73;
  594. TAction *LocalCopyFocusedQueueAction;
  595. TAction *LocalCopyQueueAction;
  596. TAction *RemoteCopyFocusedQueueAction;
  597. TAction *RemoteCopyQueueAction;
  598. TAction *LocalCopyFocusedNonQueueAction;
  599. TAction *LocalCopyNonQueueAction;
  600. TAction *RemoteCopyFocusedNonQueueAction;
  601. TAction *RemoteCopyNonQueueAction;
  602. TTBXItem *TBXItem69;
  603. TTBXSeparatorItem *TBXSeparatorItem9;
  604. TTBXItem *TBXItem74;
  605. TTBXSeparatorItem *TBXSeparatorItem10;
  606. TAction *SelectSameExtAction;
  607. TAction *UnselectSameExtAction;
  608. TAction *GoToAddressAction;
  609. TAction *LockAction;
  610. TAction *UnlockAction;
  611. TAction *TipsAction;
  612. TAction *CustomCommandsNonFileAction;
  613. TTBXSubmenuItem *RemoteDirViewPopupCustomCommandsMenu;
  614. TTBXItem *TBXItem75;
  615. TTBXItem *TBXItem76;
  616. void __fastcall LogActionsUpdate(TBasicAction *Action, bool &Handled);
  617. void __fastcall LogActionsExecute(TBasicAction *Action, bool &Handled);
  618. void __fastcall ExplorerActionsUpdate(TBasicAction *Action, bool &Handled);
  619. void __fastcall ExplorerActionsExecute(TBasicAction *Action, bool &Handled);
  620. void __fastcall SessionIdleTimerTimer(TObject *Sender);
  621. void __fastcall QueuePopupPopup(TObject *Sender);
  622. void __fastcall QueuePopupSpeedComboBoxItemItemClick(TObject *Sender);
  623. void __fastcall QueueSpeedComboBoxItemAcceptText(TObject *Sender,
  624. UnicodeString &NewText, bool &Accept);
  625. void __fastcall FocusedEditMenuItemPopup(TTBCustomItem *Sender, bool FromLink);
  626. void __fastcall EditMenuItemPopup(TTBCustomItem *Sender, bool FromLink);
  627. void __fastcall QueuePopupSpeedComboBoxItemAdjustImageIndex(TTBXComboBoxItem *Sender,
  628. const UnicodeString AText, int AIndex, int &ImageIndex);
  629. UnicodeString __fastcall CustomCommandCaption(const TCustomCommandType * Command, bool Toolbar);
  630. UnicodeString __fastcall CustomCommandHint(const TCustomCommandType * Command);
  631. private:
  632. TListColumn * FListColumn;
  633. TCustomScpExplorerForm * FScpExplorer;
  634. bool FSessionIdleTimerExecuting;
  635. int FBusy;
  636. void __fastcall SetScpExplorer(TCustomScpExplorerForm * value);
  637. bool __fastcall GetBusy();
  638. protected:
  639. void __fastcall CreateSessionListMenu(TAction * Action);
  640. void __fastcall CreateSessionListMenuLevel(TTBCustomItem * Menu, int Index, int Level);
  641. UnicodeString __fastcall GetSessionFolderRoot(TSessionData * Data, int Level);
  642. void __fastcall CreateWorkspacesMenu(TAction * Action);
  643. void __fastcall WorkspaceItemClick(TObject * Sender);
  644. int __fastcall CreateCustomCommandsListMenu(TCustomCommandList * List, TTBCustomItem * Menu, bool OnFocused,
  645. bool Toolbar, TCustomCommandListType ListType, int Tag);
  646. void __fastcall CreateCustomCommandsMenu(TAction * Action, TCustomCommandListType ListType);
  647. bool __fastcall CheckCustomCommandsToolbarList(TTBXToolbar * Toolbar, TCustomCommandList * List, int & Index);
  648. void __fastcall UpdateCustomCommandsToolbarList(TTBXToolbar * Toolbar, TCustomCommandList * List, int & Index);
  649. void __fastcall CreateSessionColorMenu(TAction * Action);
  650. void __fastcall SessionColorChange(TColor Color);
  651. void __fastcall CreateOpenedSessionListMenu(TAction * Action);
  652. TCustomDirView * __fastcall DirView(TOperationSide Side) { return ScpExplorer->DirView(Side); }
  653. bool __fastcall DirViewEnabled(TOperationSide Side) { return ScpExplorer->DirViewEnabled(Side); }
  654. void __fastcall SessionItemClick(TObject * Sender);
  655. void __fastcall SessionFolderItemClick(TObject * Sender);
  656. void __fastcall SessionFolderThisItemClick(TObject * Sender);
  657. void __fastcall OpenedSessionItemClick(TObject * Sender);
  658. void __fastcall CustomCommandClick(TObject * Sender);
  659. void __fastcall CreateEditorListMenu(TTBCustomItem * Menu, bool OnFocused);
  660. void __fastcall EditorItemClick(TObject * Sender);
  661. void __fastcall EditorItemClickFocused(TObject * Sender);
  662. void __fastcall DoEditorItemClick(TObject * Sender, bool OnFocused);
  663. void __fastcall DoIdle();
  664. inline void __fastcall ShowUpdatesUpdate();
  665. void __fastcall PreferencesDialog(TPreferencesMode APreferencesMode);
  666. void __fastcall CustomCommandsLastUpdate(TAction * Action);
  667. UnicodeString __fastcall QueueItemSpeed(const UnicodeString & Text,
  668. TTBXComboBoxItem * Item);
  669. void __fastcall CycleQueueOnceEmptyAction();
  670. void __fastcall SetQueueOnceEmptyAction(TAction * Action);
  671. TAction * __fastcall CurrentQueueOnceEmptyAction();
  672. void __fastcall CloneShortcuts();
  673. public:
  674. __fastcall TNonVisualDataModule(TComponent * Owner);
  675. virtual __fastcall ~TNonVisualDataModule();
  676. void __fastcall CommanderShortcuts();
  677. void __fastcall ExplorerShortcuts();
  678. TShortCut __fastcall OpenSessionShortCut(int Index);
  679. void __fastcall UpdateNonVisibleActions();
  680. void __fastcall UpdateCustomCommandsToolbar(TTBXToolbar * Toolbar);
  681. void __fastcall QueueSpeedComboBoxItem(TTBXComboBoxItem * Item);
  682. void __fastcall QueueSpeedComboBoxItemUpdate(TTBXComboBoxItem * Item);
  683. void __fastcall CreateCustomCommandsMenu(TTBCustomItem * Menu, bool OnFocused,
  684. bool Toolbar, TCustomCommandListType ListType);
  685. void __fastcall CreateCustomCommandsMenu(TAction * Action, bool OnFocused, TCustomCommandListType ListType);
  686. TOnceDoneOperation __fastcall CurrentQueueOnceEmptyOperation();
  687. void __fastcall ResetQueueOnceEmptyOperation();
  688. void __fastcall StartBusy();
  689. void __fastcall EndBusy();
  690. __property TListColumn * ListColumn = { read = FListColumn, write = FListColumn };
  691. __property TCustomScpExplorerForm * ScpExplorer = { read = FScpExplorer, write = SetScpExplorer };
  692. __property bool Busy = { read = GetBusy };
  693. };
  694. //---------------------------------------------------------------------------
  695. extern PACKAGE TNonVisualDataModule *NonVisualDataModule;
  696. //---------------------------------------------------------------------------
  697. #endif