grepsearchdlg.dfm

大家是不是为不知道如何在VB学到绝地程序

object frmGrepSearch: TfrmGrepSearch
  Left = 485
  Top = 151
  AutoSize = True
  BorderStyle = bsDialog
  Caption = 'Find in Files'
  ClientHeight = 273
  ClientWidth = 329
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020000000000000A80800001600000028000000200000004000
    0000010008000000000080040000000000000000000000010000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C000C0DC
    C000F0CAA600CCFFFF0099FFFF0066FFFF0033FFFF00FFCCFF00CCCCFF0099CC
    FF0066CCFF0033CCFF0000CCFF00FF99FF00CC99FF009999FF006699FF003399
    FF000099FF00FF66FF00CC66FF009966FF006666FF003366FF000066FF00FF33
    FF00CC33FF009933FF006633FF003333FF000033FF00CC00FF009900FF006600
    FF003300FF00FFFFCC00CCFFCC0099FFCC0066FFCC0066FFCC0033FFCC0000FF
    CC00FFCCCC00CCCCCC0099CCCC0066CCCC0033CCCC0000CCCC00FF99CC00CC99
    CC009999CC006699CC003399CC000099CC00FF66CC00CC66CC009966CC006666
    CC003366CC000066CC00FF33CC00CC33CC009933CC006633CC003333CC000033
    CC00FF00CC00CC00CC009900CC006600CC003300CC000000CC00FFFF9900CCFF
    990099FF990066FF990033FF990000FF9900FFCC9900CCCC990099CC990066CC
    990033CC990000CC9900FF999900CC9999009999990066999900339999000099
    9900FF669900CC66990099669900666699003366990000669900FF339900CC33
    990099339900663399003333990000339900FF009900CC009900990099006600
    99003300990000009900FFFF6600CCFF660099FF660066FF660033FF660000FF
    6600FFCC6600CCCC660099CC660066CC660033CC660000CC6600FF996600CC99
    660099996600669966003399660000996600FF666600CC666600996666006666
    66003366660000666600FF336600CC3366009933660066336600333366000033
    6600FF006600CC00660099006600660066003300660000006600FFFF3300CCFF
    330099FF330066FF330033FF330000FF3300FFCC3300CCCC330099CC330066CC
    330033CC330000CC3300FF993300CC9933009999330066993300339933000099
    3300FF663300CC66330099663300666633003366330000663300FF333300CC33
    330099333300663333003333330000333300FF003300CC003300990033006600
    33003300330000003300CCFF000099FF000066FF000033FF0000FFCC0000CCCC
    000099CC000066CC000033CC000000CC0000FF990000CC990000999900006699
    00003399000000990000FF660000CC6600009966000066660000006600003366
    0000FF330000CC33000099330000663300003333000000330000CC0000009900
    000066000000330000000000DD000000BB000000AA0000008800000077000000
    5500000044000000220000DD000000BB000000AA000000880000007700000055
    00000044000000220000DDDDDD00555555007777770077777700444444002222
    22001111110077000000550000004400000022000000F0FBFF00A4A0A0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    00000000000000000000000000000000EDEDED00000000000000000000000000
    0000000000000031313131FF5CFF5C5C000000EDEDED00000000000000000000
    0000000031313131313131FF5CFF5C5C5C5C5C0000EDEDED0000000000000000
    00005C5C31313131313131FF5CFF5C5C5C5C5C5C5C00EDEDED00000000000000
    005C5C5C31313131313131FF5CFF5C5C5C5C5C5C5C5C00EDEDED000000000000
    5C5C5C5C3131310000000000000000005C5C5C5C5C5C5C00EDEDED000000005C
    5C5C5C5C000000FFFFFFFFFFFFFFFFFF0000005C5C5C5C5C00EDED000000005C
    5C5C0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00005C5C5C00EDEDED0000005C
    5C00FFFFFFFF00000000000000000000FFFFFFFFFF005C5C00EDEDED0000005C
    00FFFFFF00005B5B5B5B5B5B5B5B5B5B000000FFFFFF005C00EDEDEDED000000
    FFFFFF005B5B5B5B5B5B5B5B5B5B5B5B5B5B5B00FFFFFF0000EDEDEDED0000FF
    FFFF00875B5B5B5B5B5B5B5B5BFFFFFF5B5B5B5B00FFFFFF00EDEDEDED0000FF
    FF005C5B875B5B5B5B5B5B5B5B5B5B5BFF5B5B875B00FFFF00EDEDED000000FF
    FF005C5C5B8787315B5B5B5B5B5B5B5BFF87875B5C00FFFF00EDEDED000000FF
    FF005C5C5C5B31FF3187878787878787875B5C5C5C00FFFF00EDED00000000FF
    FFFF005C5C5C5C315B5B5B5B5B5B5B5B5B5CF75B00FFFFFF00ED000000000000
    FFFFFF005C5C5C5C5C5C5C5C5C5C5C5C5C5C5C00FFFFFF000000000000000000
    00FFFFFF0000005C5C5C5C5C5C5C5C5C5C0000FFFFFF00000000000000000000
    0000FFFFFFFFFF00000000000000000000FFFFFFFF00EDED0000000000000000
    00000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00005D00EDED00000000000000
    00000000000000FFFFFFFFFFFFFFFFFFFF00000707075D00EDED000000000000
    000000000000000000000000000000000007FFFF0707070000EDED0000000000
    00000000000000000000000000000000000007FFFF0700000000EDED00000000
    00000000000000000000000000000000000000000000F100000000EDED000000
    0000000000000000000000000000000000000000F0EDF0F100000000EDED0000
    000000000000000000000000000000000000000000F0EDF0F100000000ED0000
    00000000000000000000000000000000000000000000F0EDF0F1000000000000
    0000000000000000000000000000000000000000000000F0EDF0F10000000000
    000000000000000000000000000000000000000000000000F0EDF0F100000000
    00000000000000000000000000000000000000000000000000F0EDF0F1000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000FF80
    07FFFC0000FFF000003FE000001FC000000F8000000700000007000000030000
    00030000000100000001000000010000000300000003000000070000000F8000
    003FC000007FE000003FF000001FFC00000FFF800007FFFFE003FFFFF001FFFF
    F800FFFFFC00FFFFFE00FFFFFF00FFFFFF80FFFFFFC0FFFFFFE1FFFFFFFF}
  KeyPreview = True
  OldCreateOrder = True
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object lblFind: TLabel
    Left = 14
    Top = 8
    Width = 53
    Height = 13
    Alignment = taRightJustify
    Caption = '&Text to find'
    FocusControl = cbText
  end
  object cbText: TMRUComboBox
    Left = 72
    Top = 0
    Width = 257
    Height = 21
    ItemHeight = 13
    TabOrder = 0
  end
  object gbxOptions: TGroupBox
    Left = 0
    Top = 32
    Width = 161
    Height = 113
    Caption = 'Options'
    TabOrder = 1
    object chkNoCase: TCheckBox
      Left = 8
      Top = 19
      Width = 140
      Height = 17
      Caption = '&Case sensitive'
      TabOrder = 0
    end
    object chkNoComments: TCheckBox
      Left = 8
      Top = 37
      Width = 140
      Height = 17
      Caption = '&Ignore comments'
      TabOrder = 1
    end
    object chkWholeWord: TCheckBox
      Left = 8
      Top = 55
      Width = 140
      Height = 17
      Caption = '&Whole word'
      TabOrder = 2
    end
    object chkRegEx: TCheckBox
      Left = 8
      Top = 74
      Width = 140
      Height = 17
      Caption = 'Regular e&xpression'
      TabOrder = 3
    end
    object chkGrepANSI: TCheckBox
      Left = 8
      Top = 92
      Width = 139
      Height = 17
      Caption = '&ANSI compatible Search'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
    end
  end
  object gbxWhere: TGroupBox
    Left = 168
    Top = 32
    Width = 161
    Height = 113
    Caption = 'Where'
    TabOrder = 2
    object rbAllFiles: TRadioButton
      Left = 8
      Top = 42
      Width = 145
      Height = 17
      Caption = 'All files in &project'
      TabOrder = 1
      OnClick = rbDirectoriesClick
    end
    object rbOpenFiles: TRadioButton
      Left = 8
      Top = 66
      Width = 145
      Height = 17
      Caption = '&Open files in JediEditor'
      Checked = True
      TabOrder = 2
      TabStop = True
      OnClick = rbDirectoriesClick
    end
    object rbDirectories: TRadioButton
      Left = 7
      Top = 88
      Width = 145
      Height = 17
      Caption = 'Search in &directories'
      TabOrder = 3
      OnClick = rbDirectoriesClick
    end
    object rbCurrentOnly: TRadioButton
      Left = 8
      Top = 20
      Width = 145
      Height = 17
      Caption = 'Current &file only'
      TabOrder = 0
      OnClick = rbDirectoriesClick
    end
  end
  object gbxDirectories: TGroupBox
    Left = 0
    Top = 152
    Width = 329
    Height = 89
    Caption = 'Search Directory Options'
    TabOrder = 3
    object lblDirectory: TLabel
      Left = 8
      Top = 22
      Width = 42
      Height = 13
      Caption = 'Di&rectory'
      FocusControl = cbDirectory
    end
    object lblMasks: TLabel
      Left = 8
      Top = 48
      Width = 49
      Height = 13
      Caption = 'File mas&ks'
      FocusControl = cbMasks
    end
    object sbVCL: TSpeedButton
      Left = 263
      Top = 18
      Width = 21
      Height = 21
      Hint = 'VCL Directory'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00666666666600
        0886666686666833308866688866633333086900888833333308699908883B33
        3336699990083BB333366999111068BB33666991111666333666699116668888
        866669166666CCC0886666666664CCCC08666666666CCCCC08666666666CCCCC
        08666666666CCCCC08666666666CCCCC466666666666EEEEE666}
      ParentShowHint = False
      ShowHint = True
      OnClick = sbVCLClick
    end
    object sbRTL: TSpeedButton
      Left = 284
      Top = 18
      Width = 21
      Height = 21
      Hint = 'RTL Directory'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00600000000006
        66660BFBFBFBFB00000060B33B33B0FFFFF060F33F33F0FFFFF060B33B33B0FF
        FFF06083383380FFFFF00FFBBBBBBB0FFFF0600FFBBB00FFFFF066600F00FFFF
        FFF06660F0FFFFFFFFF06660FFFFFFFFFFF06660F0FF0FFFFFF06660F0F0F0FF
        00006660F0FF0FFF00066660FFFFFFFF00666660000000000666}
      ParentShowHint = False
      ShowHint = True
      OnClick = sbRTLClick
    end
    object cbMasks: TComboBox
      Left = 62
      Top = 44
      Width = 201
      Height = 21
      ItemHeight = 13
      TabOrder = 0
    end
    object chkInclude: TCheckBox
      Left = 62
      Top = 66
      Width = 177
      Height = 17
      Caption = 'Include su&bdirectories'
      TabOrder = 1
    end
    object cbDirectory: TDirectoryEdit
      Left = 63
      Top = 19
      Width = 199
      Height = 21
      NumGlyphs = 1
      TabOrder = 2
    end
  end
  object btnOK: TButton
    Left = 94
    Top = 248
    Width = 75
    Height = 25
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 4
  end
  object btnCancel: TButton
    Left = 174
    Top = 248
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 5
  end
  object btnHelp: TButton
    Left = 254
    Top = 248
    Width = 75
    Height = 25
    Caption = '&Help'
    TabOrder = 6
  end
  object FormStorage: TFormStorage
    StoredProps.Strings = (
      'rbAllFiles.Checked'
      'rbCurrentOnly.Checked'
      'rbDirectories.Checked'
      'rbOpenFiles.Checked'
      'chkRegEx.Checked'
      'chkGrepANSI.Checked'
      'chkInclude.Checked'
      'chkNoCase.Checked'
      'chkNoComments.Checked'
      'cbDirectory.Text'
      'cbMasks.Text'
      'chkWholeWord.Checked')
    StoredValues = <>
    Left = 127
    Top = 47
  end
end