Курсовая работа: Программная реализация разложения временного процесса в тригонометрический ряд

end;//TFormMain.ReportWord

procedure TForm1.Excel1Click(Sender: TObject);

begin

 ReportExcel(StringGrid1);

 end;

procedure TForm1.SpeedButton2Click(Sender: TObject);

begin

 WinExec('hh.exe 1.chm',SW_SHOW);

end;

end.

Файл вывода графика UnitGraphic.pas

unit UnitGraphic;

interface

uses

 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

 Dialogs, TeEngine, Series, StdCtrls, ExtCtrls, TeeProcs, Chart, XPMan,

 TeeFunci, Buttons;

type

 TFormGraphic = class(TForm)

 Chart1: TChart;

 Button1: TButton;

 XPManifest1: TXPManifest;

 Series1: TLineSeries;

 Series2: TLineSeries;

 TeeFunction1: TAddTeeFunction;

 Series3: TLineSeries;

 Image1: TImage;

 BitBtn1: TBitBtn;

 BitBtn2: TBitBtn;

 BitBtn3: TBitBtn;