fft.dpr

来自「Delphi FFT Spectrum Analyzer」· DPR 代码 · 共 28 行

{ **************************************************************************** }
{ FileName............: FFT.PAS                                                }
{ Project.............: FFT                                                    }
{ Author(s)...........: M.Majoor                                               }
{ Version.............: 2.00                                                   }
{ Last revision date..: 24 January, 2001                                       }
{ ---------------------------------------------------------------------------- }
{                                                                              }
{ Version  Date      Comment                                                   }
{ 1.00     19980502  - Initial release                                         }
{ 2.00     20010124  - Recompiled for Delphi 3 and made it up-to-date          }
{ **************************************************************************** }
program fft;

uses
  Forms,
  frmfft in 'frmfft.pas'      {frmMain},
  fftspec in 'fftspec.pas';

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := 'FFT demo';
  Application.CreateForm(TfrmMain, frmMain);
  Application.Run;
end.