home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip: Shareware for Win 95
/
Chip-Shareware-Win95.bin
/
ostatni
/
beyond
/
beyond32.exe
/
0
/
RCDATA
/
TMAINFORM
/
TMAINFORM.txt
Wrap
Text File
|
1997-02-15
|
21KB
|
630 lines
object MainForm: TMainForm
Left = 244
Top = 141
Width = 629
Height = 454
Caption = '%'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
PopupMenu = PropertiesPopup
Position = poDefaultPosOnly
ShowHint = True
OnActivate = FormActivate
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Header: TPaintBox
Left = 0
Top = 26
Width = 621
Height = 22
Align = alTop
OnMouseDown = RightClickHandler
OnPaint = HeaderPaint
end
object Bevel: TBevel
Left = 0
Top = 0
Width = 621
Height = 2
Align = alTop
Shape = bsTopLine
end
object StatusBar: TPaintBox
Left = 0
Top = 387
Width = 621
Height = 21
Align = alBottom
OnMouseDown = RightClickHandler
OnPaint = StatusBarPaint
end
object ListBox: TListBox
Left = 0
Top = 48
Width = 621
Height = 339
Align = alClient
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 20
MultiSelect = True
ParentFont = False
PopupMenu = FunctionsPopup
Style = lbOwnerDrawFixed
TabOrder = 0
OnClick = ListBoxClick
OnDblClick = ListBoxDblClick
OnDrawItem = ListBoxDrawItem
OnKeyDown = ListBoxKeyDown
OnKeyPress = ListBoxKeyPress
OnMouseDown = RightClickHandler
end
object MainToolbar: TToolbarControl
Left = 0
Top = 2
Width = 621
Height = 24
Align = alTop
BevelOuter = bvNone
IniFilename = 'BEYOND32.INI'
TabOrder = 1
OnMouseDown = RightClickHandler
object SelectBtn: TSpeedButton
Left = 11
Top = 2
Width = 22
Height = 22
Hint = 'Select Directories'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
333337F373F773333333303330033333333337F3377333333333303333333333
333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
333337777F337F33333330330BB00333333337F373F773333333303330033333
333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
333377777F77377733330BBB0333333333337F337F33333333330BB003333333
333373F7733333333333300333333333333337733333333333330000}
NumGlyphs = 2
OnClick = SelectBtnClick
end
object ShowAnyBtn: TSpeedButton
Tag = 1
Left = 55
Top = 2
Width = 22
Height = 22
Hint = 'Show Any'
GroupIndex = 1
Down = True
Glyph.Data = {
C6000000424DC60000000000000076000000280000000A0000000A0000000100
0400000000005000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777F7777F700
0000770FF770F70000007800FF00770000007880000777000000778800FFF700
000077000000FF000000700800F007000000887800F877000000777800777700
00007778877777000000}
OnClick = ShowAny1Click
end
object ShowMismatchesBtn: TSpeedButton
Tag = 2
Left = 77
Top = 2
Width = 22
Height = 22
Hint = 'Show Mismatches Only'
GroupIndex = 1
Glyph.Data = {
BE000000424DBE0000000000000076000000280000000F000000090000000100
0400000000004800000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0077777FF777FF
777077770077700FF770777007778800FF707700777778800FF0700FF7777788
00708800FF777770077078800FF7770077707788007770077770777888778877
7770}
OnClick = ShowMismatchesOnly1Click
end
object ShowMatchesBtn: TSpeedButton
Tag = 3
Left = 99
Top = 2
Width = 22
Height = 22
Hint = 'Show Matches Only'
GroupIndex = 1
Glyph.Data = {
E6000000424DE60000000000000076000000280000000E0000000E0000000100
0400000000000000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
77007777777777777700777777777777770077777777777777007777FFFFFFFF
7785777000000007770277888888887777007777FFFFFFFF774F777000000007
77007788888888777700777777777777770077777777777777FF777777777777
77007777777777777700}
OnClick = ShowMatchesOnly1Click
end
object ShowDoublesBtn: TSpeedButton
Tag = 4
Left = 121
Top = 2
Width = 22
Height = 22
Hint = 'Show Double Sides Only'
GroupIndex = 1
Glyph.Data = {
A6000000424DA6000000000000007600000028000000080000000C0000000100
0400000000003000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0077FFFFFF7000
000780088877800FF7778800FF7778800FF7778800FF77F8800F700F800F800F
80078800007778888777}
OnClick = ShowDoubleSidesOnly1Click
end
object ShowSinglesBtn: TSpeedButton
Tag = 5
Left = 143
Top = 2
Width = 22
Height = 22
Hint = 'Show Single Sides Only'
GroupIndex = 1
Glyph.Data = {
A6000000424DA6000000000000007600000028000000060000000C0000000100
0400000000003000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF007777FF007770
0F0077800F0077800F0077800F0077800F0077800F0077800F0077800F007000
0F008880070077887700}
OnClick = ShowSingleSidesOnly1Click
end
object RefreshBtn: TSpeedButton
Tag = 6
Left = 432
Top = 2
Width = 22
Height = 22
Hint = 'Refresh'
Glyph.Data = {
E6000000424DE60000000000000076000000280000000E0000000E0000000100
0400000000000000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777888777
770077778000088777007780000000087700770007FFF0008700770077777F00
87C67007777777F008C6F007777777F008C6F007777787F008C6F008777F08F0
07C67F00877F080077C67F00777F000087C677F7777F000877C67777777F0000
08C67777777FFFFFF7C6}
Visible = False
OnClick = RefreshBtnClick
end
object CopyRightBtn: TSpeedButton
Tag = 9
Left = 231
Top = 2
Width = 22
Height = 22
Hint = 'Copy To Right'
Glyph.Data = {
50010000424D500100000000000076000000280000001E0000000C0000000100
040000000000C000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777778877
777777777778877777007777777F00877777777777F7787777007777777F0008
7777777777F77787770078888887000087778888887777787700F00000000000
087F7777777777778700F00000000000008F7777777777777800F00000000000
007F7777777777777700F00000000000077F7777777777777700FFFFFFFF0000
777FFFFFFFF7777777007777777F00077777777777F7777777007777777F0077
7777777777F7777777007777777FF7777777777777FF77777700000000000000
0000000000000000000000000000000000000000}
Layout = blGlyphRight
NumGlyphs = 2
OnClick = CopyRightBtnClick
end
object CopyLeftBtn: TSpeedButton
Tag = 10
Left = 253
Top = 2
Width = 22
Height = 22
Hint = 'Copy To Left'
Glyph.Data = {
50010000424D500100000000000076000000280000001E0000000C0000000100
040000000000C000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777887777
7777777778877777770077777008777777777777778777777700777700087777
7777777777877777770077700008888888877777778888888800770000000000
0087777777777777780070000000000000877777777777777800F00000000000
008F7777777777777800FF0000000000008F77777777777778007FF00007FFFF
FF77FF77777FFFFFF70077FF0008777777777FF7778777777700777FF0087777
777777FF7787777777007777FFF777777777777FFF7777777700000000000000
0000000000000000000000000000000000000000}
NumGlyphs = 2
ParentShowHint = False
ShowHint = True
OnClick = CopyLeftBtnClick
end
object DeleteBtn: TSpeedButton
Tag = 11
Left = 297
Top = 2
Width = 22
Height = 22
Hint = 'Delete'
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
777770000000777777777777777770000000777777777777770F700000007777
0F777777777770000000777000F7777770F770000000777000F777770F777000
00007777000F77700F777000000077777000F700F7777000000077777700000F
7777700000007777777000F777777000000077777700000F7777700000007777
7000F70F7777700000007770000F77700F7770000000770000F7777700F77000
00007700F7777777700F70000000777777777777777770000000777777777777
777770000000}
OnClick = DeleteBtnClick
end
object CloseBtn: TSpeedButton
Tag = 12
Left = 480
Top = 2
Width = 22
Height = 22
Hint = 'Exit Program'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
03333377777777777F333301111111110333337F333333337F33330111111111
0333337F333333337F333301111111110333337F333333337F33330111111111
0333337F333333337F333301111111110333337F333333337F33330111111111
0333337F3333333F7F333301111111B10333337F333333737F33330111111111
0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
0333337F377777337F333301111111110333337F333333337F33330111111111
0333337FFFFFFFFF7F33330000000000033333777777777773330000}
NumGlyphs = 2
Visible = False
OnClick = CloseBtnClick
end
object HelpBtn: TSpeedButton
Left = 456
Top = 2
Width = 22
Height = 22
Hint = 'Help'
Glyph.Data = {
06010000424D060100000000000076000000280000000C000000120000000100
0400000000009000000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777766777777
00007776446777770000777E6647777701007777E66777770000777777777777
000077774467777700007776664777770000777E664777770000777E66647777
62007777E6664777010077777E6664770000744777E6664700006664777E6647
0000E6664446664700A07E6666666667620077EE6666667700007777EEEEE777
00007777777777776200}
Visible = False
OnClick = Contents1Click
end
object QuickCompareBtn: TSpeedButton
Tag = 8
Left = 209
Top = 2
Width = 22
Height = 22
Hint = 'Quick Compare'
Glyph.Data = {
D6000000424DD6000000000000007600000028000000100000000C0000000100
0400000000006000000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
FF777777777777700777777777777778FF7777FFFFFFF7700F77700000007770
0F778888888777700FF777FFFFFFF77800FF7000000077F8800F8888888770FF
800F77777777800F800777777777880000777777777778888777}
OnClick = PopupQuickCompareClick
end
object SetPropertiesBtn: TSpeedButton
Tag = 6
Left = 408
Top = 2
Width = 22
Height = 22
Hint = 'Properties'
Glyph.Data = {
F6000000424DF60000000000000076000000280000000E000000100000000100
0400000000008000000000000000000000001000000010000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00778888888888
7700700000000008775F70FFFFFFFF08770070FFFF00FF08770070FFF0000F08
770070FF80000F08770070F800000008770070F000F0000877F070F00FFF0008
770070FFFFF00008770070FFFFF0F000770070FFFFF007008700700000007780
07A0777777777770080077777777777700F07777777777777000}
Visible = False
OnClick = SetPropertiesBtnClick
end
object SelectAllBtn: TSpeedButton
Left = 187
Top = 2
Width = 22
Height = 22
Hint = 'Select All'
Glyph.Data = {
FE000000424DFE0000000000000076000000280000000C000000110000000100
0400000000008800000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0077770F777777
7FFF777000F77777FFFF770000F77777FFFF7000F00F7777FFFF000F7700F777
FFFF70F77770F777FFEF777777770F77FFFF77770F7770F77FFF777000F7770F
FFFF770000F77770FFFF7000F00F7777FFFF000F7700F777FFFF70F77770F777
FFEF777777770F77FFFF7777777770F77FFF77777777770FFFFF777777777770
FFFF}
OnClick = SelectAllClick
end
object PrintBtn: TSpeedButton
Tag = 6
Left = 384
Top = 2
Width = 22
Height = 22
Hint = 'Report'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
0003377777777777777308888888888888807F33333333333337088888888888
88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
33333337FFFF77333333333000000333333333377777733333330000}
NumGlyphs = 2
Visible = False
OnClick = PrintBtnClick
end
object SelectNewerBtn: TSpeedButton
Left = 360
Top = 2
Width = 22
Height = 22
Hint = 'Select Newer'
Glyph.Data = {
FE000000424DFE0000000000000076000000280000000C000000110000000100
0400000000008800000000000000000000001000000010000000000000000000
BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0077771F777777
7FFF777111F77777FFFF771111F77777FFFF7111F11F7777FFFF111F7711F777
FFFF71F77771F777FFEF777777771F77FFFF77771F7771F77FFF777111F7771F
FFFF771111F77771FFFF7111F11F7777FFFF111F7711F777FFFF71F77771F777
FFEF777777771F77FFFF7777777771F77FFF77777777771FFFFF777777777771
FFFF}
Visible = False
OnClick = SelectNewerBtnClick
end
end
object FunctionsPopup: TPopupMenu
AutoPopup = False
Left = 48
Top = 96
object PopupCopyRight: TMenuItem
Caption = 'Copy -->'
ShortCut = 0
OnClick = CopyRightBtnClick
end
object PopupCopyLeft: TMenuItem
Caption = '<-- Copy'
ShortCut = 0
OnClick = CopyLeftBtnClick
end
object N1: TMenuItem
Caption = '-'
ShortCut = 0
end
object PopupDelete: TMenuItem
Caption = 'Delete...'
ShortCut = 0
OnClick = DeleteBtnClick
end
object PopupQuickCompare: TMenuItem
Caption = '&Quick Compare'
ShortCut = 0
OnClick = PopupQuickCompareClick
end
object PopupLink: TMenuItem
Caption = 'Link'
ShortCut = 0
OnClick = PopupLinkClick
end
end
object PropertiesPopup: TPopupMenu
AutoPopup = False
Left = 80
Top = 96
object Properties2: TMenuItem
Caption = '&Properties...'
ShortCut = 0
OnClick = SetPropertiesBtnClick
end
end
object MainMenu1: TMainMenu
Left = 16
Top = 96
object File1: TMenuItem
Caption = '&File'
ShortCut = 0
object Open1: TMenuItem
Caption = '&Open in Viewer'
ShortCut = 0
OnClick = ListBoxDblClick
end
object SelectAll1: TMenuItem
Caption = '&Select All'
ShortCut = 0
OnClick = SelectAllClick
end
object SelectNewer1: TMenuItem
Caption = 'Select &Newer'
ShortCut = 0
OnClick = SelectNewerBtnClick
end
object QuickCompare1: TMenuItem
Caption = '&Quick Compare'
ShortCut = 0
OnClick = PopupQuickCompareClick
end
object Copy1: TMenuItem
Caption = 'Copy -->'
ShortCut = 0
OnClick = CopyRightBtnClick
end
object Copy2: TMenuItem
Caption = '<-- Copy'
ShortCut = 0
OnClick = CopyLeftBtnClick
end
object Delete1: TMenuItem
Caption = 'Delete...'
ShortCut = 0
OnClick = DeleteBtnClick
end
object N3: TMenuItem
Caption = '-'
ShortCut = 0
end
object SelectDirectories1: TMenuItem
Caption = '&Directories...'
ShortCut = 0
OnClick = SelectBtnClick
end
object Refresh1: TMenuItem
Caption = '&Refresh'
ShortCut = 116
OnClick = RefreshBtnClick
end
object N2: TMenuItem
Caption = '-'
ShortCut = 0
end
object Exit1: TMenuItem
Caption = 'E&xit'
ShortCut = 27
OnClick = CloseBtnClick
end
end
object Display1: TMenuItem
Caption = '&Display'
ShortCut = 0
object ShowAny1: TMenuItem
Caption = 'Show Any'
ShortCut = 0
OnClick = ShowAny1Click
end
object ShowMismatchesOnly1: TMenuItem
Caption = 'Show Mismatches Only'
ShortCut = 0
OnClick = ShowMismatchesOnly1Click
end
object ShowMatchesOnly1: TMenuItem
Caption = 'Show Matches Only'
ShortCut = 0
OnClick = ShowMatchesOnly1Click
end
object ShowDoubleSidesOnly1: TMenuItem
Caption = 'Show Double Sides Only'
ShortCut = 0
OnClick = ShowDoubleSidesOnly1Click
end
object ShowSingleSidesOnly1: TMenuItem
Caption = 'Show Single Sides Only'
ShortCut = 0
OnClick = ShowSingleSidesOnly1Click
end
object N6: TMenuItem
Caption = '-'
ShortCut = 0
end
object Report1: TMenuItem
Caption = '&Report...'
ShortCut = 0
OnClick = PrintBtnClick
end
object Properties1: TMenuItem
Caption = '&Properties...'
ShortCut = 0
OnClick = SetPropertiesBtnClick
end
end
object Help1: TMenuItem
Caption = '&Help'
ShortCut = 0
object Contents1: TMenuItem
Caption = '&Contents'
ShortCut = 0
OnClick = Contents1Click
end
object N4: TMenuItem
Caption = '-'
ShortCut = 0
end
object Register1: TMenuItem
Caption = '&Register...'
ShortCut = 0
OnClick = Register1Click
end
object N5: TMenuItem
Caption = '-'
ShortCut = 0
end
object About1: TMenuItem
Caption = '&About...'
ShortCut = 0
OnClick = About1Click
end
end
end
object SSReport: TSSReport
LogoAlignment = taLeftJustify
LogoOffset = 0
LogoShrink = 0
Orientation = poPortrait
OnHeading = SSReportHeading
Left = 112
Top = 96
FontList = (
'Arial'
'S'
10
''
0
0
'Arial'
'S'
10
'Bold'
0
0
'Arial'
'S'
6
''
0
0)
end
end