CustomCommand.dfm 4.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198
  1. object CustomCommandDialog: TCustomCommandDialog
  2. Left = 384
  3. Top = 214
  4. HelpType = htKeyword
  5. HelpKeyword = 'ui_customcommand'
  6. BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
  7. BorderStyle = bsDialog
  8. Caption = 'CustomCommandDialog'
  9. ClientHeight = 309
  10. ClientWidth = 416
  11. Color = clBtnFace
  12. Font.Charset = DEFAULT_CHARSET
  13. Font.Color = clWindowText
  14. Font.Height = -11
  15. Font.Name = 'Tahoma'
  16. Font.Style = []
  17. Position = poOwnerFormCenter
  18. OnCloseQuery = FormCloseQuery
  19. OnShow = FormShow
  20. DesignSize = (
  21. 416
  22. 309)
  23. TextHeight = 13
  24. object Group: TGroupBox
  25. Left = 8
  26. Top = 8
  27. Width = 400
  28. Height = 259
  29. Anchors = [akLeft, akTop, akRight, akBottom]
  30. TabOrder = 0
  31. DesignSize = (
  32. 400
  33. 259)
  34. object DescriptionLabel: TLabel
  35. Left = 11
  36. Top = 16
  37. Width = 57
  38. Height = 13
  39. Anchors = [akLeft, akTop, akRight]
  40. Caption = '&Description:'
  41. FocusControl = DescriptionEdit
  42. end
  43. object Label1: TLabel
  44. Left = 11
  45. Top = 64
  46. Width = 88
  47. Height = 13
  48. Anchors = [akLeft, akTop, akRight]
  49. Caption = '&Custom command:'
  50. FocusControl = CommandEdit
  51. end
  52. object ShortCutLabel: TLabel
  53. Left = 16
  54. Top = 231
  55. Width = 93
  56. Height = 13
  57. Caption = '&Keyboard shortcut:'
  58. FocusControl = ShortCutCombo
  59. end
  60. object DescriptionEdit: TEdit
  61. Left = 11
  62. Top = 32
  63. Width = 378
  64. Height = 21
  65. Anchors = [akLeft, akTop, akRight]
  66. MaxLength = 250
  67. TabOrder = 0
  68. OnChange = ControlChange
  69. end
  70. object CommandEdit: THistoryComboBox
  71. Left = 11
  72. Top = 80
  73. Width = 378
  74. Height = 21
  75. AutoComplete = False
  76. Anchors = [akLeft, akTop, akRight]
  77. MaxLength = 2048
  78. TabOrder = 1
  79. OnChange = ControlChange
  80. OnGetData = CommandEditGetData
  81. OnSetData = CommandEditSetData
  82. end
  83. object ApplyToDirectoriesCheck: TCheckBox
  84. Left = 16
  85. Top = 149
  86. Width = 181
  87. Height = 17
  88. Caption = '&Apply to directories'
  89. TabOrder = 5
  90. OnClick = ControlChange
  91. end
  92. object RecursiveCheck: TCheckBox
  93. Left = 203
  94. Top = 149
  95. Width = 185
  96. Height = 17
  97. Caption = '&Execute recursively'
  98. TabOrder = 6
  99. OnClick = ControlChange
  100. end
  101. object LocalCommandButton: TRadioButton
  102. Left = 203
  103. Top = 122
  104. Width = 185
  105. Height = 17
  106. Caption = '&Local command'
  107. TabOrder = 4
  108. OnClick = ControlChange
  109. end
  110. object RemoteCommandButton: TRadioButton
  111. Left = 16
  112. Top = 122
  113. Width = 181
  114. Height = 17
  115. Caption = '&Remote command'
  116. TabOrder = 3
  117. OnClick = ControlChange
  118. end
  119. object ShowResultsCheck: TCheckBox
  120. Left = 16
  121. Top = 176
  122. Width = 181
  123. Height = 17
  124. Caption = '&Show results in terminal'
  125. TabOrder = 7
  126. OnClick = ControlChange
  127. end
  128. object CopyResultsCheck: TCheckBox
  129. Left = 16
  130. Top = 203
  131. Width = 181
  132. Height = 17
  133. Caption = 'Copy results to clip&board'
  134. TabOrder = 9
  135. OnClick = ControlChange
  136. end
  137. object HintText: TStaticText
  138. Left = 272
  139. Top = 103
  140. Width = 117
  141. Height = 16
  142. Alignment = taRightJustify
  143. Anchors = [akTop, akRight]
  144. AutoSize = False
  145. Caption = '&patterns'
  146. TabOrder = 2
  147. TabStop = True
  148. end
  149. object ShortCutCombo: TComboBox
  150. Left = 203
  151. Top = 226
  152. Width = 184
  153. Height = 21
  154. TabOrder = 10
  155. end
  156. object RemoteFilesCheck: TCheckBox
  157. Left = 203
  158. Top = 176
  159. Width = 181
  160. Height = 17
  161. Caption = '&Use remote files'
  162. TabOrder = 8
  163. OnClick = ControlChange
  164. end
  165. end
  166. object OkButton: TButton
  167. Left = 164
  168. Top = 276
  169. Width = 75
  170. Height = 25
  171. Anchors = [akRight, akBottom]
  172. Caption = 'OK'
  173. Default = True
  174. ModalResult = 1
  175. TabOrder = 1
  176. end
  177. object CancelButton: TButton
  178. Left = 248
  179. Top = 276
  180. Width = 75
  181. Height = 25
  182. Anchors = [akRight, akBottom]
  183. Cancel = True
  184. Caption = 'Cancel'
  185. ModalResult = 2
  186. TabOrder = 2
  187. end
  188. object HelpButton: TButton
  189. Left = 332
  190. Top = 276
  191. Width = 75
  192. Height = 25
  193. Anchors = [akRight, akBottom]
  194. Caption = '&Help'
  195. TabOrder = 3
  196. OnClick = HelpButtonClick
  197. end
  198. end