home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip: Shareware for Win 95
/
Chip-Shareware-Win95.bin
/
hudba
/
maniac
/
_setup.1
/
MusicManiac.exe
/
0
/
RCDATA
/
TOPTIONS
/
TOPTIONS.txt
Wrap
Text File
|
1997-01-27
|
13KB
|
535 lines
object Options: TOptions
Left = 242
Top = 152
BorderIcons = [biSystemMenu, biHelp]
BorderStyle = bsSingle
Caption = 'Options'
ClientHeight = 268
ClientWidth = 440
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 0
Top = 6
Width = 440
Height = 233
ActivePage = TabSheet1
Align = alClient
TabOrder = 0
object TabSheet1: TTabSheet
Caption = ' General '
object GroupBox1: TGroupBox
Left = 4
Top = 12
Width = 225
Height = 157
HelpContext = 100100
Caption = 'Buffer size'
TabOrder = 0
object Label1: TLabel
Left = 8
Top = 96
Width = 205
Height = 53
AutoSize = False
Caption =
'The bigger the Buffer, the less the Music "hangs", but the more ' +
'ram is needed.'
end
object staBufferSize: TLabel
Left = 16
Top = 56
Width = 185
Height = 13
AutoSize = False
end
object sldBufferSize: TTrackBar
Left = 4
Top = 20
Width = 209
Height = 33
HelpContext = 100100
LineSize = 2
Max = 17
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBottomRight
TickStyle = tsAuto
OnChange = sldBufferSizeChange
end
end
object GroupBox2: TGroupBox
Left = 244
Top = 12
Width = 177
Height = 157
HelpContext = 100200
Caption = 'Output mode'
TabOrder = 1
object chk8bit_Mono: TRadioButton
Left = 8
Top = 20
Width = 97
Height = 17
HelpContext = 100200
Caption = '8 Bit; Mono'
TabOrder = 0
OnClick = chk8bit_MonoClick
end
object chk16bit_Mono: TRadioButton
Left = 8
Top = 68
Width = 113
Height = 17
HelpContext = 100200
Caption = '16 Bit; Mono'
TabOrder = 1
OnClick = chk16bit_MonoClick
end
object chk8bit_Stereo: TRadioButton
Left = 8
Top = 44
Width = 113
Height = 17
HelpContext = 100200
Caption = '8 Bit; Stereo'
TabOrder = 2
OnClick = chk8bit_StereoClick
end
object chk16bit_Stereo: TRadioButton
Left = 8
Top = 92
Width = 113
Height = 17
HelpContext = 100200
Caption = '16 Bit; Stereo'
Checked = True
TabOrder = 3
TabStop = True
OnClick = chk16bit_StereoClick
end
end
end
object TabSheet3: TTabSheet
Caption = ' Advanced '
object GroupBox3: TGroupBox
Left = 4
Top = 12
Width = 305
Height = 97
HelpContext = 100300
Caption = 'Mixing Frequency'
TabOrder = 0
object staSampFText: TLabel
Left = 164
Top = 24
Width = 125
Height = 17
AutoSize = False
end
object Label6: TLabel
Left = 16
Top = 60
Width = 249
Height = 33
AutoSize = False
Caption =
'The higher the Mixing frequency the better, but the more CPU-tim' +
'e is needed.'
end
object sldSamplingFreq: TTrackBar
Left = 4
Top = 20
Width = 150
Height = 33
HelpContext = 100300
Max = 4
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBottomRight
TickStyle = tsAuto
OnChange = sldSamplingFreqChange
end
end
object GroupBox10: TGroupBox
Left = 4
Top = 120
Width = 305
Height = 65
HelpContext = 100400
Caption = 'Scroller speed'
TabOrder = 1
object staScrollerSpeed: TLabel
Left = 164
Top = 24
Width = 125
Height = 17
AutoSize = False
end
object sldScrollSpeed: TTrackBar
Left = 8
Top = 20
Width = 150
Height = 37
HelpContext = 100400
Max = 3
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBottomRight
TickStyle = tsAuto
OnChange = sldScrollSpeedChange
end
end
end
object TabSheet6: TTabSheet
Caption = 'Other'
object GroupBox11: TGroupBox
Left = 4
Top = 120
Width = 421
Height = 65
HelpContext = 100050
Caption = 'Fadeout-Time'
TabOrder = 0
object staFadeout: TLabel
Left = 232
Top = 28
Width = 177
Height = 21
AutoSize = False
Caption = 'staFadeout'
end
object sldFadeout: TTrackBar
Left = 8
Top = 20
Width = 209
Height = 33
Max = 30
Orientation = trHorizontal
Frequency = 1
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBottomRight
TickStyle = tsAuto
OnChange = sldFadeoutChange
end
end
object GroupBox12: TGroupBox
Left = 4
Top = 12
Width = 421
Height = 89
HelpContext = 100150
Caption = 'Program for volume-control ("Actions"-"Volume")'
TabOrder = 1
object Label5: TLabel
Left = 12
Top = 52
Width = 393
Height = 29
AutoSize = False
Caption =
'This command will be executed, when you select "Actions" - "Volu' +
'me". If you want the default volume-control: leave it blank.'
end
object ediVolumeControl: TEdit
Left = 8
Top = 20
Width = 309
Height = 21
TabOrder = 0
end
object btnVolumeControlSelected: TNewButton
Left = 332
Top = 18
Width = 75
Height = 23
Caption = '&Browse'
TabOrder = 1
OnClick = btnVolumeControlSelectedClick
end
end
end
object TabSheet2: TTabSheet
Caption = 'User Actions #1'
object GroupBox4: TGroupBox
Left = 4
Top = 12
Width = 421
Height = 53
Caption = 'Execute this Line when selected (F10)'
TabOrder = 0
object ediAction1: TEdit
Left = 8
Top = 20
Width = 309
Height = 21
HelpContext = 100500
TabOrder = 0
end
object btnUserAction1: TNewButton
Left = 332
Top = 18
Width = 75
Height = 23
HelpContext = 100900
Caption = '&Browse'
TabOrder = 1
OnClick = btnUserAction1Click
end
end
object chkSleep1: TCheckBox
Left = 8
Top = 72
Width = 209
Height = 17
HelpContext = 100600
Caption = 'Sleep for 1 second before execute'
TabOrder = 1
end
object chkClose1: TCheckBox
Left = 8
Top = 92
Width = 337
Height = 17
HelpContext = 100700
Caption = 'Close module before execute'
TabOrder = 2
end
object GroupBox5: TGroupBox
Left = 4
Top = 132
Width = 421
Height = 65
Caption = 'Hint'
TabOrder = 3
object Label3: TLabel
Left = 8
Top = 15
Width = 405
Height = 42
AutoSize = False
Caption =
'You may specify the current Module by typing %1 anywhere. %1 wil' +
'l insert the current name and path in short Form (8+3), "%1" wil' +
'l do the same with long Filenames.'
end
end
end
object TabSheet4: TTabSheet
Caption = 'User Action #2'
object GroupBox6: TGroupBox
Left = 4
Top = 132
Width = 421
Height = 65
Caption = 'Hint'
TabOrder = 0
object Label2: TLabel
Left = 8
Top = 15
Width = 405
Height = 42
AutoSize = False
Caption =
'You may specify the current Module by typing %1 anywhere. %1 wil' +
'l insert the current name and path in short Form (8+3), "%1" wil' +
'l do the same with long Filenames.'
end
end
object GroupBox8: TGroupBox
Left = 4
Top = 12
Width = 421
Height = 53
Caption = 'Execute this Line when selected (F11)'
TabOrder = 1
object ediAction2: TEdit
Left = 8
Top = 20
Width = 309
Height = 21
HelpContext = 100500
TabOrder = 0
end
object btnUserAction2: TNewButton
Left = 332
Top = 18
Width = 75
Height = 23
HelpContext = 100900
Caption = '&Browse'
TabOrder = 1
OnClick = btnUserAction2Click
end
end
object chkSleep2: TCheckBox
Left = 8
Top = 72
Width = 209
Height = 17
HelpContext = 100600
Caption = 'Sleep for 1 second before execute'
TabOrder = 2
end
object chkClose2: TCheckBox
Left = 8
Top = 92
Width = 337
Height = 17
HelpContext = 100700
Caption = 'Close module before execute'
TabOrder = 3
end
end
object TabSheet5: TTabSheet
Caption = 'User Action #3'
object GroupBox7: TGroupBox
Left = 4
Top = 132
Width = 421
Height = 65
Caption = 'Hint'
TabOrder = 0
object Label4: TLabel
Left = 8
Top = 15
Width = 405
Height = 42
AutoSize = False
Caption =
'You may specify the current Module by typing %1 anywhere. %1 wil' +
'l insert the current name and path in short Form (8+3), "%1" wil' +
'l do the same with long Filenames.'
end
end
object GroupBox9: TGroupBox
Left = 4
Top = 12
Width = 421
Height = 53
Caption = 'Execute this Line when selected (F12)'
TabOrder = 1
object ediAction3: TEdit
Left = 8
Top = 20
Width = 309
Height = 21
HelpContext = 100500
TabOrder = 0
end
object btnUserAction3: TNewButton
Left = 332
Top = 18
Width = 75
Height = 23
HelpContext = 100900
Caption = '&Browse'
TabOrder = 1
OnClick = btnUserAction3Click
end
end
object chkSleep3: TCheckBox
Left = 8
Top = 72
Width = 209
Height = 17
HelpContext = 100600
Caption = 'Sleep for 1 second before execute'
TabOrder = 2
end
object chkClose3: TCheckBox
Left = 8
Top = 92
Width = 337
Height = 17
HelpContext = 100700
Caption = 'Close module before execute'
TabOrder = 3
end
end
end
object panButtom: TPanel
Left = 0
Top = 239
Width = 440
Height = 29
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object btnCancel: TNewButton
Left = 360
Top = 4
Width = 75
Height = 23
HelpContext = 90200
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 0
OnClick = btnCancelClick
end
object btnOK: TNewButton
Left = 276
Top = 4
Width = 75
Height = 23
HelpContext = 90100
Caption = 'OK'
Default = True
ModalResult = 1
TabOrder = 1
OnClick = btnOKClick
end
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 440
Height = 6
Align = alTop
BevelOuter = bvNone
TabOrder = 2
end
object opdSelectApp: TOpenDialog
FileEditStyle = fsEdit
Filter =
'All Programs (*.exe,*.bat,*.com)|*.EXE;*.BAT;*:COM;*.PIF|All Fil' +
'es (*.*)|*.*'
InitialDir = 'C:\'
Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofShareAware, ofNoReadOnlyReturn]
Left = 396
Top = 114
end
object opdVolumeControl: TOpenDialog
FileEditStyle = fsEdit
Filter =
'All Programs (*.exe,*.bat,*.com)|*.EXE;*.BAT;*:COM;*.PIF|All Fil' +
'es (*.*)|*.*'
InitialDir = 'C:\'
Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofShareAware, ofNoReadOnlyReturn]
Left = 392
Top = 166
end
end