Synchronize.dfm 6.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286
  1. object SynchronizeDialog: TSynchronizeDialog
  2. Left = 367
  3. Top = 198
  4. HelpType = htKeyword
  5. HelpKeyword = 'ui_keepuptodate'
  6. BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
  7. BorderStyle = bsDialog
  8. Caption = 'Keep remote directory up to date X'
  9. ClientHeight = 421
  10. ClientWidth = 396
  11. Color = clBtnFace
  12. Font.Charset = DEFAULT_CHARSET
  13. Font.Color = clWindowText
  14. Font.Height = -11
  15. Font.Name = 'MS Sans Serif'
  16. Font.Style = []
  17. KeyPreview = True
  18. OldCreateOrder = False
  19. Position = poMainFormCenter
  20. OnCloseQuery = FormCloseQuery
  21. OnKeyDown = FormKeyDown
  22. OnShow = FormShow
  23. DesignSize = (
  24. 396
  25. 421)
  26. PixelsPerInch = 96
  27. TextHeight = 13
  28. object DirectoriesGroup: TGroupBox
  29. Left = 8
  30. Top = 6
  31. Width = 381
  32. Height = 119
  33. Anchors = [akLeft, akTop, akRight]
  34. Caption = 'Directories'
  35. TabOrder = 0
  36. DesignSize = (
  37. 381
  38. 119)
  39. object LocalDirectoryLabel: TLabel
  40. Left = 11
  41. Top = 19
  42. Width = 200
  43. Height = 13
  44. Anchors = [akLeft, akTop, akRight]
  45. Caption = '&Watch for changes in the local directory ...'
  46. FocusControl = LocalDirectoryEdit
  47. end
  48. object RemoteDirectoryLabel: TLabel
  49. Left = 11
  50. Top = 68
  51. Width = 263
  52. Height = 13
  53. Anchors = [akLeft, akTop, akRight]
  54. Caption = '... &and automatically reflect them on the remote directory'
  55. FocusControl = RemoteDirectoryEdit
  56. end
  57. object RemoteDirectoryEdit: THistoryComboBox
  58. Left = 11
  59. Top = 84
  60. Width = 359
  61. Height = 21
  62. AutoComplete = False
  63. Anchors = [akLeft, akTop, akRight]
  64. ItemHeight = 13
  65. MaxLength = 1000
  66. TabOrder = 2
  67. Text = 'RemoteDirectoryEdit'
  68. OnChange = ControlChange
  69. end
  70. object LocalDirectoryEdit: THistoryComboBox
  71. Left = 11
  72. Top = 35
  73. Width = 276
  74. Height = 21
  75. AutoComplete = False
  76. Anchors = [akLeft, akTop, akRight]
  77. ItemHeight = 13
  78. MaxLength = 1000
  79. TabOrder = 0
  80. Text = 'LocalDirectoryEdit'
  81. OnChange = ControlChange
  82. end
  83. object LocalDirectoryBrowseButton: TButton
  84. Left = 293
  85. Top = 33
  86. Width = 75
  87. Height = 25
  88. Anchors = [akTop, akRight]
  89. Caption = 'B&rowse...'
  90. TabOrder = 1
  91. OnClick = LocalDirectoryBrowseButtonClick
  92. end
  93. end
  94. object StopButton: TButton
  95. Left = 152
  96. Top = 288
  97. Width = 74
  98. Height = 25
  99. Caption = '&Stop'
  100. TabOrder = 4
  101. OnClick = StopButtonClick
  102. end
  103. object CancelButton: TButton
  104. Left = 232
  105. Top = 288
  106. Width = 74
  107. Height = 25
  108. Cancel = True
  109. Caption = 'Close'
  110. ModalResult = 2
  111. TabOrder = 6
  112. end
  113. object OptionsGroup: TGroupBox
  114. Left = 8
  115. Top = 130
  116. Width = 381
  117. Height = 95
  118. Anchors = [akLeft, akTop, akRight]
  119. Caption = 'Synchronize options'
  120. TabOrder = 1
  121. DesignSize = (
  122. 381
  123. 95)
  124. object SynchronizeDeleteCheck: TCheckBox
  125. Left = 11
  126. Top = 20
  127. Width = 182
  128. Height = 17
  129. Caption = '&Delete files'
  130. TabOrder = 0
  131. OnClick = ControlChange
  132. end
  133. object SaveSettingsCheck: TCheckBox
  134. Left = 11
  135. Top = 68
  136. Width = 182
  137. Height = 17
  138. Caption = 'Use same &options next time'
  139. TabOrder = 4
  140. OnClick = ControlChange
  141. end
  142. object SynchronizeExistingOnlyCheck: TCheckBox
  143. Left = 203
  144. Top = 20
  145. Width = 166
  146. Height = 17
  147. Anchors = [akLeft, akTop, akRight]
  148. Caption = '&Existing files only'
  149. TabOrder = 1
  150. OnClick = ControlChange
  151. end
  152. object SynchronizeRecursiveCheck: TCheckBox
  153. Left = 11
  154. Top = 44
  155. Width = 182
  156. Height = 17
  157. Caption = 'Update s&ubdirectories'
  158. TabOrder = 2
  159. OnClick = ControlChange
  160. end
  161. object SynchronizeSynchronizeCheck: TGrayedCheckBox
  162. Left = 203
  163. Top = 68
  164. Width = 166
  165. Height = 17
  166. AllowGrayed = True
  167. Anchors = [akLeft, akTop, akRight]
  168. Caption = 'Synchronize on s&tart'
  169. TabOrder = 5
  170. OnClick = ControlChange
  171. end
  172. object SynchronizeSelectedOnlyCheck: TCheckBox
  173. Left = 203
  174. Top = 44
  175. Width = 166
  176. Height = 17
  177. Caption = 'Selected files o&nly'
  178. TabOrder = 3
  179. OnClick = ControlChange
  180. end
  181. end
  182. object StartButton: TButton
  183. Left = 152
  184. Top = 288
  185. Width = 74
  186. Height = 25
  187. Anchors = [akTop, akRight]
  188. Caption = '&Start'
  189. Default = True
  190. TabOrder = 3
  191. OnClick = StartButtonClick
  192. end
  193. object MinimizeButton: TButton
  194. Left = 233
  195. Top = 288
  196. Width = 74
  197. Height = 25
  198. Anchors = [akTop, akRight]
  199. Caption = '&Minimize'
  200. TabOrder = 5
  201. OnClick = MinimizeButtonClick
  202. end
  203. object TransferSettingsButton: TButton
  204. Left = 8
  205. Top = 288
  206. Width = 137
  207. Height = 25
  208. Anchors = [akTop, akRight]
  209. Caption = 'Transfer settin&gs...'
  210. TabOrder = 2
  211. OnClick = TransferSettingsButtonClick
  212. end
  213. object CopyParamGroup: TGroupBox
  214. Left = 8
  215. Top = 230
  216. Width = 381
  217. Height = 50
  218. Caption = 'Transfer settings'
  219. TabOrder = 7
  220. OnContextPopup = CopyParamGroupContextPopup
  221. OnDblClick = CopyParamGroupDblClick
  222. DesignSize = (
  223. 381
  224. 50)
  225. object CopyParamLabel: TLabel
  226. Left = 7
  227. Top = 15
  228. Width = 367
  229. Height = 26
  230. Anchors = [akLeft, akTop, akRight, akBottom]
  231. AutoSize = False
  232. Caption = 'CopyParamLabel'
  233. WordWrap = True
  234. OnDblClick = CopyParamGroupDblClick
  235. end
  236. end
  237. object HelpButton: TButton
  238. Left = 313
  239. Top = 288
  240. Width = 75
  241. Height = 25
  242. Anchors = [akTop, akRight]
  243. Caption = '&Help'
  244. TabOrder = 8
  245. OnClick = HelpButtonClick
  246. end
  247. object LogPanel: TPanel
  248. Left = 0
  249. Top = 321
  250. Width = 396
  251. Height = 100
  252. Align = alBottom
  253. BevelOuter = bvNone
  254. TabOrder = 9
  255. DesignSize = (
  256. 396
  257. 100)
  258. object LogView: TListView
  259. Left = 8
  260. Top = 2
  261. Width = 380
  262. Height = 90
  263. Anchors = [akLeft, akTop, akRight, akBottom]
  264. Columns = <
  265. item
  266. Width = -1
  267. WidthType = (
  268. -1)
  269. end
  270. item
  271. Width = -1
  272. WidthType = (
  273. -1)
  274. end>
  275. Items.Data = {
  276. 3A0000000100000000000000FFFFFFFFFFFFFFFF01000000000000000B32303A
  277. 33303A343520504D0F4465746563746564206368616E6765FFFF}
  278. ReadOnly = True
  279. RowSelect = True
  280. ShowColumnHeaders = False
  281. TabOrder = 0
  282. ViewStyle = vsReport
  283. OnKeyDown = LogViewKeyDown
  284. end
  285. end
  286. end