delphi audio 处理控件

				object Form1: TForm1				  Left = 196				  Top = 137				  Width = 696				  Height = 480				  HorzScrollBar.Range = 294				  VertScrollBar.Range = 106				  Caption = 'Form1'				  Color = clBackground				  PixelsPerInch = 72				  TextHeight = 15				  TextWidth = 7				  object ProgressBar1: TProgressBar				    Left = 144				    Top = 88				    Width = 150				    Height = 18				  end				  object Button1: TButton				    Left = 128				    Top = 32				    Width = 75				    Height = 25				    Caption = 'Button1'				    TabOrder = 0				    OnClick = Button1Click				  end				  object VorbisOut1: TVorbisOut				    Input = WaveIn1				    SuspendWhenIdle = False				    OnDone = VorbisOut1Done				    OnProgress = VorbisOut1Progress				    Serial = 0				    Compression = 0.400000005960464500				    Left = 392				    Top = 32				  end				  object WaveIn1: TWaveIn				    Loop = False				    Left = 288				    Top = 32				  end				  object OpenDialog1: TOpenDialog				    FilterIndex = 0				    Height = 0				    Width = 0				    Left = 64				    Top = 24				  end				  object SaveDialog1: TSaveDialog				    FilterIndex = 0				    Height = 0				    Title = 'Save'				    Width = 0				    Left = 72				    Top = 72				  end				end