Properties.dfm 9.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373
  1. object PropertiesDialog: TPropertiesDialog
  2. Left = 416
  3. Top = 133
  4. HelpType = htKeyword
  5. HelpKeyword = 'ui_properties'
  6. BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
  7. BorderStyle = bsDialog
  8. Caption = 'Properties'
  9. ClientHeight = 416
  10. ClientWidth = 357
  11. Color = clBtnFace
  12. ParentFont = True
  13. OldCreateOrder = True
  14. Position = poOwnerFormCenter
  15. OnCloseQuery = FormCloseQuery
  16. OnShow = FormShow
  17. DesignSize = (
  18. 357
  19. 416)
  20. PixelsPerInch = 96
  21. TextHeight = 13
  22. object OkButton: TButton
  23. Left = 99
  24. Top = 386
  25. Width = 75
  26. Height = 25
  27. Anchors = [akRight, akBottom]
  28. Caption = 'OK'
  29. Default = True
  30. ModalResult = 1
  31. TabOrder = 1
  32. end
  33. object CancelButton: TButton
  34. Left = 187
  35. Top = 386
  36. Width = 75
  37. Height = 25
  38. Anchors = [akRight, akBottom]
  39. Cancel = True
  40. Caption = 'Cancel'
  41. ModalResult = 2
  42. TabOrder = 2
  43. end
  44. object PageControl: TPageControl
  45. Left = 5
  46. Top = 5
  47. Width = 346
  48. Height = 374
  49. ActivePage = CommonSheet
  50. Anchors = [akLeft, akTop, akRight, akBottom]
  51. TabOrder = 0
  52. OnChange = PageControlChange
  53. object CommonSheet: TTabSheet
  54. Caption = 'Common'
  55. DesignSize = (
  56. 338
  57. 346)
  58. object FilesIconImage: TImage
  59. Left = 11
  60. Top = 8
  61. Width = 32
  62. Height = 32
  63. Picture.Data = {
  64. 07544269746D617076020000424D760200000000000076000000280000002000
  65. 000020000000010004000000000000020000C40E0000C40E0000100000000000
  66. 00000402040084828400C4C2C400FC02FC00FCFEFC0000C681000012E7000000
  67. 770000175400004EC50000F61200007700000000000000000000001300000000
  68. 0000330000000000000000000000033333333312222222222222222222220333
  69. 3333331444444444444444444442000333333314444444444444444444420203
  70. 3333331444444444444444444442020003333314444444444444444444420202
  71. 0333331444444444444444444442020203333314444444444444444444420202
  72. 0333331444444444444444444442020203333314444444444444444444420202
  73. 0333331444444444444444444442020203333314444444444444444444420202
  74. 0333331444444444444444444442020203333314444444444444444444420202
  75. 0333331444444444444444444442020203333314444444444444444444420202
  76. 0333331444444444444444444442020203333314444444444444444444420202
  77. 0333331444444444444444444442020203333314444444444444444444420202
  78. 0333331444444444444444444442020203333314444444444444441000000202
  79. 0333331444444444444444144210420203333314444444444444441421000002
  80. 0333331444444444444444121042104203333314444444444444441104210000
  81. 0333331444444444444444101210421033333311111111111111111411042103
  82. 3333333314444444444444441012103333333333111111111111111114110333
  83. 3333333333144444444444444410333333333333331111111111111111133333
  84. 3333}
  85. Transparent = True
  86. end
  87. object Bevel1: TBevel
  88. Left = 8
  89. Top = 47
  90. Width = 320
  91. Height = 9
  92. Anchors = [akLeft, akTop, akRight]
  93. Shape = bsTopLine
  94. end
  95. object Label1: TLabel
  96. Left = 8
  97. Top = 58
  98. Width = 44
  99. Height = 13
  100. Caption = 'Location:'
  101. end
  102. object LocationLabel: TPathLabel
  103. Left = 85
  104. Top = 58
  105. Width = 243
  106. Height = 13
  107. UnixPath = True
  108. IndentHorizontal = 0
  109. IndentVertical = 0
  110. Align = alNone
  111. Anchors = [akLeft, akTop, akRight]
  112. AutoSize = False
  113. end
  114. object FileLabel: TLabel
  115. Left = 85
  116. Top = 18
  117. Width = 241
  118. Height = 13
  119. AutoSize = False
  120. Caption = 'FileLabel'
  121. end
  122. object Label2: TLabel
  123. Left = 8
  124. Top = 80
  125. Width = 23
  126. Height = 13
  127. Caption = 'Size:'
  128. end
  129. object SizeLabel: TLabel
  130. Left = 85
  131. Top = 80
  132. Width = 160
  133. Height = 13
  134. Anchors = [akLeft, akTop, akRight]
  135. AutoSize = False
  136. Caption = 'SizeLabel'
  137. end
  138. object LinksToLabelLabel: TLabel
  139. Left = 8
  140. Top = 102
  141. Width = 40
  142. Height = 13
  143. Caption = 'Links to:'
  144. end
  145. object LinksToLabel: TPathLabel
  146. Left = 85
  147. Top = 102
  148. Width = 240
  149. Height = 13
  150. UnixPath = True
  151. IndentHorizontal = 0
  152. IndentVertical = 0
  153. Align = alNone
  154. Anchors = [akLeft, akTop, akRight]
  155. AutoSize = False
  156. end
  157. object Bevel2: TBevel
  158. Left = 8
  159. Top = 125
  160. Width = 320
  161. Height = 9
  162. Anchors = [akLeft, akTop, akRight]
  163. Shape = bsTopLine
  164. end
  165. object Label3: TLabel
  166. Left = 8
  167. Top = 203
  168. Width = 59
  169. Height = 13
  170. Caption = 'Permissions:'
  171. FocusControl = RightsFrame
  172. end
  173. object Bevel3: TBevel
  174. Left = 8
  175. Top = 193
  176. Width = 320
  177. Height = 9
  178. Anchors = [akLeft, akTop, akRight]
  179. Shape = bsTopLine
  180. end
  181. object Label4: TLabel
  182. Left = 8
  183. Top = 138
  184. Width = 33
  185. Height = 13
  186. Caption = 'Group:'
  187. FocusControl = GroupComboBox
  188. end
  189. object Label5: TLabel
  190. Left = 8
  191. Top = 166
  192. Width = 36
  193. Height = 13
  194. Caption = 'Owner:'
  195. FocusControl = OwnerComboBox
  196. end
  197. object FileIconImage: TImage
  198. Left = 11
  199. Top = 8
  200. Width = 32
  201. Height = 32
  202. end
  203. object RecursiveBevel: TBevel
  204. Left = 8
  205. Top = 312
  206. Width = 320
  207. Height = 9
  208. Anchors = [akLeft, akTop, akRight]
  209. Shape = bsTopLine
  210. end
  211. inline RightsFrame: TRightsExtFrame
  212. Left = 84
  213. Top = 200
  214. Width = 244
  215. Height = 109
  216. TabOrder = 3
  217. end
  218. object GroupComboBox: TComboBox
  219. Left = 85
  220. Top = 135
  221. Width = 161
  222. Height = 21
  223. DropDownCount = 16
  224. MaxLength = 50
  225. TabOrder = 1
  226. Text = 'GroupComboBox'
  227. OnChange = ControlChange
  228. OnExit = GroupComboBoxExit
  229. end
  230. object OwnerComboBox: TComboBox
  231. Left = 85
  232. Top = 163
  233. Width = 161
  234. Height = 21
  235. DropDownCount = 16
  236. MaxLength = 50
  237. TabOrder = 2
  238. Text = 'OwnerComboBox'
  239. OnChange = ControlChange
  240. OnExit = OwnerComboBoxExit
  241. end
  242. object RecursiveCheck: TCheckBox
  243. Left = 12
  244. Top = 322
  245. Width = 317
  246. Height = 17
  247. Anchors = [akLeft, akTop, akRight]
  248. Caption = 'Set group, owner and permissions &recursively'
  249. TabOrder = 4
  250. OnClick = ControlChange
  251. end
  252. object CalculateSizeButton: TButton
  253. Left = 248
  254. Top = 72
  255. Width = 80
  256. Height = 25
  257. Anchors = [akTop, akRight]
  258. Caption = 'C&alculate'
  259. TabOrder = 0
  260. OnClick = CalculateSizeButtonClick
  261. end
  262. end
  263. object ChecksumSheet: TTabSheet
  264. Caption = 'Checksum'
  265. ImageIndex = 1
  266. DesignSize = (
  267. 338
  268. 346)
  269. object Label6: TLabel
  270. Left = 13
  271. Top = 13
  272. Width = 49
  273. Height = 13
  274. Caption = '&Algorithm:'
  275. FocusControl = ChecksumAlgEdit
  276. end
  277. object ChecksumView: TListView
  278. Left = 6
  279. Top = 40
  280. Width = 326
  281. Height = 297
  282. Anchors = [akLeft, akTop, akRight, akBottom]
  283. Columns = <
  284. item
  285. Caption = 'File'
  286. Width = 100
  287. end
  288. item
  289. Caption = 'Checksum'
  290. Width = 100
  291. end>
  292. ColumnClick = False
  293. DoubleBuffered = True
  294. MultiSelect = True
  295. ReadOnly = True
  296. RowSelect = True
  297. ParentDoubleBuffered = False
  298. PopupMenu = ListViewMenu
  299. TabOrder = 2
  300. ViewStyle = vsReport
  301. OnContextPopup = ChecksumViewContextPopup
  302. end
  303. object ChecksumAlgEdit: TComboBox
  304. Left = 80
  305. Top = 9
  306. Width = 121
  307. Height = 21
  308. AutoComplete = False
  309. Anchors = [akLeft, akTop, akRight]
  310. MaxLength = 250
  311. TabOrder = 0
  312. OnChange = ChecksumAlgEditChange
  313. OnEnter = ControlChange
  314. OnExit = ControlChange
  315. Items.Strings = (
  316. 'Xmd5')
  317. end
  318. object ChecksumButton: TButton
  319. Left = 208
  320. Top = 7
  321. Width = 122
  322. Height = 25
  323. Anchors = [akTop, akRight]
  324. Caption = '&Calculate checksum'
  325. TabOrder = 1
  326. OnClick = ChecksumButtonClick
  327. end
  328. object ChecksumGroup: TGroupBox
  329. Left = 6
  330. Top = 40
  331. Width = 326
  332. Height = 41
  333. Anchors = [akLeft, akRight, akBottom]
  334. Caption = 'Checksum'
  335. TabOrder = 3
  336. DesignSize = (
  337. 326
  338. 41)
  339. object ChecksumEdit: TEdit
  340. Left = 10
  341. Top = 18
  342. Width = 306
  343. Height = 19
  344. TabStop = False
  345. Anchors = [akLeft, akTop, akRight]
  346. BorderStyle = bsNone
  347. Color = clBtnFace
  348. ReadOnly = True
  349. TabOrder = 0
  350. Text = 'ChecksumEdit'
  351. end
  352. end
  353. end
  354. end
  355. object HelpButton: TButton
  356. Left = 275
  357. Top = 386
  358. Width = 75
  359. Height = 25
  360. Anchors = [akRight, akBottom]
  361. Caption = '&Help'
  362. TabOrder = 3
  363. OnClick = HelpButtonClick
  364. end
  365. object ListViewMenu: TPopupMenu
  366. Left = 16
  367. Top = 384
  368. object Copy: TMenuItem
  369. Caption = '&Copy'
  370. OnClick = CopyClick
  371. end
  372. end
  373. end