WDR Computer Club Digital 1998 March/CC9803-2.BIN/SHARE/95CHGNAM/_SETUP.1/Chgname.exe/0/RCDATA/TNAME/TNAME.txt

Text File | 1998-01-23 | 10KB | 379 lines

object Name: TName
  Left = 186
  Top = 279
  HelpContext = 3
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 'File names'
  ClientHeight = 369
  ClientWidth = 505
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel2: TBevel
    Left = 8
    Top = 168
    Width = 489
    Height = 157
    Style = bsRaised
  end
  object Bevel3: TBevel
    Left = 384
    Top = 0
    Width = 113
    Height = 161
    Style = bsRaised
  end
  object Label2: TLabel
    Left = 16
    Top = 8
    Width = 77
    Height = 13
    Caption = 'Target directory:'
  end
  object Label3: TLabel
    Left = 16
    Top = 176
    Width = 67
    Height = 13
    Caption = 'New filename:'
  end
  object Label4: TLabel
    Left = 400
    Top = 8
    Width = 22
    Height = 13
    Caption = 'Start'
  end
  object Label5: TLabel
    Left = 400
    Top = 112
    Width = 29
    Height = 13
    Caption = 'Digits:'
  end
  object Label1: TLabel
    Left = 400
    Top = 60
    Width = 25
    Height = 13
    Caption = 'Step:'
  end
  object Label6: TLabel
    Left = 16
    Top = 216
    Width = 73
    Height = 13
    Caption = 'New extension:'
  end
  object Bevel1: TBevel
    Left = 8
    Top = 0
    Width = 369
    Height = 161
    Style = bsRaised
  end
  object DriveComboBox1: TDriveComboBox
    Left = 16
    Top = 24
    Width = 209
    Height = 19
    TabOrder = 1
    OnChange = DriveComboBox1Change
  end
  object DirectoryListBox1: TDirectoryListBox
    Left = 16
    Top = 48
    Width = 209
    Height = 105
    ItemHeight = 16
    ParentShowHint = False
    ShowHint = False
    TabOrder = 2
  end
  object CheckBox2: TCheckBox
    Left = 16
    Top = 260
    Width = 105
    Height = 17
    Caption = 'Change file name'
    ParentShowHint = False
    ShowHint = False
    TabOrder = 10
  end
  object Edit1: TEdit
    Left = 16
    Top = 192
    Width = 473
    Height = 21
    ParentShowHint = False
    ShowHint = False
    TabOrder = 8
  end
  object SpinEdit2: TSpinEdit
    Left = 400
    Top = 128
    Width = 73
    Height = 22
    MaxValue = 9
    MinValue = 1
    ParentShowHint = False
    ShowHint = False
    TabOrder = 7
    Value = 1
  end
  object SpinEdit1: TSpinEdit
    Left = 400
    Top = 24
    Width = 73
    Height = 22
    MaxValue = 9999999
    MinValue = 0
    ParentShowHint = False
    ShowHint = False
    TabOrder = 5
    Value = 1
  end
  object SpinEdit3: TSpinEdit
    Left = 400
    Top = 76
    Width = 73
    Height = 22
    MaxValue = 1000
    MinValue = 1
    ParentShowHint = False
    ShowHint = False
    TabOrder = 6
    Value = 1
  end
  object Edit2: TEdit
    Left = 16
    Top = 232
    Width = 225
    Height = 21
    ParentShowHint = False
    ShowHint = False
    TabOrder = 9
  end
  object CheckBox3: TCheckBox
    Left = 16
    Top = 280
    Width = 105
    Height = 17
    Caption = 'Change extension'
    ParentShowHint = False
    ShowHint = False
    TabOrder = 12
  end
  object RadioGroup1: TRadioGroup
    Left = 240
    Top = 8
    Width = 129
    Height = 73
    Caption = 'File transportation'
    Items.Strings = (
      'Move files'
      'Leave files'
      'Copy files')
    TabOrder = 3
  end
  object CheckBox4: TCheckBox
    Left = 128
    Top = 260
    Width = 97
    Height = 17
    Caption = 'Enumerate files'
    ParentShowHint = False
    ShowHint = False
    TabOrder = 11
  end
  object BitBtn1: TBitBtn
    Left = 260
    Top = 336
    Width = 105
    Height = 25
    Cancel = True
    Caption = '&Cancel'
    TabOrder = 18
    OnClick = BitBtn1Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333390333333333903338F3333333338F339990333333
      339033888F333333338F3399990333333903338888F3333338F3333999033333
      9033333888F333338F3333339990333993333333888F33388333333339990399
      033333333888F388F333333333999990333333333388888F3333333333399903
      33333333333888F33333333333999990333333333388888F3333333339990399
      033333333888F388F33333399990333990333338888F33388F33339999033333
      9903338888F3333388F3339990333333339033888F333333338F333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 380
    Top = 336
    Width = 105
    Height = 25
    Caption = '&OK'
    TabOrder = 0
    OnClick = BitBtn2Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000010000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      555555555555555555555555555555555555555555FF5555555555555C055555
      55555555577FF55555555555CCC05555555555557777F55555555555CCC05555
      555555557777FF555555555CCCCC05555555555777777F55555555CCCCCC0555
      5555557777777FF5555557CC05CCC05555555777757777F555557C05555CC055
      55557775555777FF55555555555CCC05555555555557777F555555555555CC05
      555555555555777FF555555555555CC05555555555555777FF5555555555557C
      05555555555555777FF5555555555557C05555555555555777FF555555555555
      5CC0555555555555577755555555555555555555555555555555}
    NumGlyphs = 2
  end
  object BitBtn3: TBitBtn
    Left = 20
    Top = 336
    Width = 105
    Height = 25
    Caption = '&Help'
    TabOrder = 17
    OnClick = BitBtn3Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
      33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
      FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
      FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
      FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
      FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
      FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
      3333333773FFFF77333333333FBFBF3333333333377777333333}
    NumGlyphs = 2
  end
  object RadioGroup2: TRadioGroup
    Left = 248
    Top = 216
    Width = 241
    Height = 49
    Caption = 'Method'
    Items.Strings = (
      'Standard (filename + file count + extension)'
      'Advanced renaming system')
    TabOrder = 15
    OnClick = RadioGroup2Click
  end
  object CheckBox5: TCheckBox
    Left = 128
    Top = 280
    Width = 97
    Height = 17
    Caption = 'Use wildcards'
    ParentShowHint = False
    ShowHint = False
    TabOrder = 13
  end
  object RadioGroup3: TRadioGroup
    Left = 240
    Top = 96
    Width = 129
    Height = 57
    Caption = 'On name conflict'
    Items.Strings = (
      'Add suffix (#1)'
      'Delete to recycle bin')
    TabOrder = 4
  end
  object RadioGroup4: TRadioGroup
    Left = 248
    Top = 272
    Width = 241
    Height = 49
    Caption = 'Character case'
    Items.Strings = (
      'Uppercase'
      'Lowercase')
    TabOrder = 16
  end
  object CheckBox1: TCheckBox
    Left = 16
    Top = 300
    Width = 105
    Height = 17
    Caption = 'Change case'
    ParentShowHint = False
    ShowHint = False
    TabOrder = 14
  end
  object BitBtn4: TBitBtn
    Left = 140
    Top = 336
    Width = 105
    Height = 25
    Caption = '&Default'
    TabOrder = 19
    OnClick = BitBtn4Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      0400000000000001000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333333330000000000000333FFFFFFFFFFFFF338888888888
      880033888888888888FF338FB7B7B7B7B80033878787878788FF38FB7B7B7B7B
      70803878787878787F8F38F7B7B7B7B780803877878787878F8F8F7B7B7B7B7B
      0880877878787878F88F8FFFFFFFFFF80780877777777778F78F888888888888
      8B80888888888888888F38F7B7B7B7B7B780387787878787878F38FB7B7B7FFF
      FF80387878787777778F38F7B7B7F88888833877878778888883338FFFFF8333
      3333338777778333333333388888333333333338888833333333333333333333
      3333333333333333333333333333333333333333333333333333}
    NumGlyphs = 2
  end
  object MainMenu1: TMainMenu
    Left = 424
    Top = 280
    object Quick1: TMenuItem
      Caption = '&Quick Settings'
      object Resetall1: TMenuItem
        Caption = '&Reset all'
        OnClick = Resetall1Click
      end
      object Resetnames1: TMenuItem
        Caption = 'Reset &names'
        OnClick = Resetnames1Click
      end
      object Resetdates1: TMenuItem
        Caption = 'Reset &dates'
        OnClick = Resetdates1Click
      end
      object Resetattributes1: TMenuItem
        Caption = 'Reset &attributes'
        OnClick = Resetattributes1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Open1: TMenuItem
        Caption = '&Open'
        OnClick = Open1Click
      end
      object Saveas1: TMenuItem
        Caption = '&Save as'
        OnClick = Saveas1Click
      end
    end
  end
end