object Form15: TForm15 Left = 69 Top = 79 BorderStyle = bsDialog Caption = 'Reverb' ClientHeight = 282 ClientWidth = 507 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 352 Top = 20 Width = 38 Height = 13 Caption = '&Reverb:' FocusControl = ListBox1 end object Label2: TLabel Left = 16 Top = 55 Width = 55 Height = 13 Caption = '&Initial delay:' FocusControl = TrackBar1 WordWrap = True end object Label3: TLabel Left = 16 Top = 85 Width = 66 Height = 13 Caption = 'Re&verb delay:' FocusControl = TrackBar2 WordWrap = True end object Label4: TLabel Left = 274 Top = 48 Width = 33 Height = 22 Caption = '0ms' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -19 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 274 Top = 80 Width = 33 Height = 22 Caption = '0ms' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -19 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 16 Top = 128 Width = 38 Height = 13 Caption = '&Density:' FocusControl = ListBox1 WordWrap = True end object Label8: TLabel Left = 16 Top = 23 Width = 60 Height = 13 Caption = 'Reverb &time:' FocusControl = TrackBar4 WordWrap = True end object Label9: TLabel Left = 272 Top = 17 Width = 53 Height = 22 Caption = '100ms' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -19 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label10: TLabel Left = 16 Top = 167 Width = 38 Height = 13 Caption = '&Original:' FocusControl = TrackBar5 WordWrap = True end object Label11: TLabel Left = 276 Top = 160 Width = 28 Height = 22 Caption = '0%' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -19 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 16 Top = 197 Width = 38 Height = 13 Caption = 'Rever&b:' FocusControl = TrackBar6 WordWrap = True end object Label13: TLabel Left = 276 Top = 192 Width = 28 Height = 22 Caption = '0%' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -19 Font.Name = 'Times New Roman' Font.Style = [fsBold] ParentFont = False end object ListBox1: TListBox Left = 352 Top = 40 Width = 137 Height = 97 ItemHeight = 13 Items.Strings = ( 'Big empty room' 'Small empty room' 'Church' 'Theater' 'Pipe') TabOrder = 0 OnClick = ListBox1Click end object Button1: TButton Left = 164 Top = 245 Width = 75 Height = 25 Caption = '&OK' TabOrder = 1 OnClick = Button1Click end object Button2: TButton Left = 268 Top = 245 Width = 75 Height = 25 Cancel = True Caption = '&Cancel' TabOrder = 2 OnClick = Button2Click end object TrackBar1: TTrackBar Left = 88 Top = 48 Width = 169 Height = 33 Max = 50 Orientation = trHorizontal Frequency = 10 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 3 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TrackBar1Change end object TrackBar2: TTrackBar Left = 88 Top = 80 Width = 169 Height = 33 Max = 50 Orientation = trHorizontal Frequency = 10 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 4 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TrackBar2Change end object TrackBar4: TTrackBar Left = 88 Top = 17 Width = 169 Height = 33 Ctl3D = True Max = 3000 Orientation = trHorizontal ParentCtl3D = False PageSize = 1 Frequency = 500 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 5 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TrackBar4Change end object TrackBar5: TTrackBar Left = 88 Top = 160 Width = 169 Height = 33 Max = 100 Orientation = trHorizontal Frequency = 10 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 6 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TrackBar5Change end object TrackBar6: TTrackBar Left = 88 Top = 192 Width = 169 Height = 33 Max = 100 Orientation = trHorizontal Frequency = 10 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 7 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TrackBar6Change end object CheckBox1: TCheckBox Left = 352 Top = 160 Width = 97 Height = 17 Caption = '&Low pass filter' TabOrder = 8 OnClick = CheckBox1Click end object CheckBox2: TCheckBox Left = 352 Top = 192 Width = 97 Height = 17 Caption = 'Only &selection' TabOrder = 9 OnClick = CheckBox2Click end object RadioGroup1: TRadioGroup Left = 96 Top = 118 Width = 217 Height = 33 Columns = 3 Items.Strings = ( 'Low' 'Medium' 'High') TabOrder = 10 OnClick = RadioGroup1Click end end