1
0

ScpCommander.h 24 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644
  1. //---------------------------------------------------------------------------
  2. #ifndef ScpCommanderH
  3. #define ScpCommanderH
  4. //---------------------------------------------------------------------------
  5. #include "CustomScpExplorer.h"
  6. #include <Classes.hpp>
  7. #include <Controls.hpp>
  8. #include <StdCtrls.hpp>
  9. #include <Forms.hpp>
  10. #include <CustomDirView.hpp>
  11. #include <CustomUnixDirView.hpp>
  12. #include <IEListView.hpp>
  13. #include <NortonLikeListView.hpp>
  14. #include <UnixDirView.h>
  15. #include <ComCtrls.hpp>
  16. #include <ExtCtrls.hpp>
  17. #include <ToolWin.hpp>
  18. #include <DirView.hpp>
  19. #include <PathLabel.hpp>
  20. #include <WinInterface.h>
  21. #include "HistoryComboBox.hpp"
  22. #include "CustomDriveView.hpp"
  23. #include "DriveView.hpp"
  24. #include "UnixDriveView.h"
  25. #include "TB2Dock.hpp"
  26. #include "TB2Item.hpp"
  27. #include "TB2Toolbar.hpp"
  28. #include "TBX.hpp"
  29. #include <Menus.hpp>
  30. #include "TB2ExtItems.hpp"
  31. #include "TBXExtItems.hpp"
  32. #include "TBXLists.hpp"
  33. #include "TBXStatusBars.hpp"
  34. #include "TBXToolPals.hpp"
  35. #include "ThemePageControl.h"
  36. #include <Vcl.AppEvnts.hpp>
  37. //---------------------------------------------------------------------------
  38. class TScpCommanderForm : public TCustomScpExplorerForm
  39. {
  40. __published:
  41. TSplitter *Splitter;
  42. TPanel *LocalPanel;
  43. TTBXStatusBar *LocalStatusBar;
  44. TDirView *LocalDirView;
  45. TPathLabel *LocalPathLabel;
  46. TPathLabel *RemotePathLabel;
  47. TTBXStatusBar *StatusBar;
  48. TDriveView *LocalDriveView;
  49. TSplitter *LocalPanelSplitter;
  50. TTBXToolbar *SessionToolbar;
  51. TTBXItem *TBXItem123;
  52. TTBXSeparatorItem *TBXSeparatorItem34;
  53. TTBXItem *TBXItem124;
  54. TTBXSubmenuItem *TBXSubmenuItem23;
  55. TTBXItem *TBXItem125;
  56. TTBXToolbar *PreferencesToolbar;
  57. TTBXItem *TBXItem126;
  58. TTBXSeparatorItem *TBXSeparatorItem36;
  59. TTBXSubmenuItem *TBXSubmenuItem24;
  60. TTBXItem *TBXItem128;
  61. TTBXItem *TBXItem129;
  62. TTBXItem *TBXItem130;
  63. TTBXToolbar *SortToolbar;
  64. TTBXItem *TBXItem145;
  65. TTBXSeparatorItem *TBXSeparatorItem40;
  66. TTBXItem *TBXItem146;
  67. TTBXItem *TBXItem147;
  68. TTBXItem *TBXItem148;
  69. TTBXItem *TBXItem149;
  70. TTBXItem *TBXItem150;
  71. TTBXItem *TBXItem151;
  72. TTBXItem *TBXItem152;
  73. TTBXItem *TBXItem153;
  74. TTBXToolbar *CommandsToolbar;
  75. TTBXItem *TBXItem154;
  76. TTBXItem *TBXItem155;
  77. TTBXItem *TBXItem156;
  78. TTBXSeparatorItem *TBXSeparatorItem41;
  79. TTBXItem *TBXItem157;
  80. TTBXSeparatorItem *TBXSeparatorItem42;
  81. TTBXItem *TBXItem158;
  82. TTBXToolbar *MenuToolbar;
  83. TTBXSubmenuItem *LocalMenuButton;
  84. TTBXItem *TBXItem1;
  85. TTBXSeparatorItem *TBXSeparatorItem1;
  86. TTBXSubmenuItem *TBXSubmenuItem2;
  87. TTBXItem *TBXItem2;
  88. TTBXItem *TBXItem3;
  89. TTBXSeparatorItem *TBXSeparatorItem2;
  90. TTBXItem *TBXItem4;
  91. TTBXItem *TBXItem5;
  92. TTBXItem *TBXItem6;
  93. TTBXSeparatorItem *TBXSeparatorItem3;
  94. TTBXItem *TBXItem7;
  95. TTBXItem *TBXItem8;
  96. TTBXItem *TBXItem9;
  97. TTBXItem *TBXItem10;
  98. TTBXItem *TBXItem11;
  99. TTBXSeparatorItem *TBXSeparatorItem4;
  100. TTBXSubmenuItem *TBXSubmenuItem3;
  101. TTBXItem *TBXItem12;
  102. TTBXSeparatorItem *TBXSeparatorItem5;
  103. TTBXItem *TBXItem13;
  104. TTBXItem *TBXItem14;
  105. TTBXItem *TBXItem15;
  106. TTBXItem *TBXItem16;
  107. TTBXItem *TBXItem17;
  108. TTBXItem *TBXItem18;
  109. TTBXSubmenuItem *TBXSubmenuItem4;
  110. TTBXItem *TBXItem19;
  111. TTBXItem *TBXItem20;
  112. TTBXItem *TBXItem21;
  113. TTBXItem *TBXItem22;
  114. TTBXItem *TBXItem23;
  115. TTBXSubmenuItem *TBXSubmenuItem18;
  116. TTBXItem *TBXItem107;
  117. TTBXItem *TBXItem108;
  118. TTBXItem *TBXItem109;
  119. TTBXItem *TBXItem110;
  120. TTBXItem *TBXItem111;
  121. TTBXItem *TBXItem112;
  122. TTBXSubmenuItem *TBXSubmenuItem5;
  123. TTBXSeparatorItem *TBXSeparatorItem6;
  124. TTBXItem *TBXItem25;
  125. TTBXSubmenuItem *TBXItem26;
  126. TTBXItem *TBXItem29;
  127. TTBXSeparatorItem *TBXSeparatorItem7;
  128. TTBXSubmenuItem *CurrentCopyItem;
  129. TTBXItem *TBXItem31;
  130. TTBXItem *CurrentMoveItem;
  131. TTBXItem *TBXItem33;
  132. TTBXItem *TBXItem34;
  133. TTBXItem *TBXItem35;
  134. TTBXItem *TBXItem36;
  135. TTBXSeparatorItem *TBXSeparatorItem8;
  136. TTBXSubmenuItem *CustomCommandsMenu;
  137. TTBXSubmenuItem *TBXSubmenuItem6;
  138. TTBXItem *TBXItem37;
  139. TTBXItem *TBXItem38;
  140. TTBXItem *TBXItem39;
  141. TTBXItem *TBXItem40;
  142. TTBXSeparatorItem *TBXSeparatorItem9;
  143. TTBXItem *TBXItem41;
  144. TTBXSubmenuItem *TBXSubmenuItem7;
  145. TTBXItem *TBXItem42;
  146. TTBXItem *TBXItem43;
  147. TTBXItem *TBXItem44;
  148. TTBXItem *TBXItem45;
  149. TTBXSubmenuItem *QueueSubmenuItem;
  150. TTBXItem *TBXItem46;
  151. TTBXItem *QueueEnableItem2;
  152. TTBXSeparatorItem *TBXSeparatorItem10;
  153. TTBXItem *TBXItem47;
  154. TTBXItem *TBXItem48;
  155. TTBXItem *TBXItem49;
  156. TTBXSeparatorItem *TBXSeparatorItem11;
  157. TTBXItem *TBXItem50;
  158. TTBXItem *TBXItem51;
  159. TTBXSeparatorItem *TBXSeparatorItem12;
  160. TTBXItem *TBXItem52;
  161. TTBXItem *TBXItem53;
  162. TTBXSeparatorItem *TBXSeparatorItem13;
  163. TTBXItem *TBXItem54;
  164. TTBXItem *TBXItem55;
  165. TTBXSeparatorItem *TBXSeparatorItem14;
  166. TTBXItem *TBXItem57;
  167. TTBXSeparatorItem *TBXSeparatorItem15;
  168. TTBXItem *TBXItem58;
  169. TTBXSubmenuItem *TBXSubmenuItem19;
  170. TTBXItem *TBXItem113;
  171. TTBXSubmenuItem *TBXSubmenuItem20;
  172. TTBXSeparatorItem *TBXSeparatorItem29;
  173. TTBXSubmenuItem *TBXSubmenuItem21;
  174. TTBXItem *TBXItem114;
  175. TTBXItem *TBXItem115;
  176. TTBXSubmenuItem *TBXSubmenuItem9;
  177. TTBXSubmenuItem *TBXSubmenuItem10;
  178. TTBXItem *TBXItem60;
  179. TTBXItem *TBXItem62;
  180. TTBXItem *TBXItem63;
  181. TTBXItem *TBXItem64;
  182. TTBXSubmenuItem *TBXSubmenuItem11;
  183. TTBXItem *TBXItem65;
  184. TTBXItem *TBXItem66;
  185. TTBXSeparatorItem *TBXSeparatorItem16;
  186. TTBXItem *TBXItem67;
  187. TTBXSeparatorItem *TBXSeparatorItem17;
  188. TTBXItem *TBXItem68;
  189. TTBXSubmenuItem *TBXSubmenuItem12;
  190. TTBXItem *TBXItem69;
  191. TTBXItem *TBXItem70;
  192. TTBXSeparatorItem *TBXSeparatorItem18;
  193. TTBXItem *TBXItem71;
  194. TTBXSeparatorItem *TBXSeparatorItem19;
  195. TTBXItem *TBXItem72;
  196. TTBXSeparatorItem *TBXSeparatorItem20;
  197. TTBXItem *TBXItem73;
  198. TTBXItem *TBXItem74;
  199. TTBXItem *TBXItem75;
  200. TTBXSubmenuItem *TBXSubmenuItem14;
  201. TTBXItem *TBXItem77;
  202. TTBXItem *TBXItem78;
  203. TTBXItem *TBXItem79;
  204. TTBXSeparatorItem *TBXSeparatorItem21;
  205. TTBXItem *TBXItem80;
  206. TTBXSeparatorItem *TBXSeparatorItem22;
  207. TTBXItem *TBXItem81;
  208. TTBXSeparatorItem *TBXSeparatorItem23;
  209. TTBXItem *TBXItem82;
  210. TTBXSubmenuItem *RemoteMenuButton;
  211. TTBXItem *TBXItem83;
  212. TTBXSeparatorItem *TBXSeparatorItem24;
  213. TTBXSubmenuItem *TBXSubmenuItem15;
  214. TTBXItem *TBXItem84;
  215. TTBXSeparatorItem *TBXSeparatorItem25;
  216. TTBXItem *TBXItem85;
  217. TTBXItem *TBXItem86;
  218. TTBXItem *TBXItem87;
  219. TTBXSeparatorItem *TBXSeparatorItem26;
  220. TTBXItem *TBXItem88;
  221. TTBXItem *TBXItem89;
  222. TTBXItem *TBXItem90;
  223. TTBXItem *TBXItem91;
  224. TTBXItem *TBXItem92;
  225. TTBXSeparatorItem *TBXSeparatorItem27;
  226. TTBXSubmenuItem *TBXSubmenuItem16;
  227. TTBXItem *TBXItem93;
  228. TTBXSeparatorItem *TBXSeparatorItem28;
  229. TTBXItem *TBXItem94;
  230. TTBXItem *TBXItem95;
  231. TTBXItem *TBXItem96;
  232. TTBXItem *TBXItem97;
  233. TTBXItem *TBXItem98;
  234. TTBXItem *TBXItem99;
  235. TTBXItem *TBXItem100;
  236. TTBXSubmenuItem *TBXSubmenuItem17;
  237. TTBXItem *TBXItem101;
  238. TTBXItem *TBXItem102;
  239. TTBXItem *TBXItem103;
  240. TTBXItem *TBXItem104;
  241. TTBXItem *TBXItem105;
  242. TTBXItem *TBXItem106;
  243. TTBXSubmenuItem *TBXSubmenuItem22;
  244. TTBXItem *TBXItem116;
  245. TTBXSeparatorItem *TBXSeparatorItem30;
  246. TTBXItem *TBXItem117;
  247. TTBXItem *TBXItem118;
  248. TTBXItem *TBXItem119;
  249. TTBXSeparatorItem *TBXSeparatorItem31;
  250. TTBXItem *TBXItem120;
  251. TTBXSeparatorItem *TBXSeparatorItem32;
  252. TTBXItem *TBXItem121;
  253. TTBXSeparatorItem *TBXSeparatorItem33;
  254. TTBXItem *TBXItem122;
  255. TTBXDock *LocalTopDock;
  256. TTBXToolbar *LocalPathToolbar;
  257. TTBXToolbar *LocalHistoryToolbar;
  258. TTBXSubmenuItem *LocalBackButton;
  259. TTBXSubmenuItem *LocalForwardButton;
  260. TTBXToolbar *LocalNavigationToolbar;
  261. TTBXItem *TBXItem159;
  262. TTBXItem *TBXItem160;
  263. TTBXItem *TBXItem161;
  264. TTBXItem *TBXItem162;
  265. TTBXSeparatorItem *TBXSeparatorItem43;
  266. TTBXItem *TBXItem164;
  267. TTBXDock *LocalBottomDock;
  268. TTBXDock *RemoteTopDock;
  269. TTBXToolbar *RemotePathToolbar;
  270. TTBXToolbar *RemoteHistoryToolbar;
  271. TTBXSubmenuItem *RemoteBackButton;
  272. TTBXSubmenuItem *RemoteForwardButton;
  273. TTBXToolbar *RemoteNavigationToolbar;
  274. TTBXItem *TBXItem165;
  275. TTBXItem *TBXItem166;
  276. TTBXItem *TBXItem167;
  277. TTBXItem *TBXItem168;
  278. TTBXSeparatorItem *TBXSeparatorItem44;
  279. TTBXItem *TBXItem170;
  280. TTBXDock *RemoteBottomDock;
  281. TTBXDock *BottomDock;
  282. TTBXToolbar *Toolbar2Toolbar;
  283. TTBXItem *TBXItem171;
  284. TTBXItem *TBXItem172;
  285. TTBXItem *CurrentCopyToolbar2Item;
  286. TTBXItem *CurrentMoveToolbar2Item;
  287. TTBXItem *TBXItem175;
  288. TTBXItem *TBXItem176;
  289. TTBXItem *TBXItem177;
  290. TTBXItem *TBXItem178;
  291. TTBXItem *TBXItem179;
  292. TTBXToolbar *UpdatesToolbar;
  293. TTBXSubmenuItem *TBXSubmenuItem1;
  294. TTBXItem *TBXItem180;
  295. TTBXItem *TBXItem181;
  296. TTBXItem *TBXItem182;
  297. TTBXSeparatorItem *TBXSeparatorItem45;
  298. TTBXItem *TBXItem183;
  299. TTBXItem *TBXItem184;
  300. TTBXSeparatorItem *TBXSeparatorItem46;
  301. TTBXItem *TBXItem185;
  302. TTBXItem *TBXItem186;
  303. TTBXItem *TBXItem187;
  304. TTBXToolbar *TransferToolbar;
  305. TTBXItem *TBXItem188;
  306. TTBXItem *TBXItem190;
  307. TTBXSeparatorItem *TBXSeparatorItem47;
  308. TTBXItem *TBXItem191;
  309. TTBXItem *TBXItem192;
  310. TTBXItem *TBXItem193;
  311. TTBXItem *TBXItem196;
  312. TTBXItem *TBXItem197;
  313. TTBXSeparatorItem *TBXSeparatorItem48;
  314. TTBXSubmenuItem *TBXSubmenuItem13;
  315. TTBXItem *TBXItem198;
  316. TTBXItem *TBXItem199;
  317. TTBXItem *TBXItem27;
  318. TTBXSubmenuItem *TBXSubmenuItem26;
  319. TTBXItem *TBXItem24;
  320. TTBXItem *TBXItem209;
  321. TTBXItem *TBXItem28;
  322. TTBXToolbar *CustomCommandsToolbar;
  323. TTBXItem *TBXItem215;
  324. TTBXSeparatorItem *TBXSeparatorItem49;
  325. TTBXColorItem *ColorMenuItem;
  326. TTBXDropDownItem *TransferDropDown;
  327. TTBXStringList *TransferList;
  328. TTBXLabelItem *TransferLabel;
  329. TTBXSeparatorItem *TBXSeparatorItem52;
  330. TTBXItem *TBXItem189;
  331. TTBXItem *TBXItem218;
  332. TTBXItem *TBXItem219;
  333. TTBXComboBoxItem *RemotePathComboBox;
  334. TTBXComboBoxItem *LocalPathComboBox;
  335. TTBXToolbar *CommandLineToolbar;
  336. TTBXComboBoxItem *CommandLineCombo;
  337. TTBXLabelItem *CommandLinePromptLabel;
  338. TTBXSubmenuItem *LocalOpenDirButton;
  339. TTBXSubmenuItem *RemoteOpenDirButton;
  340. TTBXComboBoxItem *QueueSpeedComboBoxItem;
  341. TTBXItem *TBXItem220;
  342. TTBXItem *TBXItem221;
  343. TTBXSubmenuItem *TBXSubmenuItem8;
  344. TTBXItem *TBXItem222;
  345. TTBXItem *TBXItem223;
  346. TTBXItem *TBXItem224;
  347. TTBXItem *TBXItem210;
  348. TTBXSubmenuItem *TBXItem228;
  349. TTBXSubmenuItem *TBXItem229;
  350. TTBXSeparatorItem *TBXSeparatorItem53;
  351. TTBXItem *TBXItem230;
  352. TTBXSubmenuItem *TBXSubmenuItem231;
  353. TTBXToolbar *LocalFileToolbar;
  354. TTBXSubmenuItem *TBXItem231;
  355. TTBXItem *TBXItem232;
  356. TTBXItem *TBXItem233;
  357. TTBXItem *TBXItem234;
  358. TTBXSubmenuItem *TBXItem235;
  359. TTBXSeparatorItem *TBXSeparatorItem35;
  360. TTBXItem *TBXItem236;
  361. TTBXSeparatorItem *TBXSeparatorItem54;
  362. TTBXToolbar *RemoteFileToolbar;
  363. TTBXSubmenuItem *TBXItem238;
  364. TTBXItem *TBXItem239;
  365. TTBXSeparatorItem *TBXSeparatorItem55;
  366. TTBXItem *TBXItem240;
  367. TTBXItem *TBXItem241;
  368. TTBXSubmenuItem *TBXItem242;
  369. TTBXItem *TBXItem243;
  370. TTBXSeparatorItem *TBXSeparatorItem56;
  371. TTBXItem *TBXItem59;
  372. TTBXItem *TBXItem136;
  373. TTBXLabelItem *TransferSettingsLabelItem;
  374. TTBXToolbar *LocalSelectionToolbar;
  375. TTBXItem *TBXItem30;
  376. TTBXItem *TBXItem32;
  377. TTBXItem *TBXItem137;
  378. TTBXToolbar *RemoteSelectionToolbar;
  379. TTBXItem *TBXItem138;
  380. TTBXItem *TBXItem139;
  381. TTBXItem *TBXItem140;
  382. TTBXItem *TBXItem61;
  383. TTBXItem *TBXItem131;
  384. TTBXSeparatorItem *TBXSeparatorItem37;
  385. TTBXItem *TBXItem132;
  386. TTBXItem *TBXItem133;
  387. TTBXSeparatorItem *TBXSeparatorItem38;
  388. TPanel *QueueSeparatorPanel;
  389. TTBXSeparatorItem *TBXSeparatorItem39;
  390. TTBXItem *TBXItem134;
  391. TTBXItem *TBXItem56;
  392. TTBXSeparatorItem *TBXSeparatorItem50;
  393. TTBXItem *TBXItem135;
  394. TTBXItem *TBXItem141;
  395. TTBXItem *TBXItem142;
  396. TTBXItem *TBXItem143;
  397. TTBXItem *TBXItem144;
  398. TTBXItem *CurrentCopyNonQueueItem;
  399. TTBXItem *CurrentCopyQueueItem;
  400. TTBXSeparatorItem *TBXSeparatorItem51;
  401. TTBXItem *TBXItem174;
  402. TTBXSeparatorItem *TBXSeparatorItem58;
  403. TTBXItem *TBXItem200;
  404. TTBXSeparatorItem *TBXSeparatorItem59;
  405. TTBXSeparatorItem *TBXSeparatorItem60;
  406. TTBXSeparatorItem *TBXSeparatorItem61;
  407. TTBXItem *TBXItem212;
  408. TTBXItem *TBXItem213;
  409. TTBXSubmenuItem *TBXSubmenuItem25;
  410. TTBXItem *TBXItem214;
  411. TTBXItem *TBXItem216;
  412. TTBXItem *TBXItem217;
  413. TTBXSubmenuItem *TBXSubmenuItem28;
  414. TTBXItem *TBXItem227;
  415. TTBXSubmenuItem *RemoteNewSubmenuItem;
  416. TTBXItem *TBXItem244;
  417. TTBXItem *TBXItem246;
  418. TTBXItem *TBXItem247;
  419. TTBXSubmenuItem *LocalNewSubmenuItem;
  420. TTBXItem *TBXItem248;
  421. TTBXItem *TBXItem249;
  422. TTBXItem *TBXItem250;
  423. TTBXItem *TBXItem76;
  424. TTBXItem *TBXItem127;
  425. TTBXSeparatorItem *TBXSeparatorItem62;
  426. TTBXItem *TBXItem163;
  427. TTBXItem *TBXItem169;
  428. TTBXSeparatorItem *TBXSeparatorItem63;
  429. TTBXItem *TBXItem237;
  430. TTBXItem *TBXItem245;
  431. TTBXSeparatorItem *TBXSeparatorItem64;
  432. TTBXItem *TBXItem251;
  433. TTBXItem *TBXItem252;
  434. TTBXItem *TBXItem253;
  435. TTBXItem *TBXItem255;
  436. TTBXSeparatorItem *TBXSeparatorItem65;
  437. TTBXItem *TBXItem256;
  438. TDriveView *OtherLocalDriveView;
  439. TDirView *OtherLocalDirView;
  440. void __fastcall SplitterMoved(TObject *Sender);
  441. void __fastcall SplitterCanResize(TObject *Sender, int &NewSize,
  442. bool &Accept);
  443. void __fastcall SplitterDblClick(TObject *Sender);
  444. void __fastcall PanelSplitterDblClick(TObject * Sender);
  445. void __fastcall LocalDirViewExecFile(TObject *Sender, TListItem *Item,
  446. bool &AllowExec);
  447. void __fastcall LocalFileControlDDDragEnter(TObject *Sender,
  448. IDataObject *DataObj, int grfKeyState, TPoint &Point,
  449. int &dwEffect, bool &Accept);
  450. void __fastcall LocalFileControlDDFileOperation(
  451. TObject *Sender, int dwEffect, UnicodeString SourcePath, UnicodeString TargetPath,
  452. bool Paste, bool &DoOperation);
  453. void __fastcall RemoteFileControlDDFileOperationExecuted(TObject *Sender,
  454. int dwEffect, UnicodeString SourcePath, UnicodeString TargetPath);
  455. void __fastcall LocalDirViewDDTargetHasDropHandler(TObject *Sender,
  456. TListItem *Item, int &Effect, bool &DropHandler);
  457. void __fastcall PathLabelDblClick(TObject *Sender);
  458. void __fastcall LocalDirViewEnter(TObject *Sender);
  459. void __fastcall LocalPathLabelGetStatus(TCustomPathLabel *Sender,
  460. bool &Active);
  461. void __fastcall RemotePathLabelGetStatus(TCustomPathLabel *Sender,
  462. bool &Active);
  463. void __fastcall LocalDriveViewEnter(TObject *Sender);
  464. void __fastcall LocalPathLabelPathClick(TCustomPathLabel *Sender,
  465. UnicodeString Path);
  466. void __fastcall RemotePathLabelPathClick(TCustomPathLabel *Sender,
  467. UnicodeString Path);
  468. void __fastcall LocalDirViewFileIconForName(TObject *Sender,
  469. TListItem *Item, UnicodeString &FileName);
  470. void __fastcall LocalDirViewUpdateStatusBar(TObject *Sender,
  471. const TStatusFileInfo &FileInfo);
  472. void __fastcall RemoteDirViewUpdateStatusBar(TObject *Sender,
  473. const TStatusFileInfo &FileInfo);
  474. void __fastcall LocalStatusBarClick(TObject *Sender);
  475. void __fastcall RemoteDirViewPathChange(TCustomDirView *Sender);
  476. void __fastcall LocalDirViewPathChange(TCustomDirView *Sender);
  477. void __fastcall LocalPathComboBoxCancel(TObject *Sender);
  478. void __fastcall LocalPathComboBoxAdjustImageIndex(
  479. TTBXComboBoxItem * Sender, const UnicodeString AText, int AIndex, int & ImageIndex);
  480. void __fastcall LocalPathComboBoxItemClick(TObject * Sender);
  481. void __fastcall CommandLineComboPopup(TTBCustomItem *Sender,
  482. bool FromLink);
  483. void __fastcall CommandLineComboBeginEdit(TTBEditItem *Sender,
  484. TTBEditItemViewer *Viewer, TEdit *EditControl);
  485. void __fastcall LocalDriveViewRefreshDrives(TObject *Sender);
  486. void __fastcall QueueSubmenuItemPopup(TTBCustomItem *Sender,
  487. bool FromLink);
  488. void __fastcall DirViewHistoryGo(TCustomDirView *Sender, int Index,
  489. bool &Cancel);
  490. void __fastcall LocalDirViewContextPopup(TObject *Sender, TPoint &MousePos, bool &Handled);
  491. void __fastcall LocalStatusBarPanelClick(TTBXCustomStatusBar *Sender, TTBXStatusPanel *Panel);
  492. void __fastcall RemoteStatusBarPanelClick(TTBXCustomStatusBar *Sender, TTBXStatusPanel *Panel);
  493. void __fastcall RemotePathLabelMaskClick(TObject *Sender);
  494. void __fastcall LocalPathLabelMaskClick(TObject *Sender);
  495. void __fastcall LocalOpenDirButtonPopup(TTBCustomItem *Sender, bool FromLink);
  496. void __fastcall RemoteOpenDirButtonPopup(TTBCustomItem *Sender, bool FromLink);
  497. void __fastcall OtherLocalDirViewEnter(TObject *Sender);
  498. void __fastcall OtherLocalDriveViewEnter(TObject *Sender);
  499. void __fastcall OtherLocalDirViewContextPopup(TObject *Sender, TPoint &MousePos, bool &Handled);
  500. void __fastcall OtherLocalDirViewUpdateStatusBar(TObject *Sender, const TStatusFileInfo &FileInfo);
  501. private:
  502. bool FConstructed;
  503. double FLastLeftPanelWidth;
  504. double FLeftPanelWidth;
  505. int FNormalPanelsWidth;
  506. int FLastWidth;
  507. bool FSynchronisingBrowse;
  508. TStrings * FInternalDDDownloadList;
  509. UnicodeString FPrevPath[2];
  510. bool FFirstTerminal;
  511. UnicodeString FDDFakeFileTarget;
  512. bool FCommandLineComboPopulated;
  513. TStrings* FLocalPathComboBoxPaths;
  514. int FLocalSpecialPaths;
  515. unsigned int FSpecialFolders;
  516. TEdit * FCommandLineComboEdit;
  517. TWndMethod FToolbarEditOldWndProc;
  518. bool FPanelsRestored;
  519. bool FExplorerKeyboardShortcuts;
  520. bool FForceSystemContextMenu;
  521. void __fastcall SetLeftPanelWidth(double value);
  522. double __fastcall GetLeftPanelWidth();
  523. inline TPanel * __fastcall Panel(bool Left);
  524. TPanel * __fastcall CurrentPanel();
  525. void __fastcall CommandLineComboEditWndProc(TMessage & Message);
  526. void __fastcall ExitToolbar();
  527. void __fastcall UpdateToolbar2ItemCaption(TTBCustomItem * Item);
  528. void __fastcall SetShortcuts();
  529. void __fastcall UpdatePanelsPathLabelsStatus();
  530. void __fastcall DoLocalDefaultDirectory(TDirView * DirView, const UnicodeString & LastPath);
  531. void __fastcall LocalDefaultDirectory();
  532. TOperationSide __fastcall GetOtherSize(TOperationSide Side);
  533. void __fastcall DoLocalDirViewContextPopup(TOperationSide Side, TPoint & MousePos, bool & Handled);
  534. protected:
  535. virtual bool __fastcall CopyParamDialog(TTransferDirection Direction,
  536. TTransferType Type, bool Temp, TStrings * FileList,
  537. UnicodeString & TargetDirectory, TGUICopyParamType & CopyParam, bool Confirm,
  538. bool DragDrop, int Options);
  539. virtual TCustomDirView * __fastcall DirView(TOperationSide Side);
  540. virtual TCustomDriveView * __fastcall DriveView(TOperationSide Side);
  541. virtual bool __fastcall DirViewEnabled(TOperationSide Side);
  542. TControl * __fastcall GetComponent(Byte Component);
  543. virtual void __fastcall RestoreFormParams();
  544. void __fastcall RestorePanelParams(
  545. TCustomDirView * DirView, TControl * DriveControl, TTBXStatusBar * StatusBar,
  546. const TScpCommanderPanelConfiguration & PanelConfiguration);
  547. void __fastcall StorePanelParams(
  548. TCustomDirView * DirView, TControl * DriveControl, TTBXStatusBar * StatusBar,
  549. TScpCommanderPanelConfiguration & PanelConfiguration);
  550. virtual void __fastcall RestoreParams();
  551. virtual void __fastcall FixControlsPlacement();
  552. virtual void __fastcall TerminalChanged(bool Replaced);
  553. virtual void __fastcall ConfigurationChanged();
  554. virtual bool __fastcall GetHasDirView(TOperationSide Side);
  555. virtual TCustomDirView * GetCurrentLocalBrowser();
  556. virtual void __fastcall UpdateControls();
  557. virtual void __fastcall FileOperationProgress(
  558. TFileOperationProgressType & ProgressData);
  559. virtual void __fastcall DoOpenDirectoryDialog(TOpenDirectoryMode Mode,
  560. TOperationSide Side);
  561. bool __fastcall InternalDDDownload(UnicodeString & TargetDirectory);
  562. virtual bool __fastcall DDGetTarget(
  563. UnicodeString & Directory, bool & ForceQueue, UnicodeString & CounterName);
  564. virtual void __fastcall DDFakeFileInitDrag(TFileList * FileList, bool & Created);
  565. virtual void __fastcall SideEnter(TOperationSide Side);
  566. void __fastcall SaveCommandLine();
  567. bool __fastcall ExecuteCommandLine();
  568. virtual void __fastcall PanelExportStore(TOperationSide Side,
  569. TPanelExport Export, TPanelExportDestination Destination,
  570. TStrings * ExportData);
  571. void __fastcall CommandLinePopulate();
  572. virtual int __fastcall GetStaticComponentsHeight();
  573. DYNAMIC void __fastcall Resize();
  574. DYNAMIC void __fastcall DoShow();
  575. virtual void __fastcall SysResizing(unsigned int Cmd);
  576. virtual void __fastcall BatchStart(void *& Storage);
  577. virtual void __fastcall BatchEnd(void * Storage);
  578. virtual bool __fastcall IsFileControl(TObject * Control, TOperationSide Side);
  579. virtual void __fastcall ReloadLocalDirectory(const UnicodeString Directory = L"");
  580. virtual bool __fastcall PanelOperation(TOperationSide Side, bool DragDrop);
  581. virtual void __fastcall DoDirViewLoaded(TCustomDirView * Sender);
  582. virtual void __fastcall GetTransferPresetAutoSelectData(TCopyParamRuleData & Data);
  583. virtual void __fastcall UpdateSessionData(TSessionData * Data);
  584. void __fastcall SynchronizeBrowsing(TCustomDirView * ADirView);
  585. void __fastcall SynchronizeBrowsing(TCustomDirView * ADirView, UnicodeString PrevPath,
  586. UnicodeString & NewPath, bool Create);
  587. void __fastcall SynchronizeBrowsingLocal(UnicodeString PrevPath, UnicodeString & NewPath, bool Create);
  588. void __fastcall SynchronizeBrowsingRemote(UnicodeString PrevPath, UnicodeString & NewPath, bool Create);
  589. void __fastcall CreateLocalDirectory(const UnicodeString & Path);
  590. void __fastcall CreateRemoteDirectory(const UnicodeString & Path);
  591. void __fastcall LocalPathComboUpdateDrives();
  592. void __fastcall LocalPathComboUpdate();
  593. virtual void __fastcall ToolbarItemResize(TTBXCustomDropDownItem * Item, int Width);
  594. void __fastcall DoOpenBookmark(UnicodeString Local, UnicodeString Remote);
  595. virtual bool __fastcall OpenBookmark(TOperationSide Side, TBookmark * Bookmark);
  596. virtual void __fastcall DoFocusRemotePath(TTerminal * Terminal, const UnicodeString & Path);
  597. UnicodeString __fastcall ChangeFilePath(UnicodeString Path, TOperationSide Side);
  598. virtual bool __fastcall EligibleForImageDisplayMode(TTBCustomItem * Item);
  599. virtual bool __fastcall UpdateToolbarDisplayMode();
  600. virtual void __fastcall QueueLabelUpdateStatus();
  601. virtual UnicodeString __fastcall DefaultDownloadTargetDirectory();
  602. virtual void __fastcall StartingDisconnected();
  603. virtual void __fastcall UpdateImages();
  604. virtual void __fastcall FileColorsChanged();
  605. virtual void __fastcall ThemeChanged();
  606. virtual bool IsLocalBrowserMode();
  607. void __fastcall DoPathLabelPathClick(TOperationSide Side, const UnicodeString & Path);
  608. public:
  609. __fastcall TScpCommanderForm(TComponent* Owner);
  610. virtual __fastcall ~TScpCommanderForm();
  611. virtual void __fastcall AddEditLink(TOperationSide Side, bool Add);
  612. virtual bool __fastcall AllowedAction(TAction * Action, TActionAllowed Allowed);
  613. virtual void __fastcall ChangePath(TOperationSide Side);
  614. virtual void __fastcall CompareDirectories();
  615. virtual void __fastcall UpdateTerminal(TManagedTerminal * Terminal);
  616. virtual void __fastcall SynchronizeDirectories();
  617. virtual void __fastcall FullSynchronizeDirectories();
  618. virtual void __fastcall StoreParams();
  619. virtual void __fastcall ExploreLocalDirectory();
  620. virtual void __fastcall GoToCommandLine();
  621. virtual void __fastcall GoToTree();
  622. virtual void __fastcall OpenConsole(UnicodeString Command = L"");
  623. virtual UnicodeString __fastcall PathForCaption();
  624. virtual void __fastcall HomeDirectory(TOperationSide Side);
  625. virtual void __fastcall HistoryGo(TOperationSide Side, int Index);
  626. virtual void __fastcall DisplaySystemContextMenu();
  627. virtual void __fastcall GoToAddress();
  628. virtual void __fastcall CopyFilesToClipboard(TOperationSide Side, bool OnFocused);
  629. virtual void __fastcall PasteFromClipBoard();
  630. virtual void __fastcall BrowseFile();
  631. virtual bool IsSideLocalBrowser(TOperationSide Side);
  632. __property double LeftPanelWidth = { read = GetLeftPanelWidth, write = SetLeftPanelWidth };
  633. };
  634. //---------------------------------------------------------------------------
  635. #endif