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

Text File | 1998-01-23 | 35KB | 863 lines

object MainForm: TMainForm
  Left = 255
  Top = 106
  Width = 566
  Height = 408
  HelpContext = 1
  Caption = 'Chgname 5.1'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIForm
  Icon.Data = {<image000.ico>}
  Menu = MainMenu1
  Position = poDefault
  WindowMenu = Windows1
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object ToolbarPanel: TPanel
    Left = 0
    Top = 0
    Width = 558
    Height = 40
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object Bevel3: TBevel
      Left = 334
      Top = 2
      Width = 19
      Height = 36
      Shape = bsLeftLine
    end
    object Bevel4: TBevel
      Left = 411
      Top = 2
      Width = 22
      Height = 36
      Shape = bsLeftLine
    end
    object Bevel1: TBevel
      Left = 40
      Top = 2
      Width = 36
      Height = 36
      Shape = bsLeftLine
    end
    object Bevel2: TBevel
      Left = 152
      Top = 2
      Width = 25
      Height = 36
      Shape = bsLeftLine
    end
    object SpeedButton1: TSpeedButton
      Tag = 1
      Left = 2
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Start processing'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777771777777
        7777700088887777777733383717777777700999088887777777777F83717777
        700999991088887777773337F8371770099999991108888777777783F3871009
        9999999911108888777777787F8719999999999911110888877777737F771999
        9999999911110888877777778F8710099999999911110888777777073F871770
        0999999911110877777777073F371FF770999999111107777777770773F8718F
        F7099999111107777777770783737718F709999911110777777770F7F37F8718
        8F70999911110777777770F7737F83818F7099991111077777770F087F37F813
        8F7099991111077777770F0887F383318F7009991111077007770F0088331133
        8F7009991111070800770F0008833318F70809991111008708070F0000888338
        F7080999111108707F800F000008888F708809911111070707F070F00000880F
        7088099111110077707070F0000000FF077099F1111107777707770FF0000F00
        8F7099F111107777777777000FFFF087F0099F11111077777777777070000800
        0999F11111107777777777770999999999FF9911110777777777777770F99999
        FF9999911107777777777777770FFFFF99F99999107777777777777777701199
        999F99990777777777777777777701119999F900777777777777777777777001
        1999007777777777777777777777777000007777777777777777}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton2: TSpeedButton
      Tag = 2
      Left = 44
      Top = 2
      Width = 36
      Height = 36
      Hint = 'New file list'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5555555555555555555555555555555500000000000000000555555555555550
        88888888888888888055555555555507777777777777777788055555555550FF
        FFFFFFFFFFFFFFF77805555555555077777777777FFFFFFF7805555555555088
        8888888888888888780555555555507777777777777FFFFF7805555555555077
        77777777777FFFFF780555555555508888888888888888887805555555555077
        777777777777FFFF7805550000000000000000007777FFFF7805506666666666
        6666666608888888780550E7E7E7E7E7E7E7E7E607777FFF7805507E7E7E7E7E
        7E7E7E7E60777FFF78055507E7E7E7E7E7E7E7E7608888887805550E7E7E7E7E
        7E7E7E7E760777FF78055550E7E7E7E7E7E7E7E7E60777FF780555507E7E7E7E
        7E7E7E7E7E6088887805555507E7E7E7E7E7E7E7E760777F780555550E7E7E7E
        7E7E7E7E7E76077F7805555550E7E7E7E7E7E7E7E7E6088878055555507E7E00
        000000007E7E6077780555555507E7E7E7E7E7E7E7E7607778055555550E7E70
        000000000E7E7607780555555550E7E7E7E7E7E7E7E7E6077805555555507E7E
        7E7E7E7E7E7E7E6078055555555507E7E7E7E7E7E7E7E7607805555555550E0E
        707E0E707E0E7076005555555555505005005005005005000555555555555500
        5005005005005005555555555555555555555555555555555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton3: TSpeedButton
      Tag = 3
      Left = 79
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Open file list'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5555555555555555555555555555555555555555555555555555555555555555
        5555555555555555555555555555555555555555555555555555555555555000
        0000000000000000000555555555000000000000000000000000555555500333
        3000000000077700330055555550033330000000000777003300555555500C33
        3000000000077700330055555550CC33300000000007770033005555555CCC33
        30000000000777003300555555CCCC333000000000000000330055555CCCC333
        300000000000000033005555CCCC033333333333333333333300555CCCC00333
        3333333333333333330055CCCC500333300000000000003333005CCCCCCCCCCC
        CCCCCCC0000000033300CCCCCCCCCCCCCCCCCCC77777770033005CCCCCCCCCCC
        CCCCCCC777777700330055CCCC50033007777777777777003300555CCCC00330
        077777777777770033005555CCCC03300777777777777700330055555CCCC330
        07777777777777003300555555CCCC30077777777777770000005555555CCC30
        0777777777777700000055555550CC3007777777777777005500555555500C30
        0777777777777700550055555550000000000000000000000000555555550000
        0000000000000000000555555555555555555555555555555555555555555555
        5555555555555555555555555555555555555555555555555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton4: TSpeedButton
      Tag = 4
      Left = 114
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Save file list'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5555555555555555555555555555555555555555555555555555555555555555
        5555555555555555555555555555555555555555555555555555555555555000
        0000000000000000000555555555000000000000000000000000555555500333
        3000000000077700330055555550033330000000000777003300555555500933
        3000000000077700330055555550099330000000000777003300555555500999
        3000000000077700330055555550099990000000000000003300555555500399
        9900000000000000330055555550033999933333333333333300555555500333
        9999333333333333330055555550033339999000000000333300999999999999
        9999990000000003330099999999999999999997777777003300999999999999
        9999997777777700330055555550033009999777777777003300555555500330
        9999777777777700330055555550033999977777777777003300555555500399
        9977777777777700330055555550099997777777777777000000555555500999
        0777777777777700000055555550099007777777777777005500555555500930
        0777777777777700550055555550000000000000000000000000555555550000
        0000000000000000000555555555555555555555555555555555555555555555
        5555555555555555555555555555555555555555555555555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton5: TSpeedButton
      Tag = 5
      Left = 156
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Search for and add files to file list'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        55555555555555500055555555555555555555555555554CEC05550000000000
        00000000000004CEEC055587777777777777777777774CEECC05558FFFFFFFFF
        FFFFFFFFFFF4CEECC055558FFFFFFFFFFFFFFFFFFF4CEECC0555558FFFFFFFFF
        FFFFFFFFF4CEECC05555558FFF777777777777774CEECC055555558FFFFFFFFF
        F0000008FFF8C0055555558FFF777770066666600F8807055555558FFFFFFF8F
        EFEFEFE66080F7055555558FFF77787EF00000FE660FF7055555558FFFFFF8EF
        00EFE00FE60FF7055555558FFF778EF00EFEFEFEFE60F7055555558FFFFF8FE0
        0FEFEFEFEF60F7055555558FFF778EF00EFEFEFEFE60F7055555558FFFFF8FE0
        0FEFEFEFEF60F7055555558FFF778EF00EFEFEFEFE60F7055555558FFFFFF8E0
        0FEFEFEFEF0FF7055555558FFF7778FE00FEF00EF60FF7055555558FFFFFFF8F
        E00000EF60FFF7055555558FFFFFFFF88FFEFEF00FFFF7055555558FFFFFFFFF
        F888880FFFFFF7055555558FFF7777777777FFFFFFFFF7055555558FFFFFFFFF
        FFFFFFF8000000055555558FFFFFFFFFFFFFFFF8FFF780555555558FFFFFFFFF
        FFFFFFF8FF7805555555558FFFFFFFFFFFFFFFF8F78055555555558FFFFFFFFF
        FFFFFFF8780555555555558FFFFFFFFFFFFFFFF8805555555555558FFFFFFFFF
        FFFFFFF805555555555555888888888888888888555555555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton6: TSpeedButton
      Tag = 6
      Left = 191
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Add files to file list'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5555555555000555555555555555555555555555008B00555555555555555555
        555555008B730085555555555555555555550037BFB800885555555555555555
        550037B7FB73808885555555555555550037BFB7B7B880088855555555555500
        3FB7BFBFB7B88008888555555555003FB7BFBFB7BFB870088888555555003FB7
        BFBFB7B7BFB8B0088885555550B7B7BFBFB7BFBFB738B0088555555550BFB7BF
        B7BFBFB7B737B8085555555550BFB7BFBFB7BFB7B78FB8305555555507BFB7BF
        BBFB7BFBFB8BB830555555550BFBFBBBFB7BFBFB7B8BB810555555550BFB7B7B
        FB7BFB7BFB8BB718055555507BFBFBFBFB7BFB7BFB87778805555550FBFBFBF7
        BFBFB7BBB7777F0805555550FFBFBF7BF7BFB77BF8777708805555CCFFBFFBFB
        FBFBFFBFB8F7F78880555CCCCFBFFBFBFBBF7B73877FFF888055CCCCCCBFFFCC
        CCCCCCC77FFFFF888055CCCCCCCFFBCCCCCCCCCFFFFFFF883805CCCCCCCCFFBC
        CCCCCCCFFFFFFF88370550CCCCCCC387CCCCCCCFFFFF8883780550FCCCCCCC7C
        CCCCCCCFF788B8737B0550FFCCCCCCCCCCCCCCC888B7373770550800FCCCCCCC
        CCCFCCC377B37B737055005555CCCCCCCC788CC300377B8005555555550CCCCC
        C887B8005500000555555555550FCCC073780055555555555555555555080050
        8300555555555555555555555500555000555555555555555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton7: TSpeedButton
      Tag = 7
      Left = 226
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Unlist files from file list'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5555555555000555555555555555555555555555008B00555555555555555555
        555555008B730085555555555555555555550037BFB800885555555555555555
        550037B7FB73808885555555555555550037BFB7B7B880088855555555555500
        3FB7BFBFB7B88008888555555595003FB7BFBFB7BFB870088888555559993FB7
        BFBFB7B7BFB8B00888855555999997BFBFB7BFBFB738B00885555559999999BF
        B7BFBFB7B737B808555555999999999FBFB7BFB7B78FB8305555599999999999
        BBFB7BFBFB8BB83055559999999999999B7BFBFB7B8BB8105555555599999B7B
        FB7BFB7BFB8BB7180555555099999BFBFB7BFB7BFB8777880555555099999BF7
        BFBFB7BBB7777F080555555099999F7BF7BFB77BF87777088055555099999BFB
        FBFBFFBFB8F7F7888055550F999999FBFBBF7B73877FFF888055550F99999999
        FFBF88877FFFFF888055550F99999999B787777FFFFFFF88380550FFF9999999
        8F7FFFFFFFFFFF88370550FFFF999999FFFFFFFFFFFF8883780550FFBFF99999
        FFFFFFFFF788B8737B0550FF0008FFFFFFFFFFF888B7373770550800F50FFFFF
        FFFFF88377B37B7370550055550FFFFFFFF88B7300377B8005555555550FFFFF
        FF87B8005500000555555555550FF70073780055555555555555555555080050
        8300555555555555555555555500555000555555555555555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton8: TSpeedButton
      Tag = 8
      Left = 261
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Select all files in file list'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5555555555555555555555555555555559999999555555555555555555555559
        9999999999555555555555555555599995555555999955555555555555599995
        5555555555999955555555555999955555555555555599995555555559955555
        5559999555555599555555559955555559999999955555599555555599555559
        9995555999955559955555599555599995555555599555559955555995555995
        5555555555995555995555995555995555599995559955555995559955559955
        5999999995599555599559955559955559955559955995555995599555599555
        9955555599559955599559955599555599599555995599555995599555995559
        9559955599559955599559955599555995599999995599555995599555995559
        9555599955599555599559955599555995555555555995559955599555599555
        9955555555995555995559955559955599995555999955599555559955559955
        5599999999555559955555995555995555559999555555995555555995555995
        5555555555555999555555599555599995555555555999555555555599555559
        9995555559999555555555559995995559999999999555555555555559999955
        5559999995555555555555555599995555555555555555555555555559999955
        5555555555555555555555555999995555555555555555555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton9: TSpeedButton
      Tag = 9
      Left = 296
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Unlist all files in file list'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555500000
        0000000000000555555555555508777777778888888880555555555555087FF7
        7777777888888055555555555508777778777887888880555555555550877777
        7877788878088805555555555087777778777888780888055555555550877777
        7877788877808805555555550877777787777788878088805555555508777777
        8777778887708880555555508777777877777778887808880555555087777FF8
        77F77778887808880555555087777FF877FF7778887808880555555087777FF8
        77FFF778887808880555555087777FF877FFFF78887808880555555087777FF8
        77FFFF78887808880555555087777FF877FFFF78887808880555555087777FF8
        77FFFF78887808880555555087777FF877FFFF78887808880555555087777FF8
        77FFFF78887808880555555087777FF877FFFF788878088805555555087777FF
        877FF78887808880555555550877777F8777778887808880555555555087777F
        F877788878088805555555555087777FF877788878088805555555555508777F
        F7877787788880555555555555087FFFF7777777788880555555555555087777
        7777777788888055555555555000000000000000000000055555555550888777
        F777788888888805555555555500000000000000000000555555555555555555
        0877788055555555555555555555555550000005555555555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton10: TSpeedButton
      Tag = 10
      Left = 338
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Move files up'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555559559
        5595959559559555555555555555595595959595955955555555555555555595
        9595959595955555555555555555559595959595959555555555555555555555
        5555555555555555555555555555555000000000005555555555555555555504
        4444444444055555555555555555550FCCCCCCCCC4055555555555555555550F
        CCCCCCCCC4055555555555555555550FCCCCCCCCC4055555555555555555550F
        CCCCCCCCC4055555555555555555550FCCCCCCCCC4055555555555555555550F
        CCCCCCCCC4055555555555555555550FCCCCCCCCC4055555555555555555550F
        CCCCCCCCC4055555555555555555550FCCCCCCCCC4055555555555555555550F
        CCCCCCCCC4055555555555000000000FCCCCCCCCC40000000055550444444444
        CCCCCCCCC444444440555550FCCCCCCCCCCCCCCCCCCCCC44055555550FCCCCCC
        CCCCCCCCCCCCC4405555555550FCCCCCCCCCCCCCCCCC440555555555550FCCCC
        CCCCCCCCCCC44055555555555550FCCCCCCCCCCCCC4405555555555555550FCC
        CCCCCCCCC440555555555555555550FCCCCCCCCC44055555555555555555550F
        CCCCCCC4405555555555555555555550FCCCCC44055555555555555555555555
        0FCCC44055555555555555555555555550FC4405555555555555555555555555
        550F405555555555555555555555555555500555555555555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton11: TSpeedButton
      Tag = 11
      Left = 373
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Move files down'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5550055555555555555555555555555555044055555555555555555555555555
        50444405555555555555555555555555044CC440555555555555555555555550
        44CCCC440555555555555555555555044CCCCCC4405555555555555555555044
        CCCCCCCC44055555555555555555044CCCCCCCCCC440555555555555555044CC
        CCCCCCCCCC4405555555555555044CCCCCCCCCCCCCC44055555555555044CCCC
        CCCCCCCCCCCC440555555555044CCCCCCCCCCCCCCCCCC4405555555044CCCCCC
        CCCCCCCCCCCCCC4405555504FFFFFFFFCCCCCCCCC4FFFFFF405555000000000F
        CCCCCCCCC4000000005555555555550FCCCCCCCCC4055555555555555555550F
        CCCCCCCCC4055555555555555555550FCCCCCCCCC4055555555555555555550F
        CCCCCCCCC4055555555555555555550FCCCCCCCCC4055555555555555555550F
        CCCCCCCCC4055555555555555555550FCCCCCCCCC4055555555555555555550F
        CCCCCCCCC4055555555555555555550FCCCCCCCCC4055555555555555555550F
        CCCCCCCCC4055555555555555555550FFFFFFFFFF40555555555555555555550
        0000000000555555555555555555555555555555555555555555555555555595
        9595959595955555555555555555559595959595959555555555555555555955
        9595959595595555555555555555955955959595595595555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton12: TSpeedButton
      Tag = 12
      Left = 415
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Set options'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555155555551
        1555555555555555555555991555555991115555555555555555559991555559
        9999555555555555555555559915555991555555555555555555555559155559
        9155555555555555555555555599111991555555555555555555555555999999
        9915555555555555555555555555955999151111111115555555555551559159
        9915999999999115555555559915991999159999155559955555555599155991
        9915115599555559955555559915599199199915991555599155555559155559
        9999555599915555999555555911555999955555999155555995511155599999
        9995995559995555599199991155999999159915599955555999555559155559
        9995991555995555599955555591555999959915559915555999555555915599
        9995991555991555599955555599559999955991559915555999555555995599
        1991559955999555599555515559199915915555999991199955559915591991
        5591555555999999955555991559199155995555555555555555559915559991
        5559555555555555555555991555999555595555555555555555559915559995
        5559155555555555555555591555991555591555555555555555555599999915
        5559155555555555555555555999995555559155555555555555555555555555
        5555995555555555555555555555555555555915555555555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton13: TSpeedButton
      Tag = 13
      Left = 450
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Reset options'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF005C5155555551
        155555555555555555C5CCC91555555991115555555555555CCC5CCC91555559
        9999555555555555CCC555CCC9155559915555555555555CCC55555CCC155559
        91555555555555CCC5555555CCC911199155555555555CCC555555555CCC9999
        991555555555CCC55555555555CCC55999151111111CCC5555555555515CCC59
        9915999999CCC115555555559915CCC9991599991CCC59955555555599155CCC
        99151155CCC5555995555555991559CCC919991CCC155559915555555915555C
        CC9955CCC99155559995555559115559CCC55CCC999155555995511155599999
        9CCCCCC559995555599199991155999999CCCC15599955555999555559155559
        99CCCC155599555559995555559155599CCCCCC5559915555999555555915599
        CCC59CCC55991555599955555599559CCC9559CCC599155559995555559955CC
        C991559CCC9995555995555155591CCC15915555CCC99119995555991559CCC1
        559155555CCC999995555599155CCC915599555555CCC5555555559915CCC991
        55595555555CCC55555555991CCC9995555955555555CCC555555599CCC59995
        5559155555555CCC5555555CCC55991555591555555555CCC55555CCC9999915
        555915555555555CCC555CCC599999555555915555555555CCC5CCC555555555
        55559955555555555CCC5C5555555555555559155555555555C5}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton14: TSpeedButton
      Tag = 14
      Left = 485
      Top = 2
      Width = 36
      Height = 36
      Hint = 'Edit file list as text'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5555555555555555555555555550555555555555555555555555500000550055
        00000000000000000005500000050B00550000000000000000055555555550BB
        005555555555555555555555555550BBBB00555555555555555555555555550B
        B033055555555555555555555555550B03333055555555555555500000000050
        3333330500000000000550000000000503333330500000000005555555555555
        5033333305555555555555555555555555033333305555555555555555555555
        5550333333055555555555555555555555550333333055555555500000000000
        0000503333330500000550000000000000000503333330500005555555555555
        5555555033333305555555555555555555555555033333305555555555555555
        5555555550333333055555555555555555555555550333330055500000000000
        0000000000503330990550000000000000000000000503099990555555555555
        5555555555555009999055555555555555555555555555099905555555555555
        5555555555555550005555555555555555555555555555555555500000000000
        0000000000000000000550000000000000000000000000000005555555555555
        5555555555555555555555555555555555555555555555555555555555555555
        5555555555555555555555555555555555555555555555555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
    object SpeedButton15: TSpeedButton
      Tag = 15
      Left = 520
      Top = 2
      Width = 36
      Height = 36
      Hint = 'About Chgname'
      Flat = True
      Glyph.Data = {
        76020000424D7602000000000000760000002800000020000000200000000100
        0400000000000002000000000000000000001000000010000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        500000055555555555555555555555558BBBBB30555555555555555555555558
        BBBBBBB3055555555555555555555558BBBBBBB3305555555555555555555558
        BBBBBBB33055555555555555555555558BBBBB33305555555555555555555555
        5333337330555555555555555555555300000000055555555555555555555553
        FBBBBBB3055555555555555555555553FBBBBBB3305555555555555555555553
        FBBBBBB3330555555555555555555553FBBBBBB3330555555555555555555553
        FBBBBBB33305555555555555555555553BBBBBBB330555555555555555555555
        3FBBBBBB33055555555555555555555553FBBBBBB30555555555555555555555
        553FBBBBBB30555555555555300000055553FBBBBBB30555555555553FBBBBB0
        55558BBBBBBB3055555555553FBBBBB305558BBBBBBB3305555555553FBBBBB3
        30558BBBBBBB3330555555553FBBBBB333050BBBBBBB3330555555553FBBBBBB
        3300BBBBBBBB3330555555553FBBBBBBBBBBBBBBBBBB33305555555553FBBBBB
        BBBBBBBBBBBB73305555555553FBBBBBBBBBBBBBBBB7773055555555553FBBBB
        BBBBBBBBBB777733555555555553FBBBBBBBBBBBFF7777355555555555553FFF
        FFFFFFFF77777355555555555555533F7F7F7FF7F77735555555555555555553
        37F7FF7F77335555555555555555555553333333335555555555}
      ParentShowHint = False
      ShowHint = True
      OnClick = ToolButtonClick
    end
  end
  object MainMenu1: TMainMenu
    Left = 48
    Top = 152
    object File1: TMenuItem
      Caption = '&Files'
      object Start1: TMenuItem
        Tag = 1
        Caption = '&Start renaming'
        Hint = 'Start processing'
        OnClick = ToolButtonClick
      end
      object Editmanually1: TMenuItem
        Tag = 14
        Caption = '&Edit manually'
        Hint = 'Edit file list as text'
        OnClick = ToolButtonClick
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Newfilelist1: TMenuItem
        Tag = 2
        Caption = '&New file list'
        OnClick = ToolButtonClick
      end
      object Importfilelist1: TMenuItem
        Tag = 3
        Caption = '&Import file list'
        Hint = 'Import a file list form a text file'
        OnClick = ToolButtonClick
      end
      object Addtofilelist1: TMenuItem
        Tag = 16
        Caption = 'A&dd to file list'
        Hint = 'Add a file list form a text file to the file list'
        OnClick = ToolButtonClick
      end
      object Savefilelist1: TMenuItem
        Tag = 4
        Caption = 'S&ave file list'
        Hint = 'Save file list in a text file'
        OnClick = ToolButtonClick
      end
      object N8: TMenuItem
        Caption = '-'
      end
      object Searchforfiles1: TMenuItem
        Tag = 5
        Caption = 'S&earch for files'
        Hint = 'Search for and add files to file list'
        OnClick = ToolButtonClick
      end
      object Add1: TMenuItem
        Tag = 6
        Caption = '&Add'
        Hint = 'Add files to file list'
        OnClick = ToolButtonClick
      end
      object Remove1: TMenuItem
        Tag = 7
        Caption = '&Unlist'
        Hint = 'Unlist files from file list'
        OnClick = ToolButtonClick
      end
      object Selectall1: TMenuItem
        Tag = 8
        Caption = 'S&elect all'
        Hint = 'Select all files in file list'
        OnClick = ToolButtonClick
      end
      object Removeall1: TMenuItem
        Tag = 9
        Caption = 'U&nlist all'
        Hint = 'Unlist all files in file list'
        OnClick = ToolButtonClick
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Tag = 100
        Caption = 'E&xit'
        Hint = 'Exit Chgname'
        OnClick = ToolButtonClick
      end
    end
    object Edit1: TMenuItem
      Caption = '&Edit'
      object EditCopyItem: TMenuItem
        Tag = 1
        Caption = '&Copy'
        OnClick = EditItemClick
      end
      object EditCutItem: TMenuItem
        Tag = 2
        Caption = 'C&ut'
        OnClick = EditItemClick
      end
      object EditPasteIem: TMenuItem
        Tag = 4
        Caption = '&Paste'
        OnClick = EditItemClick
      end
      object EditDeleteItem: TMenuItem
        Tag = 3
        Caption = '&Delete'
        OnClick = EditItemClick
      end
    end
    object Options1: TMenuItem
      Caption = '&Options'
      object Name1: TMenuItem
        Tag = 1
        Caption = '&Name'
        Hint = 'Set file name options'
        OnClick = OptionsClick
      end
      object Date1: TMenuItem
        Tag = 2
        Caption = '&Date'
        Hint = 'Set file date options'
        OnClick = OptionsClick
      end
      object Attribute1: TMenuItem
        Tag = 3
        Caption = '&Attribute'
        Hint = 'Set file attribute options'
        OnClick = OptionsClick
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object Hidetoolbar1: TMenuItem
        Caption = 'Hide &toolbar'
        Hint = 'Hide/Show toolbar'
        OnClick = Hidetoolbar1Click
      end
      object Blankonstartup1: TMenuItem
        Caption = '&Blank on startup'
        OnClick = Blankonstartup1Click
      end
    end
    object Quick1: TMenuItem
      Caption = '&Quick Settings'
      object Resetall1: TMenuItem
        Tag = 7
        Caption = '&Reset all'
        Hint = 'Reset all options'
        OnClick = OptionsClick
      end
      object Resetname1: TMenuItem
        Tag = 4
        Caption = 'Reset &names'
        Hint = 'Reset name options'
        OnClick = OptionsClick
      end
      object Resetdate1: TMenuItem
        Tag = 5
        Caption = 'Reset &dates'
        Hint = 'Reset date options'
        OnClick = OptionsClick
      end
      object Resetattribute1: TMenuItem
        Tag = 6
        Caption = '&Reset &attributes'
        Hint = 'Reset attribute options'
        OnClick = OptionsClick
      end
      object N7: TMenuItem
        Caption = '-'
      end
      object Open1: TMenuItem
        Tag = 8
        Caption = '&Open'
        Hint = 'Read settings from a file'
        OnClick = OptionsClick
      end
      object Saveas1: TMenuItem
        Tag = 9
        Caption = '&Save as'
        Hint = 'Save settings in a file'
        OnClick = OptionsClick
      end
    end
    object Windows1: TMenuItem
      Caption = '&Window'
      object Tilehorizontal1: TMenuItem
        Caption = 'Tile &horizontal'
        OnClick = Tilehorizontal1Click
      end
      object Tilevertical1: TMenuItem
        Caption = 'Tile &vertical'
        OnClick = Tilevertical1Click
      end
      object Cascade1: TMenuItem
        Caption = '&Cascade'
        OnClick = Cascade1Click
      end
      object Arangeicons1: TMenuItem
        Caption = '&Arange icons'
        OnClick = Arangeicons1Click
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object Minimizeall1: TMenuItem
        Caption = '&Minimize all'
        OnClick = Minimizeall1Click
      end
      object Normalizeall1: TMenuItem
        Caption = '&Normalize all'
        OnClick = Normalizeall1Click
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object Help2: TMenuItem
        Caption = '&Help'
        Hint = 'Get help'
        OnClick = Help2Click
      end
      object Introduction1: TMenuItem
        Caption = '&Introduction'
        Hint = 'Introduction screen in help file'
        OnClick = Introduction1Click
      end
      object Howtogethelp1: TMenuItem
        Caption = 'How to &get help'
        Hint = 'Help on help system'
        OnClick = Howtogethelp1Click
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object About1: TMenuItem
        Caption = '&About'
        Hint = 'About Chgname'
        OnClick = AboutClick
      end
    end
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = '*.cns'
    Filter = 'Chgname file lists|*.cls|All Files|*.*'
    Options = [ofHideReadOnly, ofFileMustExist]
    Left = 112
    Top = 152
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '*.cns'
    Filter = 'Chgname sets|*.cns|All files|*.*'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist]
    Left = 176
    Top = 152
  end
  object SetOptionsPop: TPopupMenu
    Left = 48
    Top = 208
    object Nameoptions1: TMenuItem
      Tag = 1
      Caption = '&Name options'
      OnClick = OptionsClick
    end
    object Dateoptions1: TMenuItem
      Tag = 2
      Caption = '&Date options'
      OnClick = OptionsClick
    end
    object Attributeoptions1: TMenuItem
      Tag = 3
      Caption = '&Attribute options'
      OnClick = OptionsClick
    end
  end
  object ResetOptionsPop: TPopupMenu
    Left = 128
    Top = 208
    object Alloptions1: TMenuItem
      Tag = 7
      Caption = '&All options'
      OnClick = OptionsClick
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object MenuItem1: TMenuItem
      Tag = 4
      Caption = '&Name options'
      OnClick = OptionsClick
    end
    object MenuItem2: TMenuItem
      Tag = 5
      Caption = '&Date options'
      OnClick = OptionsClick
    end
    object MenuItem3: TMenuItem
      Tag = 6
      Caption = 'A&ttribute options'
      OnClick = OptionsClick
    end
  end
  object WaitCursor: TWaitCursor
    Interval = 225
    Left = 240
    Top = 152
  end
end