EditMask.dfm 5.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224
  1. object EditMaskDialog: TEditMaskDialog
  2. Left = 369
  3. Top = 257
  4. HelpType = htKeyword
  5. HelpKeyword = 'ui_editmask'
  6. BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
  7. BorderStyle = bsDialog
  8. Caption = 'Edit file mask'
  9. ClientHeight = 537
  10. ClientWidth = 474
  11. Color = clBtnFace
  12. Font.Charset = DEFAULT_CHARSET
  13. Font.Color = clWindowText
  14. Font.Height = -12
  15. Font.Name = 'Segoe UI'
  16. Font.Style = []
  17. KeyPreview = True
  18. Position = poOwnerFormCenter
  19. OnCloseQuery = FormCloseQuery
  20. OnKeyDown = FormKeyDown
  21. OnShow = FormShow
  22. DesignSize = (
  23. 474
  24. 537)
  25. TextHeight = 15
  26. object FilesGroup: TGroupBox
  27. Left = 8
  28. Top = 8
  29. Width = 458
  30. Height = 192
  31. Anchors = [akLeft, akTop, akRight]
  32. Caption = 'Files masks'
  33. TabOrder = 0
  34. DesignSize = (
  35. 458
  36. 192)
  37. object Label3: TLabel
  38. Left = 9
  39. Top = 22
  40. Width = 66
  41. Height = 15
  42. Caption = '&Include files:'
  43. FocusControl = IncludeFileMasksMemo
  44. end
  45. object Label1: TLabel
  46. Left = 232
  47. Top = 22
  48. Width = 67
  49. Height = 15
  50. Caption = '&Exclude files:'
  51. FocusControl = ExcludeFileMasksMemo
  52. end
  53. object IncludeFileMasksMemo: TMemo
  54. Left = 9
  55. Top = 40
  56. Width = 217
  57. Height = 142
  58. Anchors = [akLeft, akTop, akBottom]
  59. Lines.Strings = (
  60. 'IncludeFileMasksMemo')
  61. ScrollBars = ssVertical
  62. TabOrder = 0
  63. OnChange = ControlChange
  64. OnExit = FileMasksMemoExit
  65. end
  66. object ExcludeFileMasksMemo: TMemo
  67. Left = 232
  68. Top = 40
  69. Width = 217
  70. Height = 142
  71. Anchors = [akLeft, akTop, akBottom]
  72. Lines.Strings = (
  73. 'ExcludeFileMasksMemo')
  74. ScrollBars = ssVertical
  75. TabOrder = 1
  76. OnChange = ControlChange
  77. OnExit = FileMasksMemoExit
  78. end
  79. end
  80. object OKBtn: TButton
  81. Left = 214
  82. Top = 504
  83. Width = 80
  84. Height = 25
  85. Anchors = [akRight, akBottom]
  86. Caption = 'OK'
  87. Default = True
  88. ModalResult = 1
  89. TabOrder = 4
  90. end
  91. object CancelBtn: TButton
  92. Left = 300
  93. Top = 504
  94. Width = 80
  95. Height = 25
  96. Anchors = [akRight, akBottom]
  97. Cancel = True
  98. Caption = 'Cancel'
  99. ModalResult = 2
  100. TabOrder = 5
  101. end
  102. object HelpButton: TButton
  103. Left = 386
  104. Top = 504
  105. Width = 80
  106. Height = 25
  107. Anchors = [akRight, akBottom]
  108. Caption = '&Help'
  109. TabOrder = 6
  110. OnClick = HelpButtonClick
  111. end
  112. object ClearButton: TButton
  113. Left = 128
  114. Top = 504
  115. Width = 80
  116. Height = 25
  117. Anchors = [akRight, akBottom]
  118. Caption = '&Clear'
  119. TabOrder = 3
  120. OnClick = ClearButtonClick
  121. end
  122. object DirectoriesGroup: TGroupBox
  123. Left = 8
  124. Top = 206
  125. Width = 458
  126. Height = 186
  127. Anchors = [akLeft, akTop, akRight]
  128. Caption = 'Directories masks'
  129. TabOrder = 1
  130. DesignSize = (
  131. 458
  132. 186)
  133. object Label2: TLabel
  134. Left = 9
  135. Top = 22
  136. Width = 100
  137. Height = 15
  138. Caption = 'I&nclude directories:'
  139. FocusControl = IncludeDirectoryMasksMemo
  140. end
  141. object Label4: TLabel
  142. Left = 232
  143. Top = 22
  144. Width = 101
  145. Height = 15
  146. Caption = 'E&xclude directories:'
  147. FocusControl = ExcludeDirectoryMasksMemo
  148. end
  149. object IncludeDirectoryMasksMemo: TMemo
  150. Left = 9
  151. Top = 40
  152. Width = 217
  153. Height = 115
  154. Anchors = [akLeft, akTop, akBottom]
  155. Lines.Strings = (
  156. 'IncludeDirectoryMasksMemo')
  157. ScrollBars = ssVertical
  158. TabOrder = 0
  159. OnChange = ControlChange
  160. OnExit = DirectoryMasksMemoExit
  161. end
  162. object ExcludeDirectoryMasksMemo: TMemo
  163. Left = 232
  164. Top = 40
  165. Width = 217
  166. Height = 115
  167. Anchors = [akLeft, akTop, akBottom]
  168. Lines.Strings = (
  169. 'ExcludeDirectoryMasksMemo')
  170. ScrollBars = ssVertical
  171. TabOrder = 1
  172. OnChange = ExcludeDirectoryMasksMemoChange
  173. OnExit = DirectoryMasksMemoExit
  174. end
  175. object ExcludeDirectoryAllCheck: TCheckBox
  176. Left = 234
  177. Top = 161
  178. Width = 217
  179. Height = 17
  180. Anchors = [akLeft, akBottom]
  181. Caption = '&All (do not recurse)'
  182. TabOrder = 2
  183. OnClick = ExcludeDirectoryAllCheckClick
  184. end
  185. end
  186. object MaskGroup: TGroupBox
  187. Left = 8
  188. Top = 409
  189. Width = 458
  190. Height = 89
  191. Anchors = [akLeft, akTop, akRight]
  192. Caption = 'Mask'
  193. TabOrder = 7
  194. DesignSize = (
  195. 458
  196. 89)
  197. object MaskMemo: TMemo
  198. Left = 9
  199. Top = 21
  200. Width = 440
  201. Height = 58
  202. TabStop = False
  203. Anchors = [akLeft, akTop, akRight, akBottom]
  204. BevelInner = bvNone
  205. BevelOuter = bvNone
  206. BorderStyle = bsNone
  207. Lines.Strings = (
  208. 'MaskMemo')
  209. ScrollBars = ssVertical
  210. TabOrder = 0
  211. end
  212. end
  213. object MaskHintText: TStaticText
  214. Left = 337
  215. Top = 391
  216. Width = 129
  217. Height = 17
  218. Alignment = taRightJustify
  219. AutoSize = False
  220. Caption = 'mask hints'
  221. TabOrder = 2
  222. TabStop = True
  223. end
  224. end