EditMask.dfm 5.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219
  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 = 500
  10. ClientWidth = 425
  11. Color = clBtnFace
  12. ParentFont = True
  13. KeyPreview = True
  14. Position = poOwnerFormCenter
  15. OnCloseQuery = FormCloseQuery
  16. OnKeyDown = FormKeyDown
  17. OnShow = FormShow
  18. DesignSize = (
  19. 425
  20. 500)
  21. TextHeight = 13
  22. object FilesGroup: TGroupBox
  23. Left = 8
  24. Top = 6
  25. Width = 409
  26. Height = 179
  27. Anchors = [akLeft, akTop, akRight]
  28. Caption = 'Files masks'
  29. TabOrder = 0
  30. DesignSize = (
  31. 409
  32. 179)
  33. object Label3: TLabel
  34. Left = 16
  35. Top = 19
  36. Width = 61
  37. Height = 13
  38. Caption = '&Include files:'
  39. FocusControl = IncludeFileMasksMemo
  40. end
  41. object Label1: TLabel
  42. Left = 212
  43. Top = 19
  44. Width = 63
  45. Height = 13
  46. Caption = '&Exclude files:'
  47. FocusControl = ExcludeFileMasksMemo
  48. end
  49. object IncludeFileMasksMemo: TMemo
  50. Left = 16
  51. Top = 35
  52. Width = 181
  53. Height = 129
  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 = 212
  64. Top = 35
  65. Width = 181
  66. Height = 129
  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 = 174
  78. Top = 467
  79. Width = 75
  80. Height = 25
  81. Anchors = [akRight, akBottom]
  82. Caption = 'OK'
  83. Default = True
  84. ModalResult = 1
  85. TabOrder = 3
  86. end
  87. object CancelBtn: TButton
  88. Left = 259
  89. Top = 467
  90. Width = 75
  91. Height = 25
  92. Anchors = [akRight, akBottom]
  93. Cancel = True
  94. Caption = 'Cancel'
  95. ModalResult = 2
  96. TabOrder = 4
  97. end
  98. object HelpButton: TButton
  99. Left = 342
  100. Top = 467
  101. Width = 75
  102. Height = 25
  103. Anchors = [akRight, akBottom]
  104. Caption = '&Help'
  105. TabOrder = 5
  106. OnClick = HelpButtonClick
  107. end
  108. object ClearButton: TButton
  109. Left = 89
  110. Top = 467
  111. Width = 75
  112. Height = 25
  113. Anchors = [akRight, akBottom]
  114. Caption = '&Clear'
  115. TabOrder = 2
  116. OnClick = ClearButtonClick
  117. end
  118. object DirectoriesGroup: TGroupBox
  119. Left = 8
  120. Top = 191
  121. Width = 409
  122. Height = 172
  123. Anchors = [akLeft, akTop, akRight]
  124. Caption = 'Directories masks'
  125. TabOrder = 1
  126. DesignSize = (
  127. 409
  128. 172)
  129. object Label2: TLabel
  130. Left = 16
  131. Top = 19
  132. Width = 92
  133. Height = 13
  134. Caption = 'I&nclude directories:'
  135. FocusControl = IncludeDirectoryMasksMemo
  136. end
  137. object Label4: TLabel
  138. Left = 212
  139. Top = 19
  140. Width = 94
  141. Height = 13
  142. Caption = 'E&xclude directories:'
  143. FocusControl = ExcludeDirectoryMasksMemo
  144. end
  145. object IncludeDirectoryMasksMemo: TMemo
  146. Left = 16
  147. Top = 35
  148. Width = 181
  149. Height = 104
  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 = 212
  160. Top = 35
  161. Width = 181
  162. Height = 104
  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 = 212
  173. Top = 145
  174. Width = 181
  175. Height = 17
  176. Caption = '&All (do not recurse)'
  177. TabOrder = 2
  178. OnClick = ExcludeDirectoryAllCheckClick
  179. end
  180. end
  181. object MaskGroup: TGroupBox
  182. Left = 8
  183. Top = 385
  184. Width = 409
  185. Height = 76
  186. Anchors = [akLeft, akTop, akRight, akBottom]
  187. Caption = 'Mask'
  188. TabOrder = 6
  189. DesignSize = (
  190. 409
  191. 76)
  192. object MaskMemo: TMemo
  193. Left = 7
  194. Top = 15
  195. Width = 395
  196. Height = 52
  197. TabStop = False
  198. Anchors = [akLeft, akTop, akRight, akBottom]
  199. BevelInner = bvNone
  200. BevelOuter = bvNone
  201. BorderStyle = bsNone
  202. Lines.Strings = (
  203. 'MaskMemo')
  204. ScrollBars = ssVertical
  205. TabOrder = 0
  206. end
  207. end
  208. object MaskHintText: TStaticText
  209. Left = 288
  210. Top = 369
  211. Width = 129
  212. Height = 17
  213. Alignment = taRightJustify
  214. AutoSize = False
  215. Caption = 'mask hints'
  216. TabOrder = 7
  217. TabStop = True
  218. end
  219. end