CustomCommand.dfm 4.3 KB

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