home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
WDR Computer Club Digital 1998 March
/
CC9803-2.BIN
/
SHARE
/
95CHGNAM
/
_SETUP.1
/
Chgname.exe
/
0
/
RCDATA
/
TEDITFORM
/
TEDITFORM.txt
Wrap
Text File
|
1998-01-23
|
16KB
|
362 lines
object EditForm: TEditForm
Left = 297
Top = 91
HelpContext = 8
AutoScroll = False
Caption = 'Manual filename edit'
ClientHeight = 260
ClientWidth = 414
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
Position = poDefault
OnClose = FormClose
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Memo1: TMemo
Left = 0
Top = 45
Width = 414
Height = 215
Align = alClient
ScrollBars = ssVertical
TabOrder = 0
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 414
Height = 45
Align = alTop
BevelOuter = bvLowered
BevelWidth = 2
TabOrder = 1
object SpeedButton1: TSpeedButton
Left = 2
Top = 2
Width = 41
Height = 41
Hint = 'Start'
Flat = True
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777771777777
7777700088887777777733383717777777700999088887777777777F83717777
700999991088887777773337F8371770099999991108888777777783F3871009
9999999911108888777777787F8719999999999911110888877777737F771999
9999999911110888877777778F8710099999999911110888777777073F871770
0999999911110877777777073F371FF770999999111107777777770773F8718F
F7099999111107777777770783737718F709999911110777777770F7F37F8718
8F70999911110777777770F7737F83818F7099991111077777770F087F37F813
8F7099991111077777770F0887F383318F7009991111077007770F0088331133
8F7009991111070800770F0008833318F70809991111008708070F0000888338
F7080999111108707F800F000008888F708809911111070707F070F00000880F
7088099111110077707070F0000000FF077099F1111107777707770FF0000F00
8F7099F111107777777777000FFFF087F0099F11111077777777777070000800
0999F11111107777777777770999999999FF9911110777777777777770F99999
FF9999911107777777777777770FFFFF99F99999107777777777777777701199
999F99990777777777777777777701119999F900777777777777777777777001
1999007777777777777777777777777000007777777777777777}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 43
Top = 2
Width = 41
Height = 41
Hint = 'Cancel'
Flat = True
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00779171777777
7777700088887777197739991717777777700999088887719997999991717777
7009999910888819999939999917177009999999110881999997779999911009
9999999911101999997777799999199999999999111199999777777399999199
999999991119999987777777899999199999999911999998777777073F999991
0999999919999977777777073F39999910999991999997777777770773F89999
910999199999077777777707837379999919919999910777777770F7F37F8799
9991199999110777777770F7737F8389999999999111077777770F087F37F813
999999991111077777770F0887F38331899999991111077007770F0088331133
199999191111070800770F0008833311999999911111008708070F0000888319
99999999111108707F800F0000088199999809999111070707F070F000001999
9988099999110077707070F000019999977099F9999107777707770FF0199999
8F7099F1999911777777770001999997F0099F11199999177777777019999900
0999F11111999991777777719999999999FF9911110999991777771999999999
FF9999911107999991777199999FFFFF99F99999107779999917199999701199
999F99990777779999919999977701119999F900777777799999799977777001
1999007777777777999777977777777000007777777777777977}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 84
Top = 2
Width = 41
Height = 41
Hint = 'Reimport names'
Flat = True
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777000777777777777777777777777777008B00777777777777777777
777777008B730087777777777777777777770037BFB800887777777777777777
770037B7FB73808887777777777777770037BFB7B7B880088877777777777700
3FB7BFBFB7B88008888777777777003FB7BFBFB7BFB870088888777777003FB7
BFBFB7B7BFB8B0088887777770B7B7BFBFB7BFBFB738B0088777777770BFB7BF
B7BFBFB7B737B8087777777770BFB7BFBFB7BFB7B78FB8307777777707BFB7BF
BBFB7BFBFB8BB830777777770BFBFBBBFB7BFBFB7B8BB810777777770BFB7B7B
FB7BFB7BFB8BB718077777707BFBFBFBFB7BFB7BFB87778807777770FBFBFBF7
BFBFB7BBB7777F0807777770FFBFBF7BF7BFB77BF8777708807777CCFFBFFBFB
FBFBFFBFB8F7F78880777CCCCFBFFBFBFBBF7B73877FFF888077CCCCCCBFFFCC
CCCCCCC77FFFFF888077CCCCCCCFFBCCCCCCCCCFFFFFFF883807CCCCCCCCFFBC
CCCCCCCFFFFFFF88370770CCCCCCC387CCCCCCCFFFFF8883780770FCCCCCCC7C
CCCCCCCFF788B8737B0770FFCCCCCCCCCCCCCCC888B7373770770800FCCCCCCC
CCCFCCC377B37B737077007777CCCCCCCC788CC300377B8007777777770CCCCC
C887B8007700000777777777770FCCC073780077777777777777777777080070
8300777777777777777777777700777000777777777777777777}
ParentShowHint = False
ShowHint = True
OnClick = UpdateList
end
object SpeedButton4: TSpeedButton
Left = 125
Top = 2
Width = 41
Height = 41
Hint = 'Copy to clipboard'
Flat = True
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555550555550000000000050000000000005500555087777
777F0600F7777777F05550F05087777777F06670F777777F055550F708777777
7F066760F77777F0555550F777777777F0667670F7777778055550F77777777F
07676760F7777777805550F7777777F050767670F7777777780550F777777F05
55076760F7F77777770550F77777F05555507670FF0F7777770550F777777705
55550700F050F777770550FFFFFFFFF05555505005550F777705500000000000
05555550555550F77705550676767605555555555555060F7705506767676770
5555555555506760F70550067676760555555555550676760F05508067676055
5555555550676767600550F8067605555555555506767676760550F780605555
5555555550676767605550F7780555550555555000000000000550F777805550
050555550F777777770550F7777805070070555550F77777770550F777778077
07670555550F7777770550F7777777770676705550877777770550F777777777
07676705087777777705550F77777777067676608777777777055550F7777777
076766087777777F770555550777777706766087777777F0F705555077777777
0766087777777F050F05550FFFFFFFFF0060FFFFFFFFF0555005500000000000
0500000000000555550555555555555555555555555555555555}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton4Click
end
object SpeedButton5: TSpeedButton
Left = 166
Top = 2
Width = 41
Height = 41
Hint = 'Paste from clipboard'
Flat = True
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFF88888
88888888888888FFFFFFFFFFFF000000000000000000008FFFFFFFFFF0077777
7777777777777008FFFFFFFFF07777777777777777777708FFFFFFFFF0700000
0000000077777708FFFFFFFFF070FBFBFBFBFBF007777708FFFFFFFFF070BFBF
BFBFBFB0B0777708FFFFFFFFF070FBFBFBFBFBF07B077708FFFFFFFFF070BFBF
BFBFBFB0B7B07708FFFFFFFFF070FBFBFBFBFBF000000708FFFFFFFFF070BFBF
BFBFBFBFBFBF0708FFFFFFFFF070FBFBFBFBFBFBFBFB0708FFFFFFFFF070BFBF
BFBFBFBFBFBF0708FFFFFFFFF070FBFBFBFBFBFBFBFB0708FFFFFFFFF070BFBF
BFBFBFBFBFBF0708FFFFFFFFF070FBFBFBFBFBFBFBFB0708FFFFFFFFF070BFBF
BFBFBFBFBFBF0708FFFFFFFFF070FBFBFBFBFBFBFBFB0708FFFFFFFFF070BFBF
BFBFBFBFBFBF0708FFFFFFFFF070FBFBFBFBFBFBFBFB0708FFFFFFFFF070BFBF
BFBFBFBFBFBF0708FFFFFFFFF070FBFBFBFBFBFBFBFB0708FFFFFFFFF070BFBF
BFBFBFBFBFBF0708FFFFFFFFF070FBFBFBFBFBFBFBFB0708FFFFFFFFF070B000
00000000000F0708FFFFFFFFF07000F7777777777F000708FFFFFFFFF007770F
FFFFFFFFF077700FFFFFFFFFFF0000000FFFFFF0000000FFFFFFFFFFFFFFFFFF
F0F00F08FFFFFFFFFFFFFFFFFFFFFFFFF0F00F08FFFFFFFFFFFFFFFFFFFFFFFF
F0FFFF08FFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFF}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton5Click
end
object SpeedButton6: TSpeedButton
Left = 213
Top = 2
Width = 41
Height = 41
Hint = 'Upper case'
Flat = True
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCCFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
CCCFFFFF000000FFF00FFFFFFFFFFFFCCCFFFFF09999990F0990FFFFFFCCFFCC
CFFFFF0999999990990FFFFFFFCCFCCCFFFFF09990000999990FFFFFFFCCCCCF
FFFFF0990FFFF009990FFFFFFFCCCCFFFFFFF0990FFFFFF0990FFFFFFFCCCCCC
FFFFF0990FFFFFF0990FFF00FFCCCCCCFFFFF009900000F0990FF0990FFFFFFF
FFFF099999999900990FF0990FFFFFFFFFFF099009999999990FFF0990FFFFFF
FFF0990FF0000999990FFF0990FFFFFFFFF09900FFFFF000990FFF09990FFFFF
FF0999990FFFFFF0990FFFF0990000000009900990000009990FFFF099999999
999990099999999990FFFFFF0999999999990FF0099999990FFFFFFF09900000
00990FFFF0000000FFFFFFFF0990FFFFF0990FFFFFFFFFFFFFFFFFFFF0990FFF
0990FFFFFFFFFFFFFFFFFFFFF0990FFF0990FFFFFFFFCCFFFFFFFFFFF09990F0
990FFFFFFFFCCCFFFFFFFFFFFF0990F0990FFFFFFFCCCFFFFFFFFFFFFF0990F0
990FFCCFFCCCFFFFFFFFFFFFFFF0990990FFFCCFCCCFFFFFFFFFFFFFFFF09909
90FFFCCCCCFFFFFFFFFFFFFFFFF0990990FFFCCCCFFFFFFFFFFFFFFFFFFF0999
0FFFFCCCCCCFFFFFFFFFFFFFFFFF09990FFFFCCCCCCFFFFFFFFFFFFFFFFFF000
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton6Click
end
object SpeedButton7: TSpeedButton
Left = 254
Top = 2
Width = 41
Height = 41
Hint = 'Lower case'
Flat = True
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFCCCCCCFFFFFFFFFFFFFFFFFFFFFFFFFFCCC
CCCFFFFF000000FFF00FFFFFFFFFFFFCCCCFFFF09999990F0990FFFFFFFFFFCC
CCCFFF0999999990990FFFFFFFFFFCCCFCCFF09990000999990FFFFFFFFFCCCF
FCCFF0990FFFF009990FFFFFFFFCCCFFFFFFF0990FFFFFF0990FFFFFFFCCCFFF
FFFFF0990FFFFFF0990FFF00FFCCFFFFFFFFF009900000F0990FF0990FFFFFFF
FFFF099999999900990FF0990FFFFFFFFFFF099009999999990FFF0990FFFFFF
FFF0990FF0000999990FFF0990FFFFFFFFF09900FFFFF000990FFF09990FFFFF
FF0999990FFFFFF0990FFFF0990000000009900990000009990FFFF099999999
999990099999999990FFFFFF0999999999990FF0099999990FFFFFFF09900000
00990FFFF0000000FFFFFFFF0990FFFFF0990FFFFFFFFFFFFFFFFFFFF0990FFF
0990FFFFFFFFFFFFFFFFFFFFF0990FFF0990FFFFFCCCCCCFFFFFFFFFF09990F0
990FFFFFFCCCCCCFFFFFFFFFFF0990F0990FFFFFFFFCCCCFFFFFFFFFFF0990F0
990FFFFFFFCCCCCFFFFFFFFFFFF0990990FFFFFFFCCCFCCFFFFFFFFFFFF09909
90FFFFFFCCCFFCCFFFFFFFFFFFF0990990FFFFFCCCFFFFFFFFFFFFFFFFFF0999
0FFFFFCCCFFFFFFFFFFFFFFFFFFF09990FFFFFCCFFFFFFFFFFFFFFFFFFFFF000
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton7Click
end
object Bevel1: TBevel
Left = 208
Top = 2
Width = 17
Height = 41
Shape = bsLeftLine
end
object SpeedButton8: TSpeedButton
Left = 295
Top = 2
Width = 41
Height = 41
Hint = 'Title Case'
Flat = True
Glyph.Data = {
76020000424D7602000000000000760000002800000020000000200000000100
0400000000000002000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFCC
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCC
FFFFFFFF000000FFF00FFFFFFFFFFFCCFFFFFFF09999990F0990FFFFFFFFFFCC
FFFFFF0999999990990FFFFFFFFFFFCCFFFFF09990000999990FFFFFFFCCCCCC
CCCCF0990FFFF009990FFFFFFFFCCCCCCCCFF0990FFFFFF0990FFFFFFFFFCCCC
CCFFF0990FFFFFF0990FFF00FFFFFCCCCFFFF009900000F0990FF0990FFFFFCC
FFFF099999999900990FF0990FFFFFFFFFFF099009999999990FFF0990FFFFFF
FFF0990FF0000999990FFF0990FFFFFFFFF09900FFFFF000990FFF09990FFFFF
FF0999990FFFFFF0990FFFF0990000000009900990000009990FFFF099999999
999990099999999990FFFFFF0999999999990FF0099999990FFFFFFF09900000
00990FFFF0000000FFFFFFFF0990FFFFF0990FFFFFFFFFFFFFFFFFFFF0990FFF
0990FFFFFFFCCFFFFFFFFFFFF0990FFF0990FFFFFFCCCCFFFFFFFFFFF09990F0
990FFFFFFCCCCCCFFFFFFFFFFF0990F0990FFFFFCCCCCCCCFFFFFFFFFF0990F0
990FFFFCCCCCCCCCCFFFFFFFFFF0990990FFFFFFFFFCCFFFFFFFFFFFFFF09909
90FFFFFFFFFCCFFFFFFFFFFFFFF0990990FFFFFFFFFCCFFFFFFFFFFFFFFF0999
0FFFFFFFFFFCCFFFFFFFFFFFFFFF09990FFFFFFFFFFCCFFFFFFFFFFFFFFFF000
FFFFFFFFFFFCCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton8Click
end
end
object MainMenu1: TMainMenu
Left = 40
Top = 72
object Rename1: TMenuItem
Caption = '&Rename'
object Start1: TMenuItem
Caption = '&Start'
OnClick = SpeedButton1Click
end
object Cancel1: TMenuItem
Caption = '&Cancel'
OnClick = SpeedButton2Click
end
end
object Filenames1: TMenuItem
Caption = '&File names'
object Reimport1: TMenuItem
Caption = '&Reimport'
OnClick = UpdateList
end
object Copy1: TMenuItem
Caption = '&Copy'
ShortCut = 16451
OnClick = SpeedButton4Click
end
object Paste1: TMenuItem
Caption = '&Paste'
ShortCut = 16470
OnClick = SpeedButton5Click
end
object N2: TMenuItem
Caption = '-'
end
object Selectall1: TMenuItem
Caption = 'Select all'
ShortCut = 16449
OnClick = Selectall1Click
end
end
object N1: TMenuItem
Caption = '&Case'
object Case1: TMenuItem
Caption = '&UPPER CASE'
ShortCut = 16469
OnClick = SpeedButton6Click
end
object lowercase1: TMenuItem
Caption = '&lower case'
ShortCut = 16460
OnClick = SpeedButton7Click
end
object TitleCase1: TMenuItem
Caption = '&Title Case'
ShortCut = 16468
OnClick = SpeedButton8Click
end
end
end
end