home *** CD-ROM | disk | FTP | other *** search
- object OAS: TOAS
- Left = 200
- Top = 104
- Width = 282
- Height = 90
- BorderIcons = [biSystemMenu]
- Caption = 'Overall Settings'
- Color = 10514448
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- PopupMenu = PopupMenu1
- Scaled = False
- OnCreate = FormCreate
- OnHide = FormHide
- OnMouseDown = FormMouseDown
- OnMouseMove = FormMouseMove
- OnMouseUp = FormMouseUp
- OnResize = FormResize
- PixelsPerInch = 96
- TextHeight = 13
- object BTPitch: TBioTrack
- Left = 1
- Top = 1
- Width = 90
- Height = 30
- Delta = -64
- Text = 'Pitch'
- Modified = True
- BigMode = True
- Position = 64
- TabOrder = 0
- TabStop = True
- OnChange = BTPitchChange
- OnGoDefault = BTPitchGoDefault
- end
- object BTReverb: TBioTrack
- Left = 1
- Top = 33
- Width = 90
- Height = 30
- Text = 'Reverb'
- Modified = True
- BigMode = True
- Position = 40
- TabOrder = 1
- TabStop = True
- OnChange = BTReverbChange
- OnGoDefault = BTReverbGoDefault
- end
- object BTChorus: TBioTrack
- Left = 92
- Top = 33
- Width = 90
- Height = 30
- Text = 'Chorus'
- Modified = True
- BigMode = True
- Position = 32
- TabOrder = 2
- TabStop = True
- OnChange = BTChorusChange
- OnGoDefault = BTChorusGoDefault
- end
- object BTVary: TBioTrack
- Left = 183
- Top = 33
- Width = 90
- Height = 30
- Text = 'Variation'
- Modified = True
- BigMode = True
- Position = 0
- TabOrder = 3
- TabStop = True
- OnChange = BTVaryChange
- OnGoDefault = BTVaryGoDefault
- end
- object BTFCut: TBioTrack
- Left = 92
- Top = 1
- Width = 90
- Height = 30
- Text = 'Filter Cut'
- Modified = True
- BigMode = True
- Position = 64
- TabOrder = 4
- TabStop = True
- OnChange = BTFCutChange
- OnGoDefault = BTFCutGoDefault
- end
- object BTFRes: TBioTrack
- Left = 183
- Top = 1
- Width = 90
- Height = 30
- Delta = -64
- Text = 'Filter Res'
- Modified = True
- BigMode = True
- Position = 64
- TabOrder = 5
- TabStop = True
- OnChange = BTFResChange
- OnGoDefault = BTFResGoDefault
- end
- object PopupMenu1: TPopupMenu
- Left = 276
- Top = 28
- object Smalltracks1: TMenuItem
- Caption = 'S&mall tracks'
- OnClick = Smalltracks1Click
- end
- object Caption1: TMenuItem
- Caption = '&Caption'
- Checked = True
- OnClick = Caption1Click
- end
- end
- end
-