Построение Графиков.

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include <math.h>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 
 
    double calcMax =  100;
    double calcMin =  -30;
    double tMax    =   10;
    double tMin    =   -1;
 
 
    double tScale=Image1->Width /(tMax - tMin);
    double calcScale = Image1->Height / (calcMax - calcMin);
    TCanvas * canvas;
    canvas=Image1->Canvas;
    canvas->Brush->Color=clWhite;
    canvas->FillRect(Rect(0,0,(tMax-tMin)*tScale,(calcMax-calcMin)
    *calcScale));
 
// Вот тут прошу помощи!
 
//Рисую график Y  =  2^(sqrt(x+2) -  2^(sqrt(x+1) => pow(2,(sqrt(tMin+2)) -  pow(2,(sqrt(tMin+1))) 
// ТАК? проверьте
 
    canvas->Pen->Width=3; //  толщина линии
    Image1->Canvas->Pen->Color=clBlue; // цвет линии
    canvas->MoveTo(0,(calcMax - pow(2,(sqrt(tMin+2)) -  pow(2,(sqrt(tMin+1)))))*calcScale); 
// вот тут я  запутался
    for (double t=tMin ; t< tMax; t+=1 / tScale)
    canvas->LineTo ((t - tMin) * tScale,
    (calcMax - pow(2,(sqrt(t+2)) + pow(2,(sqrt(t+1))))) * calcScale);
 
 
 
//Рисую график Y  =  12+2^(sqrt(x-1) =>  pow(14,(sqrt(t-1)))  // ТАК? проверьте
 
    canvas->Pen->Width=3;// толщина линии
    Image1->Canvas->Pen->Color=clRed; // цвет линии
    canvas->MoveTo((1 - tMin) * tScale,(calcMax-pow(14,(sqrt(1-1))))*calcScale);
// вот тут я  запутался
    for (double t=1; t< tMax; t+=1 / tScale)
    canvas->LineTo ((t - tMin) * tScale,(calcMax - pow(14,(sqrt(t-1)))) * calcScale);
 
 
 
 
 
//Рисую оси координат
 
   canvas->Pen->Width=1;  // толщина линии
   canvas->Pen->Color=clBlack; // цвет линии
 
   // Ось икс
   Image1->Canvas->MoveTo(0,(calcMax - 0)* calcScale);
   Image1->Canvas->LineTo(Image1->Width,(calcMax)* calcScale);
   // Ось игрик
   Image1->Canvas->MoveTo(Image1->Width/2,Image1->Height);
   Image1->Canvas->LineTo(Image1->Width/2,0);
 
//Рисуем стрелочки у осей координат
 
 
   //стрелочка у игрика
 
    Image1->Canvas->MoveTo((Image1->Width/2)-5,5);
    Image1->Canvas->LineTo( Image1->Width/2,0 );
    Image1->Canvas->LineTo((Image1->Width/2)+6,6);
 
   //стрелочка у икса
 
    Image1->Canvas->MoveTo(Image1->Width-5,(calcMax)* calcScale-5);
    Image1->Canvas->LineTo(Image1->Width,(calcMax)* calcScale);
    Image1->Canvas->LineTo(Image1->Width-6,(calcMax)* calcScale+6);
 
// деления на оси икс! и расскажите плз как построить подобное для оси игрик? (но это не так важно)
    for (double t=tMin; t<tMax ; t++)
   {
    Image1->Canvas->MoveTo((t-tMin)*tScale,calcMax * calcScale);
    Image1->Canvas->LineTo((t-tMin)*tScale,(calcMax * calcScale)+10);
 
    if(t!=0)
      {Image1->Canvas->TextOutA((t-tMin)*tScale,(calcMax * calcScale)+20,float(t+0));}
   }
 /*
// подпись графиков
   Image1->Canvas->TextOutA(X,Height/2,"");
   Image1->Canvas->TextOutA(X,(Height/2)-110,"");  */
 
}
//---------------------------------------------------------------------------