home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Powerdrive 1997 June
/
POWERDRIVE0697.ISO
/
share
/
win95
/
anwend
/
qcopy
/
_setup.1
/
Qcwin.exe
/
0
/
RCDATA
/
TQCOPYMAIN
/
TQCOPYMAIN.txt
< prev
Wrap
Text File
|
1997-03-24
|
40KB
|
1,137 lines
object QCopyMain: TQCopyMain
Left = 189
Top = 62
Width = 608
Height = 485
HelpContext = 13
ActiveControl = copybtn
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
Icon.Data = {<image000.ico>}
Menu = MainMenu1
OnActivate = FormActivate
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 14
object Bevel5: TBevel
Left = 0
Top = 0
Width = 529
Height = 377
ParentShowHint = False
ShowHint = False
Visible = False
end
object Label1: TLabel
Left = 8
Top = 214
Width = 225
Height = 48
Alignment = taRightJustify
AutoSize = False
Caption = 'QCopy v7.12'
Font.Color = clActiveCaption
Font.Height = -35
Font.Name = 'Arial'
Font.Style = [fsBold, fsItalic]
ParentFont = False
ParentShowHint = False
ShowHint = False
OnClick = Label1Click
end
object Label2: TLabel
Left = 8
Top = 266
Width = 225
Height = 30
Alignment = taRightJustify
AutoSize = False
Caption = 'f�r Windows� 95'
Font.Color = clActiveCaption
Font.Height = -27
Font.Name = 'Arial'
Font.Style = [fsBold, fsItalic]
ParentFont = False
ParentShowHint = False
ShowHint = False
OnClick = Label1Click
end
object Image1: TImage
Left = 106
Top = 88
Width = 140
Height = 44
ParentShowHint = False
Picture.Data = {<image001.bmp>}
ShowHint = False
Stretch = True
end
object Image2: TImage
Left = 172
Top = 161
Width = 73
Height = 22
Picture.Data = {<image002.bmp>}
Stretch = True
end
object copybtn: TBitBtn
Left = 48
Top = 101
Width = 153
Height = 41
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 0
OnClick = copybtnClick
Glyph.Data = {
90020000424D9002000000000000760000002800000020000000200000000100
0400000000000002000000000000000000000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888888888888888888888888888888888888888888888888888
8888888888888888888888888888888888888888888888888888888888888888
8888888888888888888888888888888777777777777777788888888888888877
7777777777777777888888888888800000000000000007778888888888880CCC
000077770CC0C0778888888888880CCC007077770CC0C0778888888888880CCC
007077770CC0C0778888888888880CCC007077770CC0C0778888888877770CCC
000000000000C0778888888777770CCCCCCCCCCCCCCCC0778888880000000000
000000000000C077888880CCC000077770CC0C0EEEE0C077888880CCC0070777
70CC0C0EEEE0C077888880CCC007077770CC0C0EEEE0C077888880CCC0070777
70CC0C0EEEE0C077888880CCC000000000000C0EEEE0C077888880CCCCCCCCCC
CCCCCC0EEEE0C077888880C00000000000000C0EEEE00078888880C0EEEEEEEE
EEEE0C0EEEE00088888880C0EEEEEEEEEEEE0C0000000888888880C0EEEEEEEE
EEEE0C0778888888888880C0EEEEEEEEEEEE0C0778888888888880C0EEEEEEEE
EEEE0C0778888888888880C0EEEEEEEEEEEE0C0778888888888880C0EEEEEEEE
EEEE00078888888888888000EEEEEEEEEEEE0008888888888888880000000000
0000008888888888888888888888888888888888888888888888000000000000
0000000000000000000000000000000000000000}
Style = bsNew
end
object formatbtn: TBitBtn
Left = 48
Top = 152
Width = 153
Height = 41
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 1
OnClick = formatbtnClick
Glyph.Data = {
36040000424D360400000000000076000000280000003C0000001E0000000100
040000000000C003000000000000000000000000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FF00000000FFFFFFFFFFFF8888888888888888FFFFFFFFFF0000FFFFFFFFFFFF
00F111111F00FFFFFFFFF888888888888888888FFFFFFFFF0000FFFFFFFFFFF0
F1166666611F0FFFFFFF0000000000000000888FFFFFFFFF0000FFFFFFFFFF01
16600000066110FFFFF0CCC000077770CC0C088FFFFFFFFF0000FFFFFFFFF01F
600111111006F10FFFF0CCC007077770CC0C088FFFFFFFFF0000FFFFFFFF0F16
0F16666661F061F0FFF0CCC007077770CC0C088FFFFFFFFF0000FFFFFFFF0160
F16F0000F61F0610FFF0CCC007077770CC0C088FFFFFFFFF0000FFFFFFF0F160
16F011110F61061F0FF0CCC000000000000C088FFFFFFFFF0000FFFFFFF01601
6F01666610F610610FF0CCCCCCCCCCCCCCCC088FFFFFFFFF0000FFFFFFF01601
6016F00F610610610FF0C00000000000000C088FFFFFFFFF0000FFFFFFF01601
60160FF0610610610FF0C0EEEEEEEEEEEE0C088FFFFFFFFF0000FFFFFFF01601
60160FF0610610610FF0C0EEEEEEEEEEEE0C088FFFFFFFFF0000FFFFFFF01601
6016F00F610610610FF0C0EEEEEEEEEEEE0C088FFFFFFFFF0000FFFFFFF01601
6F01666610F610610FF0C9EEEEEEEEEEEE0C088FFFFFFFFF0000FFFFFFF0F160
16F011110F61061F0FF0C99EEEEEEEEEEE0C088FFFFFFFFF0000FFFFFFFF0160
F16F0000F61F0610FFF0C999EEEEEEEEEE0C088FFFFFFFFF0000FFFFFFFF0F16
0F16666669999999999999999EEEEEEEEE0008FFFFFFFFFF0000FFFFFFFFF01F
60011111199999999999999999EEEEEEEE000FFFFFFFFFFF0000FFFFFFFFFF01
166000000999999999999999990000000000FFFFFFFFFFFF0000FFFFFFFFFFF0
F116666669999999999999999FFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
00F111111F00FFFFFFFFF999FFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FF00000000FFFFFFFFFFF99FFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFF9FFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000}
Style = bsNew
end
object EndeBtn: TBitBtn
Left = 48
Top = 313
Width = 153
Height = 41
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 2
OnClick = EndeBtnClick
Glyph.Data = {
90020000424D9002000000000000760000002800000020000000200000000100
0400000000000002000000000000000000000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888888888888888888888888888888888888888888888888888
8888888888888888888888888877700000000000077788888888888888109037
3737373701798888888888888891F07373737373097188888888888888777037
3737373707778888888888888819107373737373010988888888888888000037
37373737091188888888888888777073737373730777888888888888881F0037
37373737097188888888888888091073737373730F7988888888888888777037
373737370777888888888888881090737373707301F9888888888888889F1037
37370B0709018888888888888877707373737073077788888888888888191037
3737373701798888888888888801107373737373097188888888888888777037
373737370777888888888888881F007373737373019188888888888888091037
3737373709108888888888888877707373737373077788888888888888109037
373737370171888888888888889F10737373737300798888888888888801F037
3737373700108888888888888877700000000000077788888888888888197111
1F19711F1171888888888888880171F101017101107088888888888888971F77
97F7907F07198888888888888888888888888888888888888888888888888888
8888888888888888888888888888888888888888888888888888000000000000
0000000000000000000000000000000000000000}
Style = bsNew
end
object okbtn2: TBitBtn
Left = 48
Top = 101
Width = 153
Height = 41
Default = True
Enabled = False
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 3
Visible = False
OnClick = copybtnClick
Glyph.Data = {
90020000424D9002000000000000760000002800000020000000200000000100
0400000000000002000000000000000000000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888888888888888888888888888888888888888888888888888
8888888888888888888888888888888888888888888888888888888888888888
8888888888888888888888888888888777777777777777788888888888888877
7777777777777777888888888888800000000000000007778888888888880CCC
000077770CC0C0778888888888880CCC007077770CC0C0778888888888880CCC
007077770CC0C0778888888888880CCC007077770CC0C0778888888877770CCC
000000000000C0778888888777770CCCCCCCCCCCCCCCC0778888880000000000
000000000000C077888880CCC000077770CC0C0EEEE0C077888880CCC0070777
70CC0C0EEEE0C077888880CCC007077770CC0C0EEEE0C077888880CCC0070777
70CC0C0EEEE0C077888880CCC000000000000C0EEEE0C077888880CCCCCCCCCC
CCCCCC0EEEE0C077888880C00000000000000C0EEEE00078888880C0EEEEEEEE
EEEE0C0EEEE00088888880C0EEEEEEEEEEEE0C0000000888888880C0EEEEEEEE
EEEE0C0778888888888880C0EEEEEEEEEEEE0C0778888888888880C0EEEEEEEE
EEEE0C0778888888888880C0EEEEEEEEEEEE0C0778888888888880C0EEEEEEEE
EEEE00078888888888888000EEEEEEEEEEEE0008888888888888880000000000
0000008888888888888888888888888888888888888888888888000000000000
0000000000000000000000000000000000000000}
Style = bsNew
end
object Formatbtn2: TBitBtn
Left = 48
Top = 152
Width = 153
Height = 41
Enabled = False
Font.Color = clBlack
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 4
Visible = False
OnClick = formatbtnClick
Glyph.Data = {
36040000424D360400000000000076000000280000003C0000001E0000000100
040000000000C003000000000000000000000000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FF00000000FFFFFFFFFFFF8888888888888888FFFFFFFFFF0000FFFFFFFFFFFF
00F111111F00FFFFFFFFF888888888888888888FFFFFFFFF0000FFFFFFFFFFF0
F1166666611F0FFFFFFF0000000000000000888FFFFFFFFF0000FFFFFFFFFF01
16600000066110FFFFF0CCC000077770CC0C088FFFFFFFFF0000FFFFFFFFF01F
600111111006F10FFFF0CCC007077770CC0C088FFFFFFFFF0000FFFFFFFF0F16
0F16666661F061F0FFF0CCC007077770CC0C088FFFFFFFFF0000FFFFFFFF0160
F16F0000F61F0610FFF0CCC007077770CC0C088FFFFFFFFF0000FFFFFFF0F160
16F011110F61061F0FF0CCC000000000000C088FFFFFFFFF0000FFFFFFF01601
6F01666610F610610FF0CCCCCCCCCCCCCCCC088FFFFFFFFF0000FFFFFFF01601
6016F00F610610610FF0C00000000000000C088FFFFFFFFF0000FFFFFFF01601
60160FF0610610610FF0C0EEEEEEEEEEEE0C088FFFFFFFFF0000FFFFFFF01601
60160FF0610610610FF0C0EEEEEEEEEEEE0C088FFFFFFFFF0000FFFFFFF01601
6016F00F610610610FF0C0EEEEEEEEEEEE0C088FFFFFFFFF0000FFFFFFF01601
6F01666610F610610FF0C9EEEEEEEEEEEE0C088FFFFFFFFF0000FFFFFFF0F160
16F011110F61061F0FF0C99EEEEEEEEEEE0C088FFFFFFFFF0000FFFFFFFF0160
F16F0000F61F0610FFF0C999EEEEEEEEEE0C088FFFFFFFFF0000FFFFFFFF0F16
0F16666669999999999999999EEEEEEEEE0008FFFFFFFFFF0000FFFFFFFFF01F
60011111199999999999999999EEEEEEEE000FFFFFFFFFFF0000FFFFFFFFFF01
166000000999999999999999990000000000FFFFFFFFFFFF0000FFFFFFFFFFF0
F116666669999999999999999FFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
00F111111F00FFFFFFFFF999FFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FF00000000FFFFFFFFFFF99FFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFF9FFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000}
Style = bsNew
end
object Panel1: TPanel
Left = 8
Top = 8
Width = 225
Height = 77
ParentShowHint = False
ShowHint = False
TabOrder = 5
object QAdrive: TSpeedButton
Left = 8
Top = 8
Width = 40
Height = 25
GroupIndex = 1
Caption = 'A:'
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333FFFFFFFFFFFFFFF000000000000000088888888888888880F8888888877
78808F3F3333333333380FA77777777777808F833FFFFFFFF3380F7888888888
87808F338888888833380F780000000087808F333FFFFFFFF3380F7888888888
87808F338888888833380F777777777777808F333333333333380FFFFFFFFFFF
FFF08F3333333333333800000000000000008FFFFFFFFFFFFFF8333333333333
3333888888888888888833333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object QBdrive: TSpeedButton
Left = 49
Top = 8
Width = 40
Height = 25
GroupIndex = 1
Caption = 'B:'
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333FFFFFFFFFFFFFFF000000000000000088888888888888880F8888888877
78808F3F3333333333380FA77777777777808F833FFFFFFFF3380F7888888888
87808F338888888833380F780000000087808F333FFFFFFFF3380F7888888888
87808F338888888833380F777777777777808F333333333333380FFFFFFFFFFF
FFF08F3333333333333800000000000000008FFFFFFFFFFFFFF8333333333333
3333888888888888888833333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object QDatei: TSpeedButton
Left = 105
Top = 8
Width = 59
Height = 25
GroupIndex = 1
Caption = 'DSK'
Font.Color = clNavy
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333FFFFFFFFFFFFFFF000000000000000077777777777777770F7777777777
77707F3F3333333333370F988888888888707F733FFFFFFFF3370F8800000000
88707F337777777733370F888888888888707F333FFFFFFFF3370F8800000000
88707F337777777733370F888888888888707F333333333333370F8888888888
88707F333333333333370FFFFFFFFFFFFFF07FFFFFFFFFFFFFF7000000000000
0000777777777777777733333333333333333333333333333333333333333333
33333333333333333333333333333333333333333333333333330000}
NumGlyphs = 2
ParentFont = False
ParentShowHint = False
ShowHint = True
OnClick = QDateiClick
end
object Bevel6: TBevel
Left = 8
Top = 38
Width = 241
Height = 2
end
object SpeedButton1: TSpeedButton
Left = 164
Top = 8
Width = 21
Height = 25
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFF0FFFFFFFFFFFFFF040FFFFFFFFFFFFF040FFF
FFFFFFFFF04440FFFFFFFFFFF04440FFFFFFFFFF0444440FFFFFFFFF0444440F
FFFFFFF044444440FFFFFFF044444440FFFFFF04444444440FFFFF0444444444
0FFFF0000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
OnClick = QDateiDblClick
end
object OAllesLesen: TCheckBox
Left = 9
Top = 49
Width = 121
Height = 17
Caption = 'Alles lesen'
Font.Color = clNavy
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 0
end
end
object Panel2: TPanel
Left = 248
Top = 8
Width = 273
Height = 361
ParentShowHint = False
ShowHint = False
TabOrder = 6
object Bevel8: TBevel
Left = 17
Top = 336
Width = 237
Height = 19
end
object ZAdrive: TSpeedButton
Left = 8
Top = 7
Width = 40
Height = 25
GroupIndex = 1
Down = True
Caption = 'A:'
Font.Color = clMaroon
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333FFFFFFFFFFFFFFF000000000000000088888888888888880F8888888877
78808F3F3333333333380FA77777777777808F833FFFFFFFF3380F7888888888
87808F338888888833380F780000000087808F333FFFFFFFF3380F7888888888
87808F338888888833380F777777777777808F333333333333380FFFFFFFFFFF
FFF08F3333333333333800000000000000008FFFFFFFFFFFFFF8333333333333
3333888888888888888833333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
ParentFont = False
ParentShowHint = False
ShowHint = False
OnClick = ZLAUFWERKClick
end
object ZBdrive: TSpeedButton
Left = 48
Top = 7
Width = 40
Height = 25
GroupIndex = 1
Caption = 'B:'
Font.Color = clMaroon
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333FFFFFFFFFFFFFFF000000000000000088888888888888880F8888888877
78808F3F3333333333380FA77777777777808F833FFFFFFFF3380F7888888888
87808F338888888833380F780000000087808F333FFFFFFFF3380F7888888888
87808F338888888833380F777777777777808F333333333333380FFFFFFFFFFF
FFF08F3333333333333800000000000000008FFFFFFFFFFFFFF8333333333333
3333888888888888888833333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
ParentFont = False
ParentShowHint = False
ShowHint = False
OnClick = ZLAUFWERKClick
end
object ZDatei: TSpeedButton
Left = 9
Top = 43
Width = 59
Height = 25
GroupIndex = 1
Caption = 'DSK'
Font.Color = clMaroon
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333FFFFFFFFFFFFFFF000000000000000077777777777777770F7777777777
77707F3F3333333333370F988888888888707F733FFFFFFFF3370F8800000000
88707F337777777733370F888888888888707F333FFFFFFFF3370F8800000000
88707F337777777733370F888888888888707F333333333333370F8888888888
88707F333333333333370FFFFFFFFFFFFFF07FFFFFFFFFFFFFF7000000000000
0000777777777777777733333333333333333333333333333333333333333333
33333333333333333333333333333333333333333333333333330000}
NumGlyphs = 2
ParentFont = False
ParentShowHint = False
ShowHint = True
OnClick = ZDateiClick
end
object ZVerzeichnis: TSpeedButton
Left = 9
Top = 78
Width = 59
Height = 25
GroupIndex = 1
Caption = 'Ordner'
Font.Color = clMaroon
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555555FFFFFFFFFF55555000000000055555577777777775F55500B8B8B8B8
B05555775F555555575F550F0B8B8B8B8B05557F75F555555575550BF0B8B8B8
B8B0557F575FFFFFFFF7550FBF0000000000557F557777777777500BFBFBFBFB
0555577F555555557F550B0FBFBFBFBF05557F7F555555FF75550F0BFBFBF000
55557F75F555577755550BF0BFBF0B0555557F575FFF757F55550FB700007F05
55557F557777557F55550BFBFBFBFB0555557F555555557F55550FBFBFBFBF05
55557FFFFFFFFF7555550000000000555555777777777755555550FBFB055555
5555575FFF7555555555570000755555555555777755555555550000}
NumGlyphs = 2
ParentFont = False
ParentShowHint = False
ShowHint = True
OnClick = ZVerzeichnisClick
end
object FormatLabel: TLabel
Left = 16
Top = 120
Width = 57
Height = 15
AutoSize = False
Caption = 'Format'
FocusControl = DiskFormat
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object LabelLabel: TLabel
Left = 16
Top = 190
Width = 57
Height = 15
AutoSize = False
Caption = 'Name'
FocusControl = Disklabel
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Pruefen: TLabel
Left = 16
Top = 223
Width = 57
Height = 15
AutoSize = False
Caption = 'Pr�fen'
FocusControl = DiskPruefen
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Bevel2: TBevel
Left = 7
Top = 37
Width = 258
Height = 2
end
object Bevel3: TBevel
Left = 7
Top = 72
Width = 258
Height = 2
end
object Bevel7: TBevel
Left = 7
Top = 108
Width = 258
Height = 4
end
object BootSek: TLabel
Left = 17
Top = 315
Width = 65
Height = 15
AutoSize = False
Caption = 'Bootsektor'
FocusControl = DiskPruefen
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Seriennummer: TLabel
Left = 16
Top = 257
Width = 57
Height = 15
AutoSize = False
Caption = 'Seriennr.'
FocusControl = DiskPruefen
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object BSDateiname: TLabel
Left = 19
Top = 338
Width = 233
Height = 15
AutoSize = False
Caption = 'Dateiname'
ParentShowHint = False
ShowHint = False
WordWrap = True
OnClick = BS_DateiDblClick
OnDblClick = BS_DateiDblClick
end
object SNRLabel: TLabel
Left = 95
Top = 283
Width = 78
Height = 14
AutoSize = False
Caption = 'Neue Seriennr.'
Font.Color = clMaroon
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
end
object Bevel9: TBevel
Left = 7
Top = 179
Width = 258
Height = 2
end
object Bevel10: TBevel
Left = 6
Top = 213
Width = 258
Height = 2
end
object Bevel11: TBevel
Left = 6
Top = 247
Width = 258
Height = 2
end
object Bevel12: TBevel
Left = 7
Top = 305
Width = 258
Height = 2
end
object SpeedButton2: TSpeedButton
Left = 68
Top = 43
Width = 20
Height = 25
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFF0FFFFFFFFFFFFFF010FFFFFFFFFFFFF010FFF
FFFFFFFFF01110FFFFFFFFFFF01110FFFFFFFFFF0111110FFFFFFFFF0111110F
FFFFFFF011111110FFFFFFF011111110FFFFFF01111111110FFFFF0111111111
0FFFF0000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
OnClick = ZDateiDblClick
end
object SpeedButton3: TSpeedButton
Left = 68
Top = 78
Width = 20
Height = 25
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFF0FFFFFFFFFFFFFF010FFFFFFFFFFFFF010FFF
FFFFFFFFF01110FFFFFFFFFFF01110FFFFFFFFFF0111110FFFFFFFFF0111110F
FFFFFFF011111110FFFFFFF011111110FFFFFF01111111110FFFFF0111111111
0FFFF0000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
OnClick = ZVerzeichnisDblClick
end
object Anzahledit: TEdit
Left = 131
Top = 8
Width = 37
Height = 23
Color = clBtnFace
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
MaxLength = 3
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 0
Text = '1'
end
object Anzahlspin: TSpinButton
Left = 168
Top = 9
Width = 20
Height = 21
DownGlyph.Data = {
7E040000424D7E04000000000000360400002800000009000000060000000100
0800000000004800000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
0303030000000303030300030303030000000303030000000303030000000303
0000000000030300000003000000000000000300000003030303030303030300
0000}
ParentShowHint = False
ShowHint = False
TabOrder = 1
UpGlyph.Data = {
7E040000424D7E04000000000000360400002800000009000000060000000100
0800000000004800000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
0303030000000300000000000000030000000303000000000003030000000303
0300000003030300000003030303000303030300000003030303030303030300
0000}
OnDownClick = AnzahlspinDownClick
OnUpClick = AnzahlspinUpClick
end
object Compresscheck: TCheckBox
Left = 131
Top = 48
Width = 97
Height = 17
Caption = 'komprimieren'
Font.Color = clMaroon
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 2
end
object DiskFormat: TComboBox
Left = 80
Top = 117
Width = 105
Height = 23
Style = csDropDownList
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ItemHeight = 15
Items.Strings = (
''
''
'720'
'1440'
'2880'
'')
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 3
OnChange = DiskFormatChange
end
object Speziallabel: TPanel
Left = 190
Top = 116
Width = 62
Height = 24
BevelInner = bvLowered
Caption = 'Speziallabel'
Font.Color = clMaroon
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 4
Visible = False
end
object EverFormat: TCheckBox
Left = 79
Top = 142
Width = 178
Height = 17
Caption = 'immer formatieren'
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 5
end
object FormOnlyUsed: TCheckBox
Left = 79
Top = 160
Width = 178
Height = 17
Caption = 'nur benutzte formatieren'
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 6
end
object Disklabel: TComboBox
Left = 80
Top = 186
Width = 175
Height = 23
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ItemHeight = 15
Items.Strings = (
''
'')
MaxLength = 11
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 7
Text = 'Disklabel'
end
object DiskPruefen: TComboBox
Left = 80
Top = 219
Width = 175
Height = 23
Style = csDropDownList
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ItemHeight = 15
Items.Strings = (
''
''
''
''
''
''
'')
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 8
end
object BSCombo: TComboBox
Left = 80
Top = 311
Width = 175
Height = 23
Style = csDropDownList
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ItemHeight = 15
Items.Strings = (
'Standard'
'Einlesen')
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 11
OnClick = BS_DateiClick
end
object SNRCombo: TComboBox
Left = 80
Top = 253
Width = 175
Height = 23
Style = csDropDownList
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
ItemHeight = 15
Items.Strings = (
'Standard'
'Keine neue'
'Fortschreibung'
'Neu'
'Neu mit Fortschreibung')
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 9
OnClick = SNR_NeuClick
end
object SNREdit: TMaskEdit
Left = 173
Top = 279
Width = 81
Height = 22
CharCase = ecUpperCase
EditMask = 'AAAA-AAAA;1; '
MaxLength = 9
ParentShowHint = False
ShowHint = False
TabOrder = 10
Text = ' - '
OnKeyPress = snreditKeyPress
end
end
object MainMenu1: TMainMenu
Left = 232
Top = 208
object Datei1: TMenuItem
ShortCut = 0
object Speichern1: TMenuItem
ShortCut = 0
OnClick = Speichern1Click
end
object N2: TMenuItem
Caption = '-'
ShortCut = 0
end
object Beenden1: TMenuItem
ShortCut = 0
OnClick = Beenden1Click
end
end
object Einstellungen1: TMenuItem
ShortCut = 0
object Diskettenwechsel1: TMenuItem
ShortCut = 0
OnClick = Diskettenwechsel1Click
end
object Warnung1: TMenuItem
Checked = True
Hint = 'Soll gewarnt werden, wenn das Ziel Daten enth�lt?'
ShortCut = 0
OnClick = Warnung1Click
end
object Signalton1: TMenuItem
Checked = True
Hint = 'Ton an oder aus'
ShortCut = 0
OnClick = Signalton1Click
end
end
object Dienste1: TMenuItem
ShortCut = 0
object Bootsektorlesen1: TMenuItem
ShortCut = 0
OnClick = Bootsektorlesen1Click
end
object DatentrgernummerReset1: TMenuItem
ShortCut = 0
OnClick = DatentrgernummerReset1Click
end
end
object Registrierung1: TMenuItem
ShortCut = 0
Visible = False
object Info2: TMenuItem
ShortCut = 0
OnClick = Info2Click
end
object Bestellung1: TMenuItem
ShortCut = 0
OnClick = Bestellung1Click
end
end
object Hilfe1: TMenuItem
ShortCut = 0
object Inhalt1: TMenuItem
HelpContext = 1
ShortCut = 0
OnClick = Index1Click
end
object Suchen1: TMenuItem
ShortCut = 0
OnClick = Suchen1Click
end
object Hilfebenutzen1: TMenuItem
ShortCut = 0
OnClick = Hilfebenutzen1Click
end
object N1: TMenuItem
Caption = '-'
ShortCut = 0
end
object Info1: TMenuItem
ShortCut = 0
OnClick = berQCopy1Click
end
end
end
object SingleInstance1: TSingleInstance
Left = 232
Top = 192
end
end