EditMask.dfm 5.0 KB

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