Chip: Hang es video/CHIP_ZENESZERKESZTO_2005.ISO/audio_1/Bitmawaves/BW.exe/0/RCDATA/TSPECTRUMFORM/TSPECTRUMFORM.txt

Text File | 2003-03-23 | 3.9 KB | 202 lines

object SpectrumForm: TSpectrumForm
  Left = 37
  Top = 74
  Width = 767
  Height = 487
  Caption = 'Spectrum'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnActivate = FormActivate
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 759
    Height = 57
    Align = alTop
    TabOrder = 0
    object Label1: TLabel
      Left = 18
      Top = 36
      Width = 181
      Height = 13
      Caption = 'Label1'
    end
    object Label27: TLabel
      Left = 19
      Top = 14
      Width = 48
      Height = 13
      Alignment = taRightJustify
      Caption = '&Block size'
    end
    object Label2: TLabel
      Left = 223
      Top = 14
      Width = 69
      Height = 13
      Alignment = taRightJustify
      Caption = '&Overlapped, %'
    end
    object Label3: TLabel
      Left = 443
      Top = 12
      Width = 56
      Height = 16
      Alignment = taRightJustify
      Caption = '&Range, dB'
    end
    object LevelLabel: TLabel
      Left = 568
      Top = 16
      Width = 26
      Height = 13
      Caption = 'Level'
    end
    object EscButton: TButton
      Left = 666
      Top = 10
      Width = 30
      Height = 21
      Cancel = True
      Caption = 'Esc'
      Default = True
      TabOrder = 6
      OnClick = EscButtonClick
    end
    object AverStyleComboBox: TComboBox
      Left = 359
      Top = 10
      Width = 77
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      Items.Strings = (
        'Averaged'
        'Hold-max')
      TabOrder = 3
      OnChange = AverStyleComboBoxChange
    end
    object specSizes: TComboBox
      Left = 71
      Top = 10
      Width = 57
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      Items.Strings = (
        '32'
        '64'
        '128'
        '256'
        '512'
        '1024'
        '2048'
        '4096'
        '8192')
      TabOrder = 0
      OnChange = specSizesChange
    end
    object HammingCheckBox: TCheckBox
      Left = 136
      Top = 12
      Width = 79
      Height = 17
      Caption = '&Hamming'
      State = cbChecked
      TabOrder = 1
      OnClick = HammingCheckBoxClick
    end
    object OverlappedComboBox: TComboBox
      Left = 297
      Top = 10
      Width = 51
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      Items.Strings = (
        '0'
        '25'
        '50'
        '75')
      TabOrder = 2
      OnChange = specSizesChange
    end
    object ScaleRange: TEdit
      Left = 503
      Top = 10
      Width = 41
      Height = 21
      ReadOnly = True
      TabOrder = 4
      Text = '60'
      OnChange = FormActivate
    end
    object FourieUpDown: TUpDown
      Left = 544
      Top = 10
      Width = 15
      Height = 21
      Associate = ScaleRange
      Min = 10
      Max = 120
      Increment = 10
      Position = 60
      TabOrder = 5
      Wrap = False
    end
  end
  object ImagePanel: TPanel
    Left = 0
    Top = 57
    Width = 759
    Height = 403
    Align = alClient
    TabOrder = 1
    object Image1: TImage
      Left = 1
      Top = 1
      Width = 757
      Height = 378
      Cursor = crCross
      Hint = 'Click to mark a point'
      Align = alClient
      AutoSize = True
      ParentShowHint = False
      ShowHint = True
      OnMouseMove = Image1MouseMove
      OnMouseUp = Image1MouseUp
    end
    object Panel3: TPanel
      Left = 1
      Top = 379
      Width = 757
      Height = 23
      Align = alBottom
      Color = clWhite
      TabOrder = 0
      object LeftLabel: TLabel
        Left = 5
        Top = 4
        Width = 6
        Height = 13
        Caption = '0'
      end
      object RightLabel: TLabel
        Left = 394
        Top = 4
        Width = 15
        Height = 13
        Alignment = taRightJustify
        Caption = '-----'
      end
    end
  end
end