CustomCommand.dfm 4.4 KB

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