unit1.~dfm

傅立叶变换程序傅立叶变换程序傅立叶变换程序

object Form1: TForm1
  Left = 187
  Top = 45
  Width = 798
  Height = 635
  Caption = 'FFT'#21464#25442#23454#20363
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 201
    Height = 249
    Caption = 'FFT'#21442#25968
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 16
      Width = 96
      Height = 12
      Caption = #21407#22987#20449#21495#37319#26679#29575'Fs'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 104
      Top = 40
      Width = 24
      Height = 12
      Caption = #28857'/s'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 8
      Top = 64
      Width = 78
      Height = 12
      Caption = #35835#21462#25968#25454#28857#25968'N'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 104
      Top = 88
      Width = 90
      Height = 12
      Caption = #28857'('#26368#22810'30720'#28857')'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 8
      Top = 112
      Width = 180
      Height = 12
      Caption = #39057#29575#20998#36776#29575'D=2*PI/(N*T), T=1/Fs'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #26032#23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 8
      Top = 160
      Width = 96
      Height = 12
      Caption = #27178#22352#26631#39057#29575#26368#22823#20540
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #26032#23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 104
      Top = 184
      Width = 12
      Height = 12
      Caption = 'Hz'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 104
      Top = 136
      Width = 30
      Height = 12
      Caption = '*2*PI'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 32
      Top = 32
      Width = 65
      Height = 20
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      Text = '1024'
      OnKeyPress = Edit1KeyPress
    end
    object Edit2: TEdit
      Left = 32
      Top = 80
      Width = 65
      Height = 21
      TabOrder = 1
      Text = '2048'
      OnKeyPress = Edit1KeyPress
    end
    object Edit3: TEdit
      Left = 32
      Top = 128
      Width = 65
      Height = 21
      Color = clBtnFace
      ReadOnly = True
      TabOrder = 2
      Text = '0'
    end
    object Edit4: TEdit
      Left = 32
      Top = 176
      Width = 65
      Height = 21
      Color = clBtnFace
      ReadOnly = True
      TabOrder = 3
      Text = '0'
    end
    object Button1: TButton
      Left = 8
      Top = 208
      Width = 75
      Height = 25
      Caption = #35745#31639'FFT'
      TabOrder = 4
      OnClick = Button1Click
    end
  end
  object Chart1: TChart
    Left = 216
    Top = 8
    Width = 569
    Height = 113
    BackWall.Brush.Color = clWhite
    BackWall.Brush.Style = bsClear
    Title.Text.Strings = (
      #21407#22987#27874#24418)
    Legend.Visible = False
    View3D = False
    TabOrder = 1
    object Series1: TLineSeries
      Marks.ArrowLength = 8
      Marks.Visible = False
      SeriesColor = clRed
      Pointer.InflateMargins = True
      Pointer.Style = psRectangle
      Pointer.Visible = False
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1.000000000000000000
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Y'
      YValues.Multiplier = 1.000000000000000000
      YValues.Order = loNone
    end
  end
  object Chart2: TChart
    Left = 216
    Top = 122
    Width = 569
    Height = 113
    BackWall.Brush.Color = clWhite
    BackWall.Brush.Style = bsClear
    Title.Text.Strings = (
      #39057#29575#24133#20540'-'#39057#29575)
    BottomAxis.Automatic = False
    BottomAxis.AutomaticMinimum = False
    BottomAxis.Minimum = -10.000000000000000000
    LeftAxis.Automatic = False
    LeftAxis.AutomaticMinimum = False
    LeftAxis.Minimum = -100.000000000000000000
    Legend.Visible = False
    View3D = False
    TabOrder = 2
    object Series2: TLineSeries
      Marks.ArrowLength = 8
      Marks.Visible = False
      SeriesColor = clRed
      Pointer.InflateMargins = True
      Pointer.Style = psRectangle
      Pointer.Visible = False
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1.000000000000000000
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Y'
      YValues.Multiplier = 1.000000000000000000
      YValues.Order = loNone
    end
  end
  object Chart3: TChart
    Left = 216
    Top = 236
    Width = 569
    Height = 113
    BackWall.Brush.Color = clWhite
    BackWall.Brush.Style = bsClear
    Title.Text.Strings = (
      #39057#29575#30456#20301'-'#39057#29575)
    Legend.Visible = False
    View3D = False
    TabOrder = 3
    object Series3: TLineSeries
      Marks.ArrowLength = 8
      Marks.Visible = False
      SeriesColor = clRed
      Pointer.InflateMargins = True
      Pointer.Style = psRectangle
      Pointer.Visible = False
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1.000000000000000000
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Y'
      YValues.Multiplier = 1.000000000000000000
      YValues.Order = loNone
    end
  end
  object Chart4: TChart
    Left = 213
    Top = 480
    Width = 569
    Height = 113
    BackWall.Brush.Color = clWhite
    BackWall.Brush.Style = bsClear
    Title.Text.Strings = (
      #21407#22987#27874#24418#65288#32463'IFFT'#24674#22797#65289)
    Legend.Visible = False
    View3D = False
    TabOrder = 4
    object Series5: TLineSeries
      Marks.ArrowLength = 8
      Marks.Visible = False
      SeriesColor = clRed
      Pointer.InflateMargins = True
      Pointer.Style = psRectangle
      Pointer.Visible = False
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1.000000000000000000
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Y'
      YValues.Multiplier = 1.000000000000000000
      YValues.Order = loNone
    end
  end
  object Chart5: TChart
    Left = 213
    Top = 362
    Width = 569
    Height = 113
    BackWall.Brush.Color = clWhite
    BackWall.Brush.Style = bsClear
    Title.Text.Strings = (
      #39057#29575#24133#20540'-'#39057#29575#65288#32463#36807#36807#28388#65289)
    BottomAxis.Automatic = False
    BottomAxis.AutomaticMinimum = False
    BottomAxis.Minimum = -10.000000000000000000
    LeftAxis.Automatic = False
    LeftAxis.AutomaticMinimum = False
    LeftAxis.Minimum = -100.000000000000000000
    Legend.Visible = False
    View3D = False
    TabOrder = 5
    object Series4: TLineSeries
      Marks.ArrowLength = 8
      Marks.Visible = False
      SeriesColor = clRed
      Pointer.InflateMargins = True
      Pointer.Style = psRectangle
      Pointer.Visible = False
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1.000000000000000000
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Y'
      YValues.Multiplier = 1.000000000000000000
      YValues.Order = loNone
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 272
    Width = 201
    Height = 233
    Caption = 'IFFT'#21442#25968
    TabOrder = 6
    object Label9: TLabel
      Left = 8
      Top = 29
      Width = 180
      Height = 12
      Caption = #36807#28388#39057#29575#25391#24133#22823#23567'('#20302#30340#23558#34987#28388#25481')'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #26032#23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label10: TLabel
      Left = 104
      Top = 61
      Width = 12
      Height = 12
      Caption = 'Hz'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 8
      Top = 128
      Width = 96
      Height = 12
      Caption = #21407#22987#39057#29575#26377#25928#28857#25968
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #26032#23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label12: TLabel
      Left = 8
      Top = 184
      Width = 156
      Height = 12
      Caption = #36807#28388#21518#39057#29575#26377#25928#28857#25968#65288#38750#38646#65289
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #26032#23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Edit5: TEdit
      Left = 32
      Top = 52
      Width = 65
      Height = 21
      TabOrder = 0
      Text = '500'
    end
    object Button2: TButton
      Left = 8
      Top = 88
      Width = 75
      Height = 25
      Caption = #35745#31639'IFFT'
      Enabled = False
      TabOrder = 1
      OnClick = Button2Click
    end
    object Edit6: TEdit
      Left = 32
      Top = 152
      Width = 65
      Height = 21
      Color = clBtnFace
      ReadOnly = True
      TabOrder = 2
      Text = '0'
    end
    object Edit7: TEdit
      Left = 32
      Top = 200
      Width = 65
      Height = 21
      Color = clBtnFace
      ReadOnly = True
      TabOrder = 3
      Text = '0'
    end
  end
  object Panel1: TPanel
    Left = 8
    Top = 512
    Width = 201
    Height = 81
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 7
    object Label13: TLabel
      Left = 8
      Top = 8
      Width = 63
      Height = 13
      Caption = #24320#21457#32773':'#21608#21494
    end
    object Label14: TLabel
      Left = 8
      Top = 24
      Width = 99
      Height = 13
      Cursor = crHandPoint
      Caption = #20027#39029':www.zyea.com'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsUnderline]
      ParentFont = False
      OnClick = Label14Click
    end
    object Label15: TLabel
      Left = 8
      Top = 40
      Width = 127
      Height = 13
      Caption = 'mail:[e-mail]'
    end
    object Label16: TLabel
      Left = 8
      Top = 56
      Width = 54
      Height = 13
      Caption = '2006.03.29'
    end
  end
end