home *** CD-ROM | disk | FTP | other *** search
- object fFileSearch: TfFileSearch
- Left = 324
- Top = 171
- HelpContext = 9
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsToolWindow
- Caption = 'Hled'#225'n'#237' v souborech'
- ClientHeight = 385
- ClientWidth = 421
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poMainFormCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- DesignSize = (
- 421
- 385)
- PixelsPerInch = 96
- TextHeight = 13
- object lFileName: TLabel
- Left = 8
- Top = 360
- Width = 221
- Height = 13
- Anchors = [akLeft, akTop, akRight]
- AutoSize = False
- Caption = 'lFileName'
- end
- object gbFindText: TGroupBox
- Left = 8
- Top = 8
- Width = 406
- Height = 177
- Caption = 'Text'
- TabOrder = 0
- object lSearchText: TLabel
- Left = 16
- Top = 24
- Width = 62
- Height = 13
- Caption = '&Hledan'#253' text:'
- FocusControl = eFindText
- end
- object lCodePage: TLabel
- Left = 16
- Top = 147
- Width = 119
- Height = 13
- Caption = '&K'#243'dov'#225' str'#225'nka soubor'#367':'
- FocusControl = cbFileCP
- end
- object cReplaceText: TCheckBox
- Left = 16
- Top = 48
- Width = 97
- Height = 17
- Caption = '&nahradit textem:'
- TabOrder = 1
- OnClick = cReplaceTextClick
- end
- object cCaseSensitive: TCheckBox
- Left = 16
- Top = 96
- Width = 177
- Height = 17
- Caption = '&rozli'#353'ovat velikost p'#237'smen'
- TabOrder = 4
- end
- object cWholeWord: TCheckBox
- Left = 16
- Top = 72
- Width = 129
- Height = 17
- Caption = 'pouze &cel'#225' slova'
- TabOrder = 3
- end
- object cAskReplace: TCheckBox
- Left = 16
- Top = 120
- Width = 201
- Height = 17
- Caption = '&dotaz p'#345'ed nahrazen'#237'm'
- TabOrder = 5
- end
- object eFindText: TComboBox
- Left = 144
- Top = 24
- Width = 233
- Height = 21
- AutoComplete = False
- ItemHeight = 13
- TabOrder = 0
- end
- object eReplaceText: TComboBox
- Left = 144
- Top = 48
- Width = 233
- Height = 21
- AutoComplete = False
- Enabled = False
- ItemHeight = 13
- TabOrder = 2
- end
- object cbFileCP: TComboBox
- Left = 144
- Top = 144
- Width = 233
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 6
- end
- end
- object bOK: TButton
- Left = 256
- Top = 352
- Width = 75
- Height = 25
- Caption = '&OK'
- Default = True
- TabOrder = 2
- OnClick = bOKClick
- end
- object bCancel: TButton
- Left = 336
- Top = 352
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Storno'
- TabOrder = 3
- OnClick = bCancelClick
- end
- object gbFindScope: TGroupBox
- Left = 8
- Top = 192
- Width = 406
- Height = 153
- Caption = 'Rozsah hled'#225'n'#237
- TabOrder = 1
- object lSearchMasks: TLabel
- Left = 8
- Top = 96
- Width = 96
- Height = 13
- Caption = 'Hl&edat v souborech:'
- FocusControl = eFileMasks
- end
- object Label1: TLabel
- Left = 8
- Top = 112
- Width = 105
- Height = 15
- Caption = '*.pas;*.h;*.txt'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = 'Courier New'
- Font.Style = []
- ParentFont = False
- end
- object rProjectFiles: TRadioButton
- Left = 8
- Top = 24
- Width = 137
- Height = 17
- Caption = 'v souborech &projektu'
- Checked = True
- TabOrder = 0
- TabStop = True
- end
- object rOpenFiles: TRadioButton
- Left = 8
- Top = 48
- Width = 145
- Height = 17
- Caption = 'v o&tev'#345'en'#253'ch souborech'
- TabOrder = 1
- end
- object rDirectoryFiles: TRadioButton
- Left = 8
- Top = 72
- Width = 129
- Height = 17
- Caption = 'v zadan'#233'm &adres'#225#345'i'
- TabOrder = 2
- end
- object cSubdirectories: TCheckBox
- Left = 144
- Top = 120
- Width = 145
- Height = 17
- Caption = '&v'#269'etn'#283' podadres'#225#345#367
- Enabled = False
- TabOrder = 6
- end
- object eSearchDirectory: TComboBox
- Left = 144
- Top = 72
- Width = 233
- Height = 21
- ItemHeight = 13
- TabOrder = 3
- end
- object eFileMasks: TComboBox
- Left = 144
- Top = 96
- Width = 233
- Height = 21
- ItemHeight = 13
- TabOrder = 5
- Text = '*.*'
- end
- object tbOpenDirectory: TButton
- Left = 377
- Top = 72
- Width = 21
- Height = 21
- Action = aOpenDirectory
- TabOrder = 4
- end
- end
- object alFileSearch: TActionList
- Images = fPSPad.imStatusBar
- OnUpdate = alFileSearchUpdate
- Left = 268
- Top = 192
- object aOpenDirectory: TAction
- Caption = '...'
- Hint = 'Vybrat adres'#225#345
- ImageIndex = 7
- OnExecute = aOpenDirectoryExecute
- end
- end
- end
-