CustomScpExplorer.dfm 9.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326
  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. OnBusy = DirViewBusy
  138. end
  139. end
  140. object QueuePanel: TPanel
  141. Left = 0
  142. Top = 292
  143. Width = 620
  144. Height = 140
  145. Align = alBottom
  146. BevelOuter = bvNone
  147. TabOrder = 1
  148. object QueueLabel: TPathLabel
  149. Left = 0
  150. Top = 0
  151. Width = 620
  152. Height = 19
  153. IndentVertical = 3
  154. AutoSizeVertical = True
  155. AutoSize = False
  156. Transparent = False
  157. end
  158. object QueueView3: TListView
  159. Left = 0
  160. Top = 45
  161. Width = 620
  162. Height = 95
  163. Align = alClient
  164. Columns = <
  165. item
  166. Caption = 'Operation'
  167. Width = 70
  168. end
  169. item
  170. Caption = 'Source'
  171. Width = 170
  172. end
  173. item
  174. Caption = 'Destination'
  175. Width = 170
  176. end
  177. item
  178. Alignment = taRightJustify
  179. Caption = 'Transferred'
  180. Width = 80
  181. end
  182. item
  183. Alignment = taRightJustify
  184. Caption = 'Time'
  185. Width = 80
  186. end
  187. item
  188. Alignment = taRightJustify
  189. Caption = 'Speed'
  190. Width = 80
  191. end
  192. item
  193. Alignment = taCenter
  194. Caption = 'Progress'
  195. Width = 80
  196. end>
  197. ColumnClick = False
  198. DoubleBuffered = True
  199. DragMode = dmAutomatic
  200. ReadOnly = True
  201. RowSelect = True
  202. ParentDoubleBuffered = False
  203. PopupMenu = NonVisualDataModule.QueuePopup
  204. SmallImages = GlyphsModule.QueueImages
  205. StateImages = GlyphsModule.QueueImages
  206. TabOrder = 0
  207. ViewStyle = vsReport
  208. OnContextPopup = QueueView3ContextPopup
  209. OnDeletion = QueueView3Deletion
  210. OnEnter = QueueView3Enter
  211. OnExit = QueueView3Exit
  212. OnDragDrop = QueueView3DragDrop
  213. OnDragOver = QueueView3DragOver
  214. OnSelectItem = QueueView3SelectItem
  215. OnStartDrag = QueueView3StartDrag
  216. end
  217. object QueueDock: TTBXDock
  218. Tag = 1
  219. Left = 0
  220. Top = 19
  221. Width = 620
  222. Height = 26
  223. AllowDrag = False
  224. object QueueToolbar: TTBXToolbar
  225. Left = 0
  226. Top = 0
  227. Caption = 'QueueToolbar'
  228. Images = GlyphsModule.ExplorerImages
  229. Options = [tboShowHint]
  230. ParentShowHint = False
  231. ShowHint = True
  232. TabOrder = 0
  233. object QueueEnableItem: TTBXItem
  234. Action = NonVisualDataModule.QueueEnableAction
  235. end
  236. object TBXSeparatorItem203: TTBXSeparatorItem
  237. end
  238. object TBXItem201: TTBXItem
  239. Action = NonVisualDataModule.QueueItemQueryAction
  240. end
  241. object TBXItem202: TTBXItem
  242. Action = NonVisualDataModule.QueueItemErrorAction
  243. end
  244. object TBXItem203: TTBXItem
  245. Action = NonVisualDataModule.QueueItemPromptAction
  246. end
  247. object TBXItem204: TTBXItem
  248. Action = NonVisualDataModule.QueueItemExecuteAction
  249. end
  250. object TBXItem195: TTBXItem
  251. Action = NonVisualDataModule.QueueItemPauseAction
  252. end
  253. object TBXItem194: TTBXItem
  254. Action = NonVisualDataModule.QueueItemResumeAction
  255. end
  256. object TBXItem205: TTBXItem
  257. Action = NonVisualDataModule.QueueItemDeleteAction
  258. end
  259. object TBXSeparatorItem201: TTBXSeparatorItem
  260. end
  261. object TBXItem206: TTBXItem
  262. Action = NonVisualDataModule.QueueItemUpAction
  263. end
  264. object TBXItem207: TTBXItem
  265. Action = NonVisualDataModule.QueueItemDownAction
  266. end
  267. object TBXSeparatorItem57: TTBXSeparatorItem
  268. end
  269. object QueueDeleteAllDoneQueueToolbarItem: TTBXItem
  270. Action = NonVisualDataModule.QueueDeleteAllDoneAction
  271. end
  272. object TBXSeparatorItem202: TTBXSeparatorItem
  273. end
  274. object TBXSubmenuItem27: TTBXSubmenuItem
  275. Action = NonVisualDataModule.QueueCycleOnceEmptyAction
  276. DropdownCombo = True
  277. object TBXItem211: TTBXItem
  278. Action = NonVisualDataModule.QueueIdleOnceEmptyAction
  279. RadioItem = True
  280. end
  281. object TBXItem225: TTBXItem
  282. Action = NonVisualDataModule.QueueDisconnectOnceEmptyAction2
  283. RadioItem = True
  284. end
  285. object TBXItem173: TTBXItem
  286. Action = NonVisualDataModule.QueueSuspendOnceEmptyAction2
  287. RadioItem = True
  288. end
  289. object TBXItem226: TTBXItem
  290. Action = NonVisualDataModule.QueueShutDownOnceEmptyAction2
  291. RadioItem = True
  292. end
  293. end
  294. object TBXItem208: TTBXItem
  295. Action = NonVisualDataModule.QueuePreferencesAction
  296. end
  297. end
  298. end
  299. end
  300. object SessionsPageControl: TThemePageControl
  301. Left = 0
  302. Top = 9
  303. Width = 620
  304. Height = 21
  305. ActivePage = TabSheet1
  306. Align = alTop
  307. DoubleBuffered = True
  308. ParentDoubleBuffered = False
  309. TabOrder = 3
  310. TabStop = False
  311. OnChange = SessionsPageControlChange
  312. OnContextPopup = SessionsPageControlContextPopup
  313. OnDragDrop = SessionsPageControlDragDrop
  314. OnDragOver = SessionsPageControlDragOver
  315. OnMouseDown = SessionsPageControlMouseDown
  316. object TabSheet1: TTabSheet
  317. Caption = 'TabSheet1'
  318. end
  319. end
  320. object ApplicationEvents: TApplicationEvents
  321. OnMinimize = ApplicationMinimize
  322. OnRestore = ApplicationRestore
  323. Left = 88
  324. Top = 200
  325. end
  326. end