MTK

开发平台：
C++ Builder

form_32kFirCoeffCal.dfm：源码内容
							object frm32kFirCoefCal: Tfrm32kFirCoefCal
  Left = 21
  Top = 95
  Width = 1001
  Height = 633
  Caption = 'Melody FIR Tunning'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 8
    Top = 32
    Width = 74
    Height = 13
    Caption = 'Output filename'
  end
  object imAudioCal: TImage
    Left = 48
    Top = 144
    Width = 689
    Height = 361
    DragMode = dmAutomatic
  end
  object Label15: TLabel
    Left = 0
    Top = 168
    Width = 13
    Height = 13
    Caption = 'dB'
  end
  object lblVertical0: TLabel
    Left = 24
    Top = 176
    Width = 15
    Height = 13
    AutoSize = False
    Caption = '10'
  end
  object lblVertical1: TLabel
    Left = 24
    Top = 200
    Width = 15
    Height = 13
    AutoSize = False
    BiDiMode = bdRightToLeft
    Caption = '0'
    ParentBiDiMode = False
  end
  object lblVertical2: TLabel
    Left = 24
    Top = 240
    Width = 15
    Height = 13
    AutoSize = False
    Caption = '-10'
  end
  object lblVertical3: TLabel
    Left = 24
    Top = 272
    Width = 15
    Height = 13
    AutoSize = False
    Caption = '-20'
  end
  object lblVertical4: TLabel
    Left = 24
    Top = 312
    Width = 15
    Height = 13
    AutoSize = False
    Caption = '-30'
  end
  object lblVertical5: TLabel
    Left = 24
    Top = 344
    Width = 15
    Height = 13
    AutoSize = False
    Caption = '-40'
  end
  object lblVertical6: TLabel
    Left = 24
    Top = 376
    Width = 15
    Height = 13
    AutoSize = False
    Caption = '-50'
  end
  object lblVertical7: TLabel
    Left = 24
    Top = 408
    Width = 15
    Height = 13
    Caption = '-60'
  end
  object lblVertical8: TLabel
    Left = 24
    Top = 440
    Width = 15
    Height = 13
    Caption = '-70'
  end
  object lbl0Hz: TLabel
    Left = 752
    Top = 128
    Width = 22
    Height = 13
    Caption = '0 Hz'
  end
  object lbl60Hz: TLabel
    Left = 752
    Top = 154
    Width = 28
    Height = 13
    Caption = '60 Hz'
  end
  object lbl170Hz: TLabel
    Left = 752
    Top = 180
    Width = 34
    Height = 13
    Caption = '170 Hz'
  end
  object lbl310Hz: TLabel
    Left = 752
    Top = 207
    Width = 34
    Height = 13
    Caption = '310 Hz'
  end
  object lbl600Hz: TLabel
    Left = 752
    Top = 233
    Width = 34
    Height = 13
    Caption = '600 Hz'
  end
  object lbl800Hz: TLabel
    Left = 752
    Top = 259
    Width = 34
    Height = 13
    Caption = '800 Hz'
  end
  object lbl1000Hz: TLabel
    Left = 744
    Top = 286
    Width = 40
    Height = 13
    Caption = '1000 Hz'
  end
  object lbl2000Hz: TLabel
    Left = 746
    Top = 312
    Width = 40
    Height = 13
    Caption = '2000 Hz'
  end
  object lbl3000Hz: TLabel
    Left = 746
    Top = 339
    Width = 40
    Height = 13
    Caption = '3000 Hz'
  end
  object lbl4000Hz: TLabel
    Left = 746
    Top = 365
    Width = 40
    Height = 13
    Caption = '4000 Hz'
  end
  object lbl5000Hz: TLabel
    Left = 746
    Top = 391
    Width = 40
    Height = 13
    Caption = '5000 Hz'
  end
  object lbl6000Hz: TLabel
    Left = 746
    Top = 418
    Width = 40
    Height = 13
    Caption = '6000 Hz'
  end
  object lbl7000Hz: TLabel
    Left = 746
    Top = 444
    Width = 40
    Height = 13
    Caption = '7000 Hz'
  end
  object lbl8000Hz: TLabel
    Left = 746
    Top = 471
    Width = 40
    Height = 13
    Caption = '8000 Hz'
  end
  object lbl9000Hz: TLabel
    Left = 746
    Top = 504
    Width = 40
    Height = 13
    Caption = '9000 Hz'
  end
  object Label11: TLabel
    Left = 808
    Top = 112
    Width = 13
    Height = 13
    Caption = 'dB'
  end
  object lblh0Hz: TLabel
    Left = 40
    Top = 520
    Width = 6
    Height = 13
    Caption = '0'
  end
  object lblh2000Hz: TLabel
    Left = 80
    Top = 520
    Width = 24
    Height = 13
    Caption = '2000'
  end
  object Label16: TLabel
    Left = 264
    Top = 552
    Width = 13
    Height = 13
    Caption = 'Hz'
  end
  object lbl10000Hz: TLabel
    Left = 856
    Top = 128
    Width = 46
    Height = 13
    Caption = '10000 Hz'
  end
  object Label3: TLabel
    Left = 928
    Top = 112
    Width = 13
    Height = 13
    Caption = 'dB'
  end
  object lbl11000Hz: TLabel
    Left = 856
    Top = 153
    Width = 46
    Height = 13
    Caption = '11000 Hz'
  end
  object lbl12000Hz: TLabel
    Left = 856
    Top = 178
    Width = 46
    Height = 13
    Caption = '12000 Hz'
  end
  object lbl13000Hz: TLabel
    Left = 856
    Top = 204
    Width = 46
    Height = 13
    Caption = '13000 Hz'
  end
  object lbl14000Hz: TLabel
    Left = 856
    Top = 229
    Width = 46
    Height = 13
    Caption = '14000 Hz'
  end
  object lbl15000Hz: TLabel
    Left = 856
    Top = 254
    Width = 46
    Height = 13
    Caption = '15000 Hz'
  end
  object lbl16000Hz: TLabel
    Left = 856
    Top = 280
    Width = 46
    Height = 13
    Caption = '16000 Hz'
  end
  object lblh4000Hz: TLabel
    Left = 136
    Top = 520
    Width = 24
    Height = 13
    Caption = '4000'
  end
  object lblh6000Hz: TLabel
    Left = 184
    Top = 520
    Width = 27
    Height = 13
    Caption = '6000 '
  end
  object lblh8000Hz: TLabel
    Left = 240
    Top = 520
    Width = 24
    Height = 13
    Caption = '8000'
  end
  object lblh10000Hz: TLabel
    Left = 304
    Top = 520
    Width = 30
    Height = 13
    Caption = '10000'
  end
  object lblh12000Hz: TLabel
    Left = 368
    Top = 520
    Width = 30
    Height = 13
    Caption = '12000'
  end
  object lblh14000Hz: TLabel
    Left = 440
    Top = 520
    Width = 30
    Height = 13
    Caption = '14000'
  end
  object lblh16000Hz: TLabel
    Left = 512
    Top = 520
    Width = 30
    Height = 13
    Caption = '16000'
  end
  object Label1: TLabel
    Left = 544
    Top = 88
    Width = 62
    Height = 13
    Caption = 'Diginal Scale'
  end
  object stOutputFileName: TStaticText
    Left = 143
    Top = 32
    Width = 665
    Height = 17
    AutoSize = False
    BorderStyle = sbsSunken
    TabOrder = 0
  end
  object btnSetupOutputFile: TButton
    Left = 264
    Top = 88
    Width = 121
    Height = 25
    Caption = 'Setup output file'
    TabOrder = 1
    OnClick = btnSetupOutputFileClick
  end
  object edt0HzdB: TEdit
    Left = 792
    Top = 128
    Width = 49
    Height = 21
    TabOrder = 2
    Text = '-2'
    OnExit = edtdBCheck
  end
  object edt60HzdB: TEdit
    Tag = 1
    Left = 792
    Top = 154
    Width = 49
    Height = 21
    TabOrder = 3
    Text = '-1'
    OnExit = edtdBCheck
  end
  object edt170HzdB: TEdit
    Tag = 2
    Left = 792
    Top = 180
    Width = 49
    Height = 21
    TabOrder = 4
    Text = '-1'
    OnExit = edtdBCheck
  end
  object edt310HzdB: TEdit
    Tag = 3
    Left = 792
    Top = 206
    Width = 49
    Height = 21
    TabOrder = 5
    Text = '-1'
    OnExit = edtdBCheck
  end
  object edt600HzdB: TEdit
    Tag = 4
    Left = 792
    Top = 233
    Width = 49
    Height = 21
    TabOrder = 6
    Text = '0'
    OnExit = edtdBCheck
  end
  object edt800HzdB: TEdit
    Tag = 5
    Left = 792
    Top = 259
    Width = 49
    Height = 21
    TabOrder = 7
    Text = '0'
    OnExit = edtdBCheck
  end
  object edt1000HzdB: TEdit
    Tag = 6
    Left = 792
    Top = 285
    Width = 49
    Height = 21
    TabOrder = 8
    Text = '0'
    OnExit = edtdBCheck
  end
  object edt2000HzdB: TEdit
    Tag = 7
    Left = 792
    Top = 312
    Width = 49
    Height = 21
    TabOrder = 9
    Text = '0'
    OnExit = edtdBCheck
  end
  object edt3000HzdB: TEdit
    Tag = 8
    Left = 792
    Top = 338
    Width = 49
    Height = 21
    TabOrder = 10
    Text = '1'
    OnExit = edtdBCheck
  end
  object edt4000HzdB: TEdit
    Tag = 9
    Left = 792
    Top = 364
    Width = 49
    Height = 21
    TabOrder = 11
    Text = '2'
    OnExit = edtdBCheck
  end
  object edt5000HzdB: TEdit
    Tag = 10
    Left = 792
    Top = 390
    Width = 49
    Height = 21
    TabOrder = 12
    Text = '3'
    OnExit = edtdBCheck
  end
  object edt6000HzdB: TEdit
    Tag = 11
    Left = 792
    Top = 417
    Width = 49
    Height = 21
    TabOrder = 13
    Text = '5'
    OnExit = edtdBCheck
  end
  object edt7000HzdB: TEdit
    Tag = 12
    Left = 792
    Top = 443
    Width = 49
    Height = 21
    TabOrder = 14
    Text = '0'
    OnExit = edtdBCheck
  end
  object edt8000HzdB: TEdit
    Tag = 13
    Left = 792
    Top = 469
    Width = 49
    Height = 21
    TabOrder = 15
    Text = '0'
    OnExit = edtdBCheck
  end
  object edt9000HzdB: TEdit
    Tag = 14
    Left = 792
    Top = 496
    Width = 49
    Height = 21
    TabOrder = 16
    Text = '0'
    OnExit = edtdBCheck
  end
  object btnRun: TButton
    Left = 824
    Top = 544
    Width = 75
    Height = 25
    Caption = 'Run'
    TabOrder = 17
    OnClick = btnRunClick
  end
  object sbAudioCal: TStatusBar
    Left = 0
    Top = 570
    Width = 993
    Height = 29
    Panels = <
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object edt10000HzdB: TEdit
    Tag = 15
    Left = 912
    Top = 128
    Width = 49
    Height = 21
    TabOrder = 19
    Text = '0'
    OnExit = edtdBCheck
  end
  object edt11000HzdB: TEdit
    Tag = 16
    Left = 912
    Top = 152
    Width = 49
    Height = 21
    TabOrder = 20
    Text = '0'
    OnExit = edtdBCheck
  end
  object edt12000HzdB: TEdit
    Tag = 17
    Left = 912
    Top = 176
    Width = 49
    Height = 21
    TabOrder = 21
    Text = '0'
    OnExit = edtdBCheck
  end
  object edt13000HzdB: TEdit
    Tag = 18
    Left = 912
    Top = 200
    Width = 49
    Height = 21
    TabOrder = 22
    Text = '0'
    OnExit = edtdBCheck
  end
  object edt14000HzdB: TEdit
    Tag = 19
    Left = 912
    Top = 224
    Width = 49
    Height = 21
    TabOrder = 23
    Text = '-1'
    OnExit = edtdBCheck
  end
  object edt15000HzdB: TEdit
    Tag = 20
    Left = 912
    Top = 248
    Width = 49
    Height = 21
    TabOrder = 24
    Text = '-2'
    OnExit = edtdBCheck
  end
  object edt16000HzdB: TEdit
    Tag = 21
    Left = 912
    Top = 272
    Width = 49
    Height = 21
    TabOrder = 25
    Text = '-3'
    OnExit = edtdBCheck
  end
  object lblHint: TStaticText
    Left = 559
    Top = 568
    Width = 33
    Height = 17
    BorderStyle = sbsSingle
    Caption = 'lblHint'
    Color = clYellow
    ParentColor = False
    TabOrder = 26
    Visible = False
  end
  object edtDigitalScale: TEdit
    Left = 544
    Top = 104
    Width = 57
    Height = 21
    TabOrder = 27
    Text = '0.5'
    OnExit = edtDigitalScaleCheck
  end
  object OpenDialog: TOpenDialog
    DefaultExt = 'trc'
    Filter = 'TRC file (*.trc)|*.trc|All files (*.*)|*.*'
    Title = 'Open FIR tunning file'
    Left = 856
    Top = 8
  end
  object HintTimer: TTimer
    Enabled = False
    Interval = 4000
    OnTimer = HintTimerTimer
    Left = 888
    Top = 8
  end
  object SaveDialog: TSaveDialog
    Title = 'Save FIR tunning file'
    Left = 816
    Top = 48
  end
  object mTimer: TTimer
    Enabled = False
    Interval = 5000
    Left = 856
    Top = 48
  end
end

						