object Form6: TForm6 Left = 178 Top = 123 BorderIcons = [] BorderStyle = bsDialog Caption = 'Amplify volume' ClientHeight = 263 ClientWidth = 308 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Position = poScreenCenter OnActivate = FormActivate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 16 Top = 16 Width = 144 Height = 19 Caption = '&Percent of amplification:' FocusControl = TrackBar1 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Times New Roman' Font.Style = [] ParentFont = False end object Label2: TLabel Left = 16 Top = 80 Width = 14 Height = 13 Caption = '0%' end object Label3: TLabel Left = 144 Top = 80 Width = 26 Height = 13 Caption = '100%' end object Label4: TLabel Left = 272 Top = 80 Width = 26 Height = 13 Caption = '200%' end object Label6: TLabel Left = 16 Top = 104 Width = 104 Height = 19 Caption = '&Manual selection:' FocusControl = Edit1 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Times New Roman' Font.Style = [] ParentFont = False end object Label5: TLabel Left = 232 Top = 104 Width = 16 Height = 20 Caption = '%' Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object TrackBar1: TTrackBar Left = 8 Top = 48 Width = 289 Height = 33 LineSize = 2 Max = 200 Min = 1 Orientation = trHorizontal Frequency = 10 Position = 100 SelEnd = 100 SelStart = 0 TabOrder = 0 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TrackBar1Change end object RadioGroup1: TRadioGroup Left = 16 Top = 136 Width = 161 Height = 105 Caption = '&Action:' ItemIndex = 2 Items.Strings = ( 'Double volume (200%)' 'Half volume (50%)' 'Manual selection') TabOrder = 1 OnClick = RadioGroup1Click end object Button1: TButton Left = 216 Top = 160 Width = 75 Height = 25 Caption = '&OK' TabOrder = 2 OnClick = Button1Click end object Button2: TButton Left = 216 Top = 200 Width = 75 Height = 25 Cancel = True Caption = '&Cancel' TabOrder = 3 OnClick = Button2Click end object Edit1: TEdit Left = 144 Top = 102 Width = 73 Height = 28 Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 4 OnExit = Edit1Exit OnKeyPress = Edit1KeyPress end end