home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Hráč 1998 July & August
/
Hrac_23_1998-07-08_cd3.bin
/
mp3utils
/
supbuton
/
SBE.exe
/
0
/
RCDATA
/
TFORM1
/
TFORM1.txt
< prev
Wrap
Text File
|
1998-05-27
|
5KB
|
220 lines
object Form1: TForm1
Left = 267
Top = 106
Hint = 'Welcome to Super Button Extractor'
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
BorderIcons = [biSystemMenu]
BorderStyle = bsNone
Caption = 'Super Button Extractor'
ClientHeight = 240
ClientWidth = 320
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
HelpFile = 'SBtnEx.hlp'
Icon.Data = {<image000.ico>}
Position = poScreenCenter
ShowHint = True
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object btn: TImage
Left = 0
Top = 0
Width = 32
Height = 32
Visible = False
end
object bak: TImage
Left = 0
Top = 0
Width = 320
Height = 240
Hint = 'Graphic created by: Bo Bacon, click here to change it'
Picture.Data = {<image001.bmp>}
OnClick = bakClick
end
object Exit: TLabel
Left = 280
Top = 216
Width = 31
Height = 20
Hint = 'Click here to exit'
Caption = 'Exit'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold, fsUnderline]
ParentFont = False
Transparent = True
OnClick = ExitClick
OnMouseDown = ExitMouseDown
end
object LOpen: TLabel
Left = 121
Top = 184
Width = 31
Height = 13
Caption = 'Open/'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentColor = False
ParentFont = False
Transparent = True
OnClick = LOpenClick
OnMouseDown = LOpenMouseDown
end
object LHide: TLabel
Left = 152
Top = 184
Width = 40
Height = 13
Caption = 'Minimize'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentFont = False
Transparent = True
OnClick = LHideClick
OnMouseDown = LHideMouseDown
end
object LDLL: TLabel
Left = 161
Top = 200
Width = 34
Height = 13
Caption = 'Plugins'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentFont = False
Transparent = True
OnClick = LDLLClick
OnMouseDown = LDLLMouseDown
end
object LBtn: TLabel
Left = 120
Top = 200
Width = 41
Height = 13
Caption = 'Buttons/'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentFont = False
Transparent = True
OnClick = LBtnClick
OnMouseDown = LBtnMouseDown
end
object DLLs: TFileListBox
Left = 96
Top = 104
Width = 129
Height = 49
Color = clBtnFace
ItemHeight = 16
Mask = '*.dll'
TabOrder = 0
Visible = False
OnClick = DLLsClick
end
object Progress: TProgressBar
Left = 96
Top = 88
Width = 129
Height = 16
Min = 0
Max = 100
TabOrder = 1
Visible = False
end
object OpenDialog1: TOpenDialog
DefaultExt = '*.bmp'
Filter = 'Windows Bitmap (*.bmp)|*.bmp'
Options = [ofReadOnly, ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofShareAware]
Left = 288
end
object Tray: TPGTrayIcon95
Icon.Data = {<image002.ico>}
Active = True
AutoPopup = True
Hint = 'Please REGISTER'
PopupMenu = Popup
Left = 264
end
object Popup: TPopupMenu
Left = 288
Top = 24
object Open1: TMenuItem
Caption = '&Open'
OnClick = Open1Click
end
object Helpme: TMenuItem
Caption = '&Help me!'
OnClick = HelpmeClick
end
object Restore1: TMenuItem
Caption = '&Restore'
OnClick = Restore1Click
end
object Download: TMenuItem
Caption = '&Download Latest Version'
OnClick = DownloadClick
end
object Leave: TMenuItem
Caption = 'E&xit'
OnClick = LeaveClick
end
end
object DLLGet: TPopupMenu
Left = 264
Top = 24
object Bal: TMenuItem
Caption = '&Balance'
OnClick = BalClick
end
object CB: TMenuItem
Caption = '&CButtons'
OnClick = CBClick
end
object MS: TMenuItem
Caption = '&Monoster'
OnClick = MSClick
end
object PB: TMenuItem
Caption = '&Posbar'
OnClick = PBClick
end
object SREP: TMenuItem
Caption = '&ShufRep and Eq/Pl'
OnClick = SREPClick
end
object TB: TMenuItem
Caption = '&Titlebar'
OnClick = TBClick
end
object Vol: TMenuItem
Caption = '&Volume'
OnClick = VolClick
end
object Cancel: TMenuItem
Caption = 'C&ancel'
OnClick = CancelClick
end
end
end