CustomScpExplorer.dfm 9.6 KB

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