Properties.dfm 8.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358
  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 Bevel1: TBevel
  59. Left = 8
  60. Top = 47
  61. Width = 320
  62. Height = 9
  63. Anchors = [akLeft, akTop, akRight]
  64. Shape = bsTopLine
  65. end
  66. object Label1: TLabel
  67. Left = 8
  68. Top = 58
  69. Width = 44
  70. Height = 13
  71. Caption = 'Location:'
  72. ShowAccelChar = False
  73. end
  74. object LocationLabel: TPathLabel
  75. Left = 85
  76. Top = 58
  77. Width = 243
  78. Height = 13
  79. UnixPath = True
  80. IndentHorizontal = 0
  81. IndentVertical = 0
  82. Align = alNone
  83. Anchors = [akLeft, akTop, akRight]
  84. AutoSize = False
  85. end
  86. object FileLabel: TLabel
  87. Left = 85
  88. Top = 18
  89. Width = 241
  90. Height = 13
  91. AutoSize = False
  92. Caption = 'FileLabel'
  93. ShowAccelChar = False
  94. end
  95. object Label2: TLabel
  96. Left = 8
  97. Top = 80
  98. Width = 23
  99. Height = 13
  100. Caption = 'Size:'
  101. ShowAccelChar = False
  102. end
  103. object SizeLabel: TLabel
  104. Left = 85
  105. Top = 80
  106. Width = 160
  107. Height = 13
  108. Anchors = [akLeft, akTop, akRight]
  109. AutoSize = False
  110. Caption = 'SizeLabel'
  111. ShowAccelChar = False
  112. end
  113. object LinksToLabelLabel: TLabel
  114. Left = 8
  115. Top = 102
  116. Width = 40
  117. Height = 13
  118. Caption = 'Links to:'
  119. ShowAccelChar = False
  120. end
  121. object LinksToLabel: TPathLabel
  122. Left = 85
  123. Top = 102
  124. Width = 240
  125. Height = 13
  126. UnixPath = True
  127. IndentHorizontal = 0
  128. IndentVertical = 0
  129. Align = alNone
  130. Anchors = [akLeft, akTop, akRight]
  131. AutoSize = False
  132. end
  133. object Bevel2: TBevel
  134. Left = 8
  135. Top = 125
  136. Width = 320
  137. Height = 9
  138. Anchors = [akLeft, akTop, akRight]
  139. Shape = bsTopLine
  140. end
  141. object Label3: TLabel
  142. Left = 8
  143. Top = 203
  144. Width = 59
  145. Height = 13
  146. Caption = 'Permissions:'
  147. FocusControl = RightsFrame
  148. end
  149. object Bevel3: TBevel
  150. Left = 8
  151. Top = 193
  152. Width = 320
  153. Height = 9
  154. Anchors = [akLeft, akTop, akRight]
  155. Shape = bsTopLine
  156. end
  157. object Label4: TLabel
  158. Left = 8
  159. Top = 138
  160. Width = 33
  161. Height = 13
  162. Caption = 'Group:'
  163. FocusControl = GroupComboBox
  164. end
  165. object Label5: TLabel
  166. Left = 8
  167. Top = 166
  168. Width = 36
  169. Height = 13
  170. Caption = 'Owner:'
  171. FocusControl = OwnerComboBox
  172. end
  173. object FileIconImage: TImage
  174. Left = 11
  175. Top = 8
  176. Width = 32
  177. Height = 32
  178. AutoSize = True
  179. end
  180. object RecursiveBevel: TBevel
  181. Left = 8
  182. Top = 312
  183. Width = 320
  184. Height = 9
  185. Anchors = [akLeft, akTop, akRight]
  186. Shape = bsTopLine
  187. end
  188. inline RightsFrame: TRightsFrame
  189. Left = 84
  190. Top = 200
  191. Width = 244
  192. Height = 109
  193. TabOrder = 3
  194. end
  195. object GroupComboBox: TComboBox
  196. Left = 85
  197. Top = 135
  198. Width = 161
  199. Height = 21
  200. DropDownCount = 16
  201. MaxLength = 50
  202. TabOrder = 1
  203. Text = 'GroupComboBox'
  204. OnChange = ControlChange
  205. OnExit = GroupComboBoxExit
  206. end
  207. object OwnerComboBox: TComboBox
  208. Left = 85
  209. Top = 163
  210. Width = 161
  211. Height = 21
  212. DropDownCount = 16
  213. MaxLength = 50
  214. TabOrder = 2
  215. Text = 'OwnerComboBox'
  216. OnChange = ControlChange
  217. OnExit = OwnerComboBoxExit
  218. end
  219. object RecursiveCheck: TCheckBox
  220. Left = 12
  221. Top = 322
  222. Width = 317
  223. Height = 17
  224. Anchors = [akLeft, akTop, akRight]
  225. Caption = 'Set group, owner and permissions &recursively'
  226. TabOrder = 4
  227. OnClick = ControlChange
  228. end
  229. object CalculateSizeButton: TButton
  230. Left = 248
  231. Top = 72
  232. Width = 80
  233. Height = 25
  234. Anchors = [akTop, akRight]
  235. Caption = 'C&alculate'
  236. TabOrder = 0
  237. OnClick = CalculateSizeButtonClick
  238. end
  239. end
  240. object ChecksumSheet: TTabSheet
  241. Caption = 'Checksum'
  242. ImageIndex = 1
  243. DesignSize = (
  244. 338
  245. 346)
  246. object Label6: TLabel
  247. Left = 13
  248. Top = 13
  249. Width = 49
  250. Height = 13
  251. Caption = '&Algorithm:'
  252. FocusControl = ChecksumAlgEdit
  253. end
  254. object ChecksumView: TListView
  255. Left = 6
  256. Top = 40
  257. Width = 326
  258. Height = 297
  259. Anchors = [akLeft, akTop, akRight, akBottom]
  260. Columns = <
  261. item
  262. Caption = 'File'
  263. Width = 100
  264. end
  265. item
  266. Caption = 'Checksum'
  267. Width = 100
  268. end>
  269. ColumnClick = False
  270. DoubleBuffered = True
  271. MultiSelect = True
  272. ReadOnly = True
  273. RowSelect = True
  274. ParentDoubleBuffered = False
  275. PopupMenu = ListViewMenu
  276. TabOrder = 2
  277. ViewStyle = vsReport
  278. OnContextPopup = ChecksumViewContextPopup
  279. end
  280. object ChecksumAlgEdit: TComboBox
  281. Left = 80
  282. Top = 9
  283. Width = 121
  284. Height = 21
  285. AutoComplete = False
  286. Anchors = [akLeft, akTop, akRight]
  287. MaxLength = 250
  288. TabOrder = 0
  289. OnChange = ChecksumAlgEditChange
  290. OnEnter = ControlChange
  291. OnExit = ControlChange
  292. Items.Strings = (
  293. 'Xmd5')
  294. end
  295. object ChecksumButton: TButton
  296. Left = 208
  297. Top = 7
  298. Width = 122
  299. Height = 25
  300. Anchors = [akTop, akRight]
  301. Caption = '&Calculate checksum'
  302. TabOrder = 1
  303. OnClick = ChecksumButtonClick
  304. end
  305. object ChecksumGroup: TGroupBox
  306. Left = 6
  307. Top = 40
  308. Width = 326
  309. Height = 41
  310. Anchors = [akLeft, akRight, akBottom]
  311. Caption = 'Checksum'
  312. TabOrder = 3
  313. DesignSize = (
  314. 326
  315. 41)
  316. object ChecksumUnknownLabel: TLabel
  317. Left = 10
  318. Top = 18
  319. Width = 117
  320. Height = 13
  321. Caption = 'ChecksumUnknownLabel'
  322. ShowAccelChar = False
  323. end
  324. object ChecksumEdit: TEdit
  325. Left = 10
  326. Top = 18
  327. Width = 306
  328. Height = 19
  329. TabStop = False
  330. Anchors = [akLeft, akTop, akRight]
  331. BorderStyle = bsNone
  332. Color = clBtnFace
  333. ReadOnly = True
  334. TabOrder = 0
  335. Text = 'ChecksumEdit'
  336. end
  337. end
  338. end
  339. end
  340. object HelpButton: TButton
  341. Left = 275
  342. Top = 386
  343. Width = 75
  344. Height = 25
  345. Anchors = [akRight, akBottom]
  346. Caption = '&Help'
  347. TabOrder = 3
  348. OnClick = HelpButtonClick
  349. end
  350. object ListViewMenu: TPopupMenu
  351. Left = 16
  352. Top = 384
  353. object Copy: TMenuItem
  354. Caption = '&Copy'
  355. OnClick = CopyClick
  356. end
  357. end
  358. end