object Chorusfrm: TChorusfrm Left = 238 Top = 212 BorderStyle = bsDialog Caption = 'Flanger' ClientHeight = 323 ClientWidth = 367 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 136 Top = 49 Width = 86 Height = 13 Caption = 'Mixed &Delay (ms) :' FocusControl = delay_SE end object Label3: TLabel Left = 256 Top = 49 Width = 38 Height = 13 Caption = '&Voices :' FocusControl = ChorusVoices_SE end object Image1: TImage Left = 0 Top = 0 Width = 367 Height = 27 Align = alTop Stretch = True end object Image3: TImage Left = 279 Top = 3 Width = 81 Height = 27 AutoSize = True Picture.Data = {} Transparent = True end object Label2: TLabel Left = 16 Top = 95 Width = 93 Height = 13 Caption = '&Original Waveform :' FocusControl = owbar end object Label4: TLabel Left = 186 Top = 106 Width = 50 Height = 24 Alignment = taRightJustify Caption = '100%' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label6: TLabel Left = 197 Top = 152 Width = 39 Height = 24 Alignment = taRightJustify Caption = '50%' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 16 Top = 141 Width = 108 Height = 13 Caption = '&Chorused Waveforms :' FocusControl = cwbar end object Label7: TLabel Left = 199 Top = 198 Width = 37 Height = 24 Alignment = taRightJustify Caption = '2Hz' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 16 Top = 186 Width = 53 Height = 13 Caption = 'Fre&quency:' FocusControl = fbar end object Label9: TLabel Left = 16 Top = 49 Width = 83 Height = 13 Caption = '&Fixed Delay (ms) :' FocusControl = Fixed_SE end object Label10: TLabel Left = 256 Top = 95 Width = 41 Height = 13 Caption = '&Presets :' FocusControl = ListBox1 end object Image2: TImage Left = 8 Top = 8 Width = 32 Height = 32 AutoSize = True Picture.Data = {} end object Label11: TLabel Left = 16 Top = 232 Width = 51 Height = 13 Caption = 'F&eedback:' FocusControl = feedbar end object Label12: TLabel Left = 208 Top = 244 Width = 28 Height = 24 Alignment = taRightJustify Caption = '0%' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object ChorusVoices_SE: TSpinEdit Left = 256 Top = 65 Width = 100 Height = 22 MaxValue = 50 MinValue = 0 TabOrder = 0 Value = 1 end object delay_SE: TSpinEdit Left = 136 Top = 65 Width = 100 Height = 22 MaxValue = 500 MinValue = 0 TabOrder = 1 Value = 30 end object Button1: TButton Left = 106 Top = 288 Width = 75 Height = 25 Caption = '&OK' ModalResult = 1 TabOrder = 2 end object Button2: TButton Left = 186 Top = 288 Width = 75 Height = 25 Caption = '&Cancel' ModalResult = 2 TabOrder = 3 end object owbar: TTrackBar Left = 8 Top = 108 Width = 175 Height = 33 Max = 100 Orientation = trHorizontal Frequency = 10 Position = 100 SelEnd = 100 SelStart = 0 TabOrder = 4 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = owbarChange end object cwbar: TTrackBar Left = 8 Top = 154 Width = 175 Height = 33 Max = 100 Orientation = trHorizontal Frequency = 10 Position = 50 SelEnd = 50 SelStart = 0 TabOrder = 5 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = cwbarChange end object fbar: TTrackBar Left = 8 Top = 200 Width = 175 Height = 33 Max = 50 Orientation = trHorizontal Frequency = 10 Position = 20 SelEnd = 20 SelStart = 0 TabOrder = 6 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = fbarChange end object Fixed_SE: TSpinEdit Left = 16 Top = 65 Width = 100 Height = 22 MaxValue = 500 MinValue = 0 TabOrder = 7 Value = 0 end object ListBox1: TListBox Left = 256 Top = 111 Width = 97 Height = 154 ItemHeight = 13 Items.Strings = ( 'Default' 'Light Flanger' 'Soft Flanger' 'Hard Flanger' 'Drunk' 'Possessed' 'Devil' 'Vinyl Scratch' 'Cyborg Voice') TabOrder = 8 OnClick = ListBox1Click OnKeyPress = ListBox1KeyPress end object feedbar: TTrackBar Left = 8 Top = 246 Width = 175 Height = 33 Max = 100 Orientation = trHorizontal Frequency = 10 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 9 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = feedbarChange end end