[SteFF]

Попробовал подругому..
Рисует 0.....
НИдоганю никак. Помогите!..
:молись:

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include "Math.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
 TForm1 *Form1;
 float min,max,a,y,t,stepen;
 int x;
 float e=exp(1);          //e - экспонента...
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  //Забиваем значения..
  min=StrToFloat(Edit3->Text);
  max=StrToFloat(Edit4->Text);
  t=StrToInt(Edit1->Text);                      //
  a=StrToFloat(Edit5->Text);                    //коэффициент...

  //Устанавливаем временные параметры..
  InTr->Interval=(StrToInt(Edit1->Text));       //интревал t
  OcTr->Interval=(StrToInt(Edit2->Text)*1000);  //Оценочное время

  //Включаем таймеры...
  InTr->Enabled=true;                           //активируем таймер
  OcTr->Enabled=true;                           //активируем таймер

  //Обенуляем и очищаем... ;)
  Form1->Chart1->Series[0]->Clear();
  x=y=0;
  
  //И еще.. по мелочи..
  Panel1->Caption="НОРМА";
}
//---------------------------------------------------------------------------

void __fastcall TForm1::OcTrTimer(TObject *Sender)
{
  //Когда кончится оценочное время - останавливаемся...
  InTr->Enabled=false;
  OcTr->Enabled=false;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::InTrTimer(TObject *Sender)
{
  //Вот что будет происходить через заданный интервал времени t
  stepen=-(a*t);
  y=exp(stepen);     //возводим ее в степень
  x++;

  //рисуем...  
  Form1->Chart1->Series[0]->AddXY(x,y,clRed);
}
//--------------------------------------------------------------------------