Лабы / ООП.Builder / Лабы / laba3 / Bezier / Bezier

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

#include <vcl.h>
#pragma hdrstop

#include "Bezier.h"

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

#pragma package(smart_init)
Cbez::Cbez(TImage* _Img)
{

Img=_Img;
}

void Cbez:: Cur(int P0x, int P1x,int P2x,int P0y,int P1y,int P2y)
{

Img->Canvas->MoveTo(P0y,P0x);
for (float t=0.0;t<=1.0;t+=0.01)
        {
             //   Img->Canvas->Pen->Color = clWhite;

               // Img->Canvas->Rectangle(0,0,500,500);

                float Pcurx=(1-t)*(1-t)*P0x+2.0*t*(1-t)*P1x+t*t*P2x;
                float Pcury=(1-t)*(1-t)*P0y+2.0*t*(1-t)*P1y+t*t*P2y;

                //Img->Canvas->MoveTo(Pcurx,Pcury);
                Img->Canvas->Pen->Color = clRed;

                Img->Canvas->LineTo(Pcury,Pcurx);
        }
}