Techno Guide - Aspettando Windows 98/TechnoGuide.iso/applicaz/snotetab/notetab.exe/0/RCDATA/TFRMSEARCHFILES/TFRMSEARCHFILES.txt

Text File | 1998-01-25 | 8KB | 324 lines

object frmSearchFiles: TfrmSearchFiles
  Left = 200
  Top = 108
  Hint = '|Search files...'
  ActiveControl = cmbFind
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Search Text'
  ClientHeight = 269
  ClientWidth = 393
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  Position = poScreenCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object lbxFilesFound: TCheckListBox
    Left = 0
    Top = 0
    Width = 393
    Height = 269
    Hint = '|Select or unselect listed files'
    Align = alClient
    ItemHeight = 13
    PopupMenu = pmnFilesFound
    TabOrder = 1
  end
  object pnlButtons: TPanel
    Left = 0
    Top = 228
    Width = 393
    Height = 41
    Hint = '|Found in files...'
    BevelOuter = bvNone
    TabOrder = 2
    object btnReplace: TButton
      Left = 112
      Top = 8
      Width = 97
      Height = 25
      Hint = '|Replace searched criteria in selected files'
      Caption = '&Replace'
      Enabled = False
      TabOrder = 1
      Visible = False
      OnClick = btnReplaceClick
    end
    object btnOpen: TButton
      Left = 8
      Top = 8
      Width = 97
      Height = 25
      Hint = '|Open selected files in editor'
      Caption = '&Open'
      Enabled = False
      TabOrder = 0
      OnClick = btnOpenClick
    end
    object btnCancel2: TButton
      Left = 288
      Top = 8
      Width = 97
      Height = 25
      Hint = '|Stop searching in chosen directories'
      Cancel = True
      Caption = 'Stop'
      TabOrder = 2
      OnClick = btnCancelClick
    end
  end
  object tabSearch: TTabControl
    Left = 0
    Top = 0
    Width = 393
    Height = 269
    Align = alClient
    TabIndex = 0
    TabOrder = 0
    Tabs.Strings = (
      'Find in Files'
      'Replace in Files')
    OnChange = tabSearchChange
    object lbl_cmbFind: TEnhLabel
      Left = 18
      Top = 43
      Width = 49
      Height = 13
      Caption = '&Find what:'
      FocusControl = cmbFind
    end
    object lbl_cmbReplace: TEnhLabel
      Left = 18
      Top = 71
      Width = 65
      Height = 13
      Caption = '&Replace with:'
      FocusControl = cmbReplace
      Visible = False
    end
    object cmbFind: TLblComboBox
      Left = 109
      Top = 40
      Width = 268
      Height = 21
      Hint =
        '|Text to search (tokens: ^T = tab; ^P = paragraph; ^C = carriage' +
        '-return; ^L = line-feed)'
      ItemHeight = 13
      TabOrder = 0
      OnChange = cmbFindChange
      AddNewToStart = True
      AddNewToList = True
      AutoExpand = False
      CaseSensitive = True
      DestroyObjects = False
      DispatchInsMode = False
      LimitToList = False
      OverwriteMode = False
      ReadOnly = False
      UndoWhenEsc = True
      OnEdited = CheckUserInput
      OnListPick = CheckUserInput
      OnPaste = PasteCriteria
      LabelPos = lpCustom
      LabelMargin = 4
      LabelComponent = lbl_cmbFind
      LabelRelLeft = -91
      LabelRelTop = 3
    end
    object cmbReplace: TLblComboBox
      Left = 109
      Top = 68
      Width = 268
      Height = 21
      Hint =
        '|New text (tokens: ^T = tab; ^P = paragraph; ^C = carriage-retur' +
        'n; ^L = line-feed)'
      ItemHeight = 13
      TabOrder = 1
      Visible = False
      AddNewToStart = True
      AddNewToList = True
      AutoExpand = False
      CaseSensitive = True
      DestroyObjects = False
      DispatchInsMode = False
      LimitToList = False
      OverwriteMode = False
      ReadOnly = False
      UndoWhenEsc = False
      OnListPick = cmbReplaceListPick
      OnPaste = PasteCriteria
      LabelPos = lpCustom
      LabelMargin = 4
      LabelComponent = lbl_cmbReplace
      LabelRelLeft = -91
      LabelRelTop = 3
    end
    object gbxCriteria: TGroupBox
      Left = 16
      Top = 184
      Width = 161
      Height = 73
      Caption = 'Criteria'
      TabOrder = 3
      object cbxWholeWord: TCheckBox
        Left = 8
        Top = 20
        Width = 129
        Height = 17
        Hint = '|Search only whole words'
        Caption = '&Whole words only'
        TabOrder = 0
      end
      object cbxMatchCase: TCheckBox
        Left = 8
        Top = 46
        Width = 129
        Height = 17
        Hint = '|Search is case sensitive'
        Caption = '&Case sensitive'
        TabOrder = 1
      end
    end
    object btnStart: TButton
      Left = 280
      Top = 232
      Width = 97
      Height = 25
      Hint = '|Start searching in chosen directories'
      Caption = 'Start...'
      Default = True
      Enabled = False
      TabOrder = 8
      OnClick = btnStartClick
    end
    object gbxSearchDirectories: TGroupBox
      Left = 16
      Top = 96
      Width = 361
      Height = 81
      Caption = 'Search Directory Options'
      TabOrder = 2
      object lbl_cmbFileMasks: TEnhLabel
        Left = 9
        Top = 23
        Width = 53
        Height = 13
        Caption = 'File &Masks:'
        FocusControl = cmbFileMasks
      end
      object cmbFileMasks: TLblComboBox
        Left = 80
        Top = 20
        Width = 273
        Height = 21
        Hint = '|Directory containing files to search'
        ItemHeight = 13
        TabOrder = 0
        AddNewToStart = True
        AddNewToList = True
        AutoExpand = False
        CaseSensitive = True
        DestroyObjects = False
        DispatchInsMode = False
        LimitToList = False
        OverwriteMode = False
        ReadOnly = False
        UndoWhenEsc = True
        OnEdited = CheckUserInput
        OnListPick = CheckUserInput
        LabelPos = lpCustom
        LabelMargin = 2
        LabelComponent = lbl_cmbFileMasks
        LabelRelLeft = -71
        LabelRelTop = 3
      end
      object btnBrowse: TButton
        Left = 280
        Top = 48
        Width = 75
        Height = 25
        Hint = '|Browse disk for directory name'
        Caption = '&Browse...'
        TabOrder = 1
        OnClick = btnBrowseClick
      end
      object cbxSubdirectories: TCheckBox
        Left = 80
        Top = 52
        Width = 185
        Height = 17
        Caption = 'Include &Subdirectories'
        TabOrder = 2
      end
    end
    object cbxConfirm: TCheckBox
      Left = 192
      Top = 240
      Width = 81
      Height = 17
      Hint =
        '|Show list of files matching criteria (lets you select which one' +
        's are processed)'
      Caption = 'C&onfirm'
      State = cbChecked
      TabOrder = 6
    end
    object cbxBackup: TCheckBox
      Left = 192
      Top = 216
      Width = 81
      Height = 17
      Hint = '|Make a backup copy of files being modified'
      Caption = 'Bac&kup'
      State = cbChecked
      TabOrder = 4
      Visible = False
    end
    object cbxFindFirst: TCheckBox
      Left = 192
      Top = 216
      Width = 89
      Height = 17
      Hint = 'Stop searching after first match is found'
      Caption = 'Fin&d First'
      TabOrder = 5
    end
    object btnCancel: TButton
      Left = 280
      Top = 200
      Width = 97
      Height = 25
      Hint = '|Close dialog box'
      Cancel = True
      Caption = 'Cancel'
      ModalResult = 2
      TabOrder = 7
      OnClick = btnCancelClick
    end
  end
  object pmnFilesFound: TPopupMenu
    Left = 136
    Top = 224
    object smnCheckAll: TMenuItem
      Caption = '&Check All'
      Hint = 'Adds a check mark to all items'
      OnClick = smnCheckAllClick
    end
    object smnUncheckAll: TMenuItem
      Caption = '&Uncheck All'
      Hint = 'Unchecks all selected items'
      OnClick = smnUncheckAllClick
    end
  end
end