home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 1999 July
/
PCWorld_1999-07_cd.bin
/
software
/
TemaCD
/
Massiva
/
MASSIVA.EXE
/
0
/
RCDATA
/
TFMOPTIONS
/
TFMOPTIONS.txt
Wrap
Text File
|
1999-04-03
|
19KB
|
774 lines
object fmOptions: TfmOptions
Left = 136
Top = 75
HelpContext = 3
BorderStyle = bsDialog
Caption = 'Options'
ClientHeight = 277
ClientWidth = 372
Color = clSilver
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsItalic]
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 14
object RotateLabel1: TRotateLabel
Left = 285
Top = 246
Width = 80
Height = 29
Cursor = crHandPoint
Hint = 'Click for help'
Escapement = 5
TextStyle = tsRecessed
Caption = 'Options'
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -21
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
Transparent = True
OnClick = RotateLabel1Click
end
object PageControl1: TPage95Control
Left = 80
Top = 8
Width = 281
Height = 241
ActivePage = TabMidi
ButtonStyle = True
FlatButtons = True
FlatSeperators = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
HotTrack = True
TabInactiveColor = clSilver
TabInactiveFont.Charset = ANSI_CHARSET
TabInactiveFont.Color = clBlack
TabInactiveFont.Height = -11
TabInactiveFont.Name = 'Arial'
TabInactiveFont.Style = []
ParentFont = False
TabOrder = 0
OnChange = PageControl1Change
object TabFile: TTab95Sheet
Caption = 'File'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsItalic]
GripAlign = gaLeft
ImageIndex = -1
StaticPageIndex = -1
ParentFont = False
TabVisible = True
object Label8: TLabel
Left = 16
Top = 88
Width = 71
Height = 14
Caption = 'Song directory'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object SpeedButton8: TSpeedButton
Left = 224
Top = 104
Width = 17
Height = 17
Hint = 'Show/hide directory'
Caption = '...'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton8Click
end
object chkAutoplay: TCheckBox
Left = 16
Top = 40
Width = 193
Height = 17
Caption = 'Start playback on start-up'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 0
OnClick = chkAutoplayClick
end
object chkAautoload: TCheckBox
Left = 16
Top = 16
Width = 201
Height = 17
Caption = 'Open last saved song on start-up'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = chkAautoloadClick
end
object editPath: TEdit
Left = 16
Top = 104
Width = 201
Height = 22
Color = clBlack
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object DirectoryListBox1: TDirectoryListBox
Left = 16
Top = 104
Width = 201
Height = 105
Cursor = crHandPoint
Color = clBlack
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ItemHeight = 16
ParentFont = False
TabOrder = 3
Visible = False
OnChange = DirectoryListBox1Change
end
object chkConvert: TCheckBox
Left = 16
Top = 64
Width = 233
Height = 17
Caption = 'Split MIDI files format 0 on MIDI channels'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 4
OnClick = chkConvertClick
end
end
object TabBeep: TTab95Sheet
Caption = 'Beep'
GripAlign = gaLeft
ImageIndex = -1
StaticPageIndex = -1
TabVisible = True
object Label1: TLabel
Left = 120
Top = 73
Width = 13
Height = 14
Caption = 'Ch'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 184
Top = 73
Width = 22
Height = 14
Caption = 'Note'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 32
Top = 101
Width = 32
Height = 14
Caption = 'Output'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 32
Top = 172
Width = 28
Height = 14
Caption = 'Beats'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Bevel1: TBevel
Left = 16
Top = 128
Width = 233
Height = 3
Style = bsRaised
end
object chkActive: TCheckBox
Left = 16
Top = 16
Width = 57
Height = 17
Caption = 'Active'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 0
OnClick = chkActiveClick
end
object chkPrecount: TCheckBox
Left = 16
Top = 141
Width = 70
Height = 17
Caption = 'Precount'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 1
OnClick = chkPrecountClick
end
object chkInternal: TCheckBox
Left = 32
Top = 44
Width = 81
Height = 17
Hint = 'Use internal metronom'
Caption = 'PC speaker'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnClick = chkInternalClick
end
object chkMidiBeep: TCheckBox
Left = 32
Top = 72
Width = 49
Height = 17
Hint = 'Use metronom thru midi'
Caption = 'MIDI'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
State = cbChecked
TabOrder = 3
OnClick = chkMidiBeepClick
end
object editCh: TEdit
Left = 139
Top = 70
Width = 23
Height = 21
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
Text = '1'
OnChange = editChChange
OnKeyPress = editChKeyPress
end
object editNote: TEdit
Left = 219
Top = 70
Width = 28
Height = 21
Hint = 'Input note with midi-keyboard'
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 5
Text = 'C#1'
end
object comboDev: TComboBox
Left = 80
Top = 97
Width = 169
Height = 21
Style = csDropDownList
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 6
OnChange = comboDevChange
end
object editBeats: TEditNew
Left = 72
Top = 168
Width = 25
Height = 21
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 2
ParentFont = False
TabOrder = 7
Text = '4'
OnChange = editBeatsChange
OnExit = editBeatsExit
OnKeyPress = editBeatsKeyPress
FocusColor = clBlack
FocusFontColor = clWhite
NoFocusColor = clBlack
NoFocusFontColor = clWhite
end
object RadioButton1: TRadioButton
Left = 120
Top = 44
Width = 49
Height = 17
Caption = 'Low'
Checked = True
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 8
TabStop = True
end
object RadioButton2: TRadioButton
Left = 184
Top = 44
Width = 49
Height = 17
Caption = 'High'
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 9
end
end
object TabMidi: TTab95Sheet
Caption = 'MIDI'
GripAlign = gaLeft
ImageIndex = -1
StaticPageIndex = -1
TabVisible = True
object SpeedButton7: TSpeedButton
Left = 192
Top = 127
Width = 49
Height = 22
Caption = 'Apply'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton7Click
end
object Label5: TLabel
Left = 16
Top = 108
Width = 133
Height = 14
Caption = 'Use this output on all tracks'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 16
Top = 52
Width = 67
Height = 14
Caption = 'Default output'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 16
Top = 4
Width = 44
Height = 14
Caption = 'Midi input'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object comboTrackOutput: TComboBox
Left = 16
Top = 128
Width = 169
Height = 21
Hint = 'Default output on start-up'
Style = csDropDownList
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
OnChange = comboDevDefaultChange
end
object comboDevDefault: TComboBox
Left = 16
Top = 72
Width = 169
Height = 21
Hint = 'Default output on start-up'
Style = csDropDownList
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnChange = comboDevDefaultChange
end
object comboInput: TComboBox
Left = 16
Top = 24
Width = 169
Height = 21
Hint = 'Midi input device'
Style = csDropDownList
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 2
OnChange = comboInputChange
end
object LedMeter: TCheckBox
Left = 16
Top = 163
Width = 217
Height = 17
Caption = 'Show MIDI output led'#39's in tracks window'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 3
end
end
object TabGlobal: TTab95Sheet
Caption = 'Tempo'
GripAlign = gaLeft
ImageIndex = -1
StaticPageIndex = -1
TabVisible = True
object Label7: TLabel
Left = 16
Top = 6
Width = 73
Height = 14
Caption = 'Tempo settings'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 16
Top = 126
Width = 257
Height = 28
AutoSize = False
Caption =
'� Right click on bpm in "Song edit" or "Part edit" to select one' +
' of the tempo settings'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Transparent = True
WordWrap = True
end
object Label12: TLabel
Left = 16
Top = 158
Width = 257
Height = 27
AutoSize = False
Caption = '� Double click to select the top tempo item'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Transparent = True
WordWrap = True
end
object memoTempo: TMemo
Left = 16
Top = 24
Width = 113
Height = 89
BorderStyle = bsNone
Color = clBlack
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ScrollBars = ssVertical
TabOrder = 0
OnExit = memoTempoExit
OnKeyPress = memoTempoKeyPress
end
end
object TabLayout: TTab95Sheet
Caption = 'Layout'
GripAlign = gaLeft
ImageIndex = -1
StaticPageIndex = -1
TabVisible = True
object chkFlat: TCheckBox
Left = 16
Top = 8
Width = 137
Height = 17
Caption = 'Flat buttons on toolbars'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 0
OnClick = chkFlatClick
end
object chkAnim: TCheckBox
Left = 16
Top = 32
Width = 201
Height = 17
Caption = 'Show part contents while dragging'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = chkAnimClick
end
object chkLocation: TCheckBox
Left = 16
Top = 56
Width = 217
Height = 17
Caption = 'Show location names in meter window'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
State = cbChecked
TabOrder = 2
OnClick = chkLocationClick
end
end
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 70
Height = 277
Align = alLeft
BevelOuter = bvNone
FullRepaint = False
Color = clBlack
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
object labelText: TLabel
Left = 8
Top = 58
Width = 57
Height = 175
AutoSize = False
Caption =
'Select options for autosave and open last saved song at program ' +
'start'
Color = clNavy
Font.Charset = ANSI_CHARSET
Font.Color = 8454143
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
WordWrap = True
end
object btnClose: tnybutton
Left = 7
Top = 6
Width = 57
Height = 25
Cursor = crHandPoint
Cancel = True
Caption = '&Close'
Default = True
Font.Charset = ANSI_CHARSET
Font.Color = clSilver
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = btnCloseClick
end
end
object TimerAutoSave: TTimer
Interval = 300000
Left = 212
Top = 320
end
object OpenPictureDialog1: TOpenPictureDialog
Filter =
'All (*.dib;*.bmp;*.ico;*.emf;*.wmf)|*.dib;*.bmp;*.ico;*.emf;*.wm' +
'f|Device Independent Bitmap (*.dib)|*.dib|Bitmaps (*.bmp)|*.bmp|' +
'Icons (*.ico)|*.ico|Enhanced Metafiles (*.emf)|*.emf|Metafiles (' +
'*.wmf)|*.wmf'
Left = 244
Top = 320
end
object ColorDialog1: TColorDialog
Ctl3D = True
Left = 176
Top = 320
end
object Timer1: TTimer
Enabled = False
Interval = 10
OnTimer = Timer1Timer
Left = 128
Top = 320
end
end