home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 200
- Top = 108
- BorderIcons = [biSystemMenu]
- BorderStyle = bsSingle
- Caption = 'BASS - Stream Demo'
- ClientHeight = 272
- ClientWidth = 297
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Button1: TButton
- Left = 8
- Top = 8
- Width = 281
- Height = 25
- Caption = '1.) Initialize BASS'
- Enabled = False
- TabOrder = 0
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 8
- Top = 40
- Width = 281
- Height = 25
- Caption = '2.) Create a user stream'
- Enabled = False
- TabOrder = 1
- OnClick = Button2Click
- end
- object Button3: TButton
- Left = 8
- Top = 72
- Width = 281
- Height = 25
- Caption = '3.) Start stream playback'
- Enabled = False
- TabOrder = 2
- OnClick = Button3Click
- end
- object GroupBox1: TGroupBox
- Left = 8
- Top = 104
- Width = 281
- Height = 129
- Caption = '4.) Sine sound settings'
- Enabled = False
- TabOrder = 3
- object Label1: TLabel
- Left = 8
- Top = 16
- Width = 50
- Height = 13
- Caption = 'Frequency'
- end
- object Label2: TLabel
- Left = 8
- Top = 72
- Width = 46
- Height = 13
- Caption = 'Amplitude'
- end
- object Label3: TLabel
- Left = 8
- Top = 52
- Width = 81
- Height = 13
- AutoSize = False
- Caption = '1Hz'
- end
- object Label4: TLabel
- Left = 200
- Top = 52
- Width = 72
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = '5kHz'
- end
- object Label5: TLabel
- Left = 8
- Top = 108
- Width = 89
- Height = 13
- AutoSize = False
- Caption = '0%'
- end
- object Label6: TLabel
- Left = 176
- Top = 108
- Width = 96
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = '100%'
- end
- object Label7: TLabel
- Left = 88
- Top = 52
- Width = 113
- Height = 13
- Alignment = taCenter
- AutoSize = False
- Caption = '100Hz'
- end
- object Label8: TLabel
- Left = 88
- Top = 108
- Width = 113
- Height = 13
- Alignment = taCenter
- AutoSize = False
- Caption = '50%'
- end
- object ScrollBar1: TScrollBar
- Left = 8
- Top = 32
- Width = 265
- Height = 16
- LargeChange = 100
- Max = 5000
- Min = 1
- Position = 100
- SmallChange = 10
- TabOrder = 0
- TabStop = False
- OnChange = ScrollBar1Change
- end
- object ScrollBar2: TScrollBar
- Left = 8
- Top = 88
- Width = 265
- Height = 16
- LargeChange = 1024
- Max = 32767
- Position = 16864
- SmallChange = 256
- TabOrder = 1
- TabStop = False
- OnChange = ScrollBar2Change
- end
- end
- object Button4: TButton
- Left = 8
- Top = 240
- Width = 281
- Height = 25
- Caption = 'Shutdown BASS and exit'
- TabOrder = 4
- OnClick = Button4Click
- end
- end
-