Freelog 7/Freelog007.iso/BAS/Fichiers/Replace/Replace.exe/0/RCDATA/TFORM_REPLACE/TFORM_REPLACE.txt

Text File | 1999-06-09 | 12KB | 422 lines

object Form_Replace: TForm_Replace
  Left = 404
  Top = 222
  Width = 439
  Height = 237
  Caption = 'Replace'
  Color = clBtnFace
  Constraints.MaxHeight = 237
  Constraints.MinHeight = 237
  Constraints.MinWidth = 439
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  ShowHint = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel_Pagecontrol: TPanel
    Left = 0
    Top = 0
    Width = 321
    Height = 210
    Align = alLeft
    Anchors = [akLeft, akTop, akRight, akBottom]
    BevelOuter = bvNone
    TabOrder = 0
    object PageControl_Replace: TPageControl
      Left = 10
      Top = 15
      Width = 311
      Height = 182
      ActivePage = TabSheet_NameLocation
      Anchors = [akLeft, akTop, akRight, akBottom]
      HotTrack = True
      TabOrder = 0
      object TabSheet_NameLocation: TTabSheet
        Caption = 'Name and location'
        OnShow = TabSheet_NameLocationShow
        object Label_Named: TLabel
          Left = 8
          Top = 24
          Width = 37
          Height = 13
          Caption = '&Named:'
          FocusControl = Edit_Named
        end
        object Label_Replace: TLabel
          Left = 8
          Top = 56
          Width = 43
          Height = 13
          Caption = '&Replace:'
          FocusControl = Edit_Replace
        end
        object Label_With: TLabel
          Left = 168
          Top = 56
          Width = 25
          Height = 13
          Anchors = [akTop, akRight]
          Caption = '&With:'
          FocusControl = Edit_With
        end
        object Label_Lookin: TLabel
          Left = 8
          Top = 88
          Width = 38
          Height = 13
          Caption = '&Look in:'
          FocusControl = Edit_Lookin
        end
        object CheckBox_LowerMaps: TCheckBox
          Left = 24
          Top = 120
          Width = 121
          Height = 17
          Hint = 'Check this box if you also want to search through subfolders.'
          Caption = '&Include subfolders'
          TabOrder = 5
        end
        object Edit_Named: TEdit
          Left = 72
          Top = 20
          Width = 217
          Height = 21
          Hint = 'Enter a mask for files to search for.'
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 0
        end
        object Edit_Replace: TEdit
          Left = 72
          Top = 52
          Width = 81
          Height = 21
          Hint =
            'Enter the substring to search for in the filename of the found f' +
            'iles.'
          TabOrder = 1
        end
        object Edit_With: TEdit
          Left = 208
          Top = 52
          Width = 81
          Height = 21
          Hint =
            'Enter the substring to replace the search-string with in the fil' +
            'ename of the found files.'
          Anchors = [akTop, akRight]
          TabOrder = 2
        end
        object Edit_Lookin: TEdit
          Left = 72
          Top = 84
          Width = 217
          Height = 21
          Hint = 'Enter the folder to search in.'
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 3
          OnChange = Edit_LookinChange
        end
        object Button_Browse: TButton
          Left = 216
          Top = 118
          Width = 75
          Height = 21
          Hint = 'Browse through your folders.'
          Anchors = [akTop, akRight]
          Caption = '&Browse...'
          TabOrder = 4
          OnClick = Button_BrowseClick
        end
        object CheckBox_Sensitive: TCheckBox
          Left = 24
          Top = 136
          Width = 137
          Height = 17
          Hint =
            'Check this box if you want to search case sensitive for filename' +
            's.'
          Caption = 'Search &case sensitive'
          TabOrder = 6
        end
      end
      object TabSheet_Attributes: TTabSheet
        Caption = 'Attributes'
        ImageIndex = 1
        object Label_Readonly: TLabel
          Left = 8
          Top = 40
          Width = 48
          Height = 13
          Caption = '&Read only'
          FocusControl = CheckBox_ReadOnly_Set
        end
        object Label_Hidden: TLabel
          Left = 8
          Top = 64
          Width = 34
          Height = 13
          Caption = '&Hidden'
          FocusControl = CheckBox_Hidden_Set
        end
        object Label_Archive: TLabel
          Left = 8
          Top = 88
          Width = 36
          Height = 13
          Caption = 'Ar&chive'
          FocusControl = CheckBox_Archief_Set
        end
        object Label_System: TLabel
          Left = 8
          Top = 112
          Width = 34
          Height = 13
          Caption = 'S&ystem'
          FocusControl = CheckBox_System_Set
        end
        object Label_Set: TLabel
          Left = 80
          Top = 16
          Width = 16
          Height = 13
          Caption = 'Set'
        end
        object Label_Clear: TLabel
          Left = 128
          Top = 16
          Width = 24
          Height = 13
          Caption = 'Clear'
        end
        object CheckBox_ReadOnly_Set: TCheckBox
          Left = 80
          Top = 38
          Width = 17
          Height = 17
          TabStop = False
          TabOrder = 0
          OnClick = CheckBox_ReadOnly_SetClick
        end
        object CheckBox_Hidden_Set: TCheckBox
          Left = 80
          Top = 62
          Width = 17
          Height = 17
          TabStop = False
          TabOrder = 2
          OnClick = CheckBox_Hidden_SetClick
        end
        object CheckBox_Archief_Set: TCheckBox
          Left = 80
          Top = 86
          Width = 17
          Height = 17
          TabStop = False
          TabOrder = 4
          OnClick = CheckBox_Archief_SetClick
        end
        object CheckBox_System_Set: TCheckBox
          Left = 80
          Top = 110
          Width = 17
          Height = 17
          TabStop = False
          TabOrder = 6
          OnClick = CheckBox_System_SetClick
        end
        object CheckBox_ReadOnly_Clear: TCheckBox
          Left = 128
          Top = 38
          Width = 17
          Height = 17
          TabStop = False
          TabOrder = 1
          OnClick = CheckBox_ReadOnly_ClearClick
        end
        object CheckBox_Hidden_Clear: TCheckBox
          Left = 128
          Top = 62
          Width = 17
          Height = 17
          TabStop = False
          TabOrder = 3
          OnClick = CheckBox_Hidden_ClearClick
        end
        object CheckBox_Archief_Clear: TCheckBox
          Left = 128
          Top = 86
          Width = 17
          Height = 17
          TabStop = False
          TabOrder = 5
          OnClick = CheckBox_Archief_ClearClick
        end
        object CheckBox_System_Clear: TCheckBox
          Left = 128
          Top = 110
          Width = 17
          Height = 17
          TabStop = False
          TabOrder = 7
          OnClick = CheckBox_System_ClearClick
        end
      end
      object Tabsheet_Case: TTabSheet
        Caption = 'Case'
        ImageIndex = 2
        object RadioGroup_ChangeCase: TRadioGroup
          Left = 16
          Top = 16
          Width = 273
          Height = 121
          Anchors = [akLeft, akTop, akRight, akBottom]
          Caption = 'Select Case'
          ItemIndex = 3
          Items.Strings = (
            '&Titlecase (Default Example.exe)'
            '&Lowercase (default example.exe)'
            '&Uppercase (DEFAULT EXAMPLE.EXE)'
            'Do ¬ change case')
          TabOrder = 0
        end
      end
      object TabSheet_ReplaceInFiles: TTabSheet
        Caption = 'Replace in files'
        ImageIndex = 3
        object Label_ZoekInFiles: TLabel
          Left = 8
          Top = 24
          Width = 43
          Height = 13
          Caption = '&Replace:'
          FocusControl = Edit_ReplaceInFile
        end
        object Label_ReplaceInFiles: TLabel
          Left = 8
          Top = 56
          Width = 25
          Height = 13
          Caption = '&With:'
          FocusControl = Edit_WithInFile
        end
        object CheckBox_CaseSensitive: TCheckBox
          Left = 24
          Top = 120
          Width = 137
          Height = 17
          Caption = 'Search &case sensitive'
          TabOrder = 2
        end
        object Edit_ReplaceInFile: TEdit
          Left = 72
          Top = 20
          Width = 217
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 0
        end
        object Edit_WithInFile: TEdit
          Left = 72
          Top = 52
          Width = 217
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          TabOrder = 1
        end
      end
    end
  end
  object Button_Replace: TButton
    Left = 332
    Top = 33
    Width = 87
    Height = 21
    Hint = 'Start the replace process.'
    Anchors = [akTop, akRight]
    Caption = 'R&eplace'
    TabOrder = 1
    OnClick = Button_ReplaceClick
  end
  object Button_Stop: TButton
    Left = 332
    Top = 62
    Width = 87
    Height = 21
    Hint = 'Stop the current replace process.'
    Anchors = [akTop, akRight]
    Caption = '&Stop'
    TabOrder = 2
    OnClick = Button_StopClick
  end
  object Button_Again: TButton
    Left = 332
    Top = 91
    Width = 87
    Height = 21
    Hint = 'Reset all values.'
    Anchors = [akTop, akRight]
    Caption = 'Replace &again'
    TabOrder = 3
    OnClick = Button_AgainClick
  end
  object AnimateReplace: TAnimate
    Left = 352
    Top = 118
    Width = 48
    Height = 50
    Active = False
    Anchors = [akTop, akRight]
    CommonAVI = aviFindFile
    StopFrame = 23
  end
  object BitBtnInfo: TBitBtn
    Left = 302
    Top = 16
    Width = 19
    Height = 19
    Hint = 'About'
    Anchors = [akTop, akRight]
    TabOrder = 5
    OnClick = BitBtnInfoClick
    Glyph.Data = {
      9E020000424D9E0200000000000036000000280000000E0000000E0000000100
      18000000000068020000120B0000120B000000000000000000000000FF0000FF
      0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000
      FF0000FF00000000FF0000FF0000FF0000FF8000008000008000008000008000
      000000FF0000FF0000FF0000FF0000FF00000000FF0000FF0000FF8000008000
      00FFFFFFFFFFFFFFFFFF8000008000000000FF0000FF0000FF0000FF00000000
      FF0000FF800000800000800000800000FFFFFFFF000080000080000080000000
      00FF0000FF0000FF00000000FF800000800000800000800000800000FFFFFFFF
      00008000008000008000008000000000FF0000FF000080000080000080000080
      0000800000800000FFFFFFFF00008000008000008000008000008000000000FF
      0000800000800000800000800000800000800000FFFFFFFF0000800000800000
      8000008000008000000000FF0000800000800000800000800000800000800000
      FFFFFFFF00008000008000008000008000008000000000FF0000800000800000
      800000800000800000800000FFFFFFFF00008000008000008000008000008000
      000000FF0000800000800000800000800000800000800000FFFFFFFF00008000
      008000008000008000008000000000FF00000000FF8000008000008000008000
      00FFFFFFFFFFFFFF00008000008000008000008000000000FF0000FF00000000
      FF0000FF80000080000080000080000080000080000080000080000080000000
      00FF0000FF0000FF00000000FF0000FF0000FF800000800000800000FFFFFFFF
      00008000008000000000FF0000FF0000FF0000FF00000000FF0000FF0000FF00
      00FF8000008000008000008000008000000000FF0000FF0000FF0000FF0000FF
      0000}
  end
  object RzSelDirDialog: TRzSelDirDialog
    Caption = 'Select a Directory'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Left = 200
    Top = 152
  end
end