CustomScpExplorer.dfm 9.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332
  1. object CustomScpExplorerForm: TCustomScpExplorerForm
  2. Left = 251
  3. Top = 166
  4. Caption = 'CustomScpExplorerForm'
  5. ClientHeight = 432
  6. ClientWidth = 620
  7. Color = clBtnFace
  8. ParentFont = True
  9. KeyPreview = True
  10. OldCreateOrder = False
  11. OnClose = FormClose
  12. OnCloseQuery = FormCloseQuery
  13. OnConstrainedResize = FormConstrainedResize
  14. OnShow = FormShow
  15. PixelsPerInch = 96
  16. TextHeight = 13
  17. object QueueSplitter: TSplitter
  18. Left = 0
  19. Top = 289
  20. Width = 620
  21. Height = 3
  22. Cursor = crSizeNS
  23. Hint = 'Drag to resize queue list. Double click to hide queue list.'
  24. Align = alBottom
  25. AutoSnap = False
  26. MinSize = 70
  27. ResizeStyle = rsUpdate
  28. OnCanResize = QueueSplitterCanResize
  29. end
  30. object TopDock: TTBXDock
  31. Left = 0
  32. Top = 0
  33. Width = 620
  34. Height = 9
  35. FixAlign = True
  36. end
  37. object RemotePanel: TPanel
  38. Left = 0
  39. Top = 30
  40. Width = 620
  41. Height = 259
  42. Align = alClient
  43. BevelOuter = bvNone
  44. Color = clWindow
  45. ParentBackground = False
  46. TabOrder = 0
  47. object RemotePanelSplitter: TSplitter
  48. Left = 169
  49. Top = 0
  50. Height = 240
  51. Cursor = crSizeWE
  52. AutoSnap = False
  53. MinSize = 70
  54. ResizeStyle = rsUpdate
  55. end
  56. object RemoteStatusBar: TTBXStatusBar
  57. Left = 0
  58. Top = 240
  59. Width = 620
  60. Height = 19
  61. Panels = <>
  62. ParentShowHint = False
  63. ShowHint = True
  64. UseSystemFont = False
  65. OnClick = RemoteStatusBarClick
  66. OnMouseDown = RemoteStatusBarMouseDown
  67. end
  68. object RemoteDirView: TUnixDirView
  69. Left = 172
  70. Top = 0
  71. Width = 448
  72. Height = 240
  73. Align = alClient
  74. DoubleBuffered = True
  75. FullDrag = True
  76. HideSelection = False
  77. ParentDoubleBuffered = False
  78. PopupMenu = NonVisualDataModule.RemoteDirViewPopup
  79. TabOrder = 1
  80. ViewStyle = vsReport
  81. OnColumnRightClick = DirViewColumnRightClick
  82. OnEditing = DirViewEditing
  83. OnEnter = RemoteDirViewEnter
  84. OnExit = DirViewExit
  85. OnKeyDown = DirViewKeyDown
  86. OnKeyPress = DirViewKeyPress
  87. NortonLike = nlOff
  88. UnixColProperties.ExtWidth = 20
  89. UnixColProperties.TypeVisible = False
  90. OnDDDragFileName = RemoteFileControlDDDragFileName
  91. OnBusy = DirViewBusy
  92. OnChangeFocus = DirViewChangeFocus
  93. OnSelectItem = DirViewSelectItem
  94. OnLoaded = DirViewLoaded
  95. OnExecFile = DirViewExecFile
  96. OnMatchMask = DirViewMatchMask
  97. OnGetOverlay = DirViewGetOverlay
  98. OnDDDragEnter = FileControlDDDragEnter
  99. OnDDDragLeave = FileControlDDDragLeave
  100. OnDDQueryContinueDrag = RemoteFileControlDDQueryContinueDrag
  101. OnDDGiveFeedback = RemoteFileControlDDGiveFeedback
  102. OnDDChooseEffect = RemoteFileContolDDChooseEffect
  103. OnDDDragDetect = RemoteFileControlDDDragDetect
  104. OnDDEnd = RemoteFileControlDDEnd
  105. OnDDCreateDragFileList = RemoteFileControlDDCreateDragFileList
  106. OnDDFileOperation = RemoteFileControlDDFileOperation
  107. OnDDCreateDataObject = RemoteFileControlDDCreateDataObject
  108. OnContextPopup = RemoteDirViewContextPopup
  109. OnHistoryChange = DirViewHistoryChange
  110. OnDisplayProperties = RemoteDirViewDisplayProperties
  111. OnRead = RemoteDirViewRead
  112. end
  113. object RemoteDriveView: TUnixDriveView
  114. Left = 0
  115. Top = 0
  116. Width = 169
  117. Height = 240
  118. DirView = RemoteDirView
  119. OnDDDragFileName = RemoteFileControlDDDragFileName
  120. OnDDEnd = RemoteFileControlDDEnd
  121. UseSystemContextMenu = False
  122. OnDDDragEnter = FileControlDDDragEnter
  123. OnDDDragLeave = FileControlDDDragLeave
  124. OnDDQueryContinueDrag = RemoteFileControlDDQueryContinueDrag
  125. OnDDChooseEffect = RemoteFileContolDDChooseEffect
  126. OnDDGiveFeedback = RemoteFileControlDDGiveFeedback
  127. OnDDDragDetect = RemoteFileControlDDDragDetect
  128. OnDDFileOperation = RemoteFileControlDDFileOperation
  129. OnDDCreateDragFileList = RemoteFileControlDDCreateDragFileList
  130. OnDDCreateDataObject = RemoteFileControlDDCreateDataObject
  131. Align = alLeft
  132. DoubleBuffered = True
  133. HideSelection = False
  134. Indent = 19
  135. ParentColor = False
  136. ParentDoubleBuffered = False
  137. ReadOnly = True
  138. TabOrder = 2
  139. OnEnter = RemoteDriveViewEnter
  140. OnBusy = DirViewBusy
  141. end
  142. end
  143. object QueuePanel: TPanel
  144. Left = 0
  145. Top = 292
  146. Width = 620
  147. Height = 140
  148. Align = alBottom
  149. BevelOuter = bvNone
  150. TabOrder = 1
  151. object QueueLabel: TPathLabel
  152. Left = 0
  153. Top = 0
  154. Width = 620
  155. Height = 19
  156. IndentVertical = 3
  157. AutoSizeVertical = True
  158. AutoSize = False
  159. Transparent = False
  160. end
  161. object QueueView3: TListView
  162. Left = 0
  163. Top = 45
  164. Width = 620
  165. Height = 95
  166. Align = alClient
  167. Columns = <
  168. item
  169. Caption = 'Operation'
  170. Width = 70
  171. end
  172. item
  173. Caption = 'Source'
  174. Width = 170
  175. end
  176. item
  177. Caption = 'Destination'
  178. Width = 170
  179. end
  180. item
  181. Alignment = taRightJustify
  182. Caption = 'Transferred'
  183. Width = 80
  184. end
  185. item
  186. Alignment = taRightJustify
  187. Caption = 'Time'
  188. Width = 80
  189. end
  190. item
  191. Alignment = taRightJustify
  192. Caption = 'Speed'
  193. Width = 80
  194. end
  195. item
  196. Alignment = taCenter
  197. Caption = 'Progress'
  198. Width = 80
  199. end>
  200. ColumnClick = False
  201. DoubleBuffered = True
  202. DragMode = dmAutomatic
  203. ReadOnly = True
  204. RowSelect = True
  205. ParentDoubleBuffered = False
  206. PopupMenu = NonVisualDataModule.QueuePopup
  207. SmallImages = GlyphsModule.QueueImages
  208. StateImages = GlyphsModule.QueueImages
  209. TabOrder = 0
  210. ViewStyle = vsReport
  211. OnContextPopup = QueueView3ContextPopup
  212. OnDeletion = QueueView3Deletion
  213. OnEnter = QueueView3Enter
  214. OnExit = QueueView3Exit
  215. OnDragDrop = QueueView3DragDrop
  216. OnDragOver = QueueView3DragOver
  217. OnSelectItem = QueueView3SelectItem
  218. OnStartDrag = QueueView3StartDrag
  219. end
  220. object QueueDock: TTBXDock
  221. Tag = 1
  222. Left = 0
  223. Top = 19
  224. Width = 620
  225. Height = 26
  226. AllowDrag = False
  227. object QueueToolbar: TTBXToolbar
  228. Left = 0
  229. Top = 0
  230. Caption = 'QueueToolbar'
  231. Images = GlyphsModule.ExplorerImages
  232. Options = [tboShowHint]
  233. ParentShowHint = False
  234. ShowHint = True
  235. TabOrder = 0
  236. object QueueEnableItem: TTBXItem
  237. Action = NonVisualDataModule.QueueEnableAction
  238. end
  239. object TBXSeparatorItem203: TTBXSeparatorItem
  240. end
  241. object TBXItem201: TTBXItem
  242. Action = NonVisualDataModule.QueueItemQueryAction
  243. end
  244. object TBXItem202: TTBXItem
  245. Action = NonVisualDataModule.QueueItemErrorAction
  246. end
  247. object TBXItem203: TTBXItem
  248. Action = NonVisualDataModule.QueueItemPromptAction
  249. end
  250. object TBXItem204: TTBXItem
  251. Action = NonVisualDataModule.QueueItemExecuteAction
  252. end
  253. object TBXItem195: TTBXItem
  254. Action = NonVisualDataModule.QueueItemPauseAction
  255. end
  256. object TBXItem194: TTBXItem
  257. Action = NonVisualDataModule.QueueItemResumeAction
  258. end
  259. object TBXItem205: TTBXItem
  260. Action = NonVisualDataModule.QueueItemDeleteAction
  261. end
  262. object TBXSeparatorItem201: TTBXSeparatorItem
  263. end
  264. object TBXItem206: TTBXItem
  265. Action = NonVisualDataModule.QueueItemUpAction
  266. end
  267. object TBXItem207: TTBXItem
  268. Action = NonVisualDataModule.QueueItemDownAction
  269. end
  270. object TBXSeparatorItem57: TTBXSeparatorItem
  271. end
  272. object QueueDeleteAllDoneQueueToolbarItem: TTBXItem
  273. Action = NonVisualDataModule.QueueDeleteAllDoneAction
  274. end
  275. object TBXSeparatorItem202: TTBXSeparatorItem
  276. end
  277. object TBXSubmenuItem27: TTBXSubmenuItem
  278. Action = NonVisualDataModule.QueueCycleOnceEmptyAction
  279. DropdownCombo = True
  280. object TBXItem211: TTBXItem
  281. Action = NonVisualDataModule.QueueIdleOnceEmptyAction
  282. RadioItem = True
  283. end
  284. object TBXItem225: TTBXItem
  285. Action = NonVisualDataModule.QueueDisconnectOnceEmptyAction2
  286. RadioItem = True
  287. end
  288. object TBXItem173: TTBXItem
  289. Action = NonVisualDataModule.QueueSuspendOnceEmptyAction2
  290. RadioItem = True
  291. end
  292. object TBXItem226: TTBXItem
  293. Action = NonVisualDataModule.QueueShutDownOnceEmptyAction2
  294. RadioItem = True
  295. end
  296. end
  297. object TBXItem208: TTBXItem
  298. Action = NonVisualDataModule.QueuePreferencesAction
  299. end
  300. end
  301. end
  302. end
  303. object SessionsPageControl: TThemePageControl
  304. Left = 0
  305. Top = 9
  306. Width = 620
  307. Height = 21
  308. ActivePage = TabSheet1
  309. Align = alTop
  310. DoubleBuffered = True
  311. ParentDoubleBuffered = False
  312. TabOrder = 3
  313. TabStop = False
  314. OnChange = SessionsPageControlChange
  315. OnContextPopup = SessionsPageControlContextPopup
  316. OnDragDrop = SessionsPageControlDragDrop
  317. OnDragOver = SessionsPageControlDragOver
  318. OnMouseDown = SessionsPageControlMouseDown
  319. OnCloseButtonClick = SessionsPageControlCloseButtonClick
  320. object TabSheet1: TTabSheet
  321. Caption = 'TabSheet1'
  322. end
  323. end
  324. object ApplicationEvents: TApplicationEvents
  325. OnDeactivate = ApplicationEventsDeactivate
  326. OnMinimize = ApplicationMinimize
  327. OnModalBegin = ApplicationEventsModalBegin
  328. OnRestore = ApplicationRestore
  329. Left = 88
  330. Top = 200
  331. end
  332. end