double a, a2, b, b2;
double A = atof(Edit1->Text.c_str())*40,
T = atof(Edit2->Text.c_str()),
faz = atof(Edit3->Text.c_str());
double A2 = atof(Edit4->Text.c_str())*40,
T2 = atof(Edit5->Text.c_str()),
faz2 = atof(Edit6->Text.c_str());
for(int j = 0; j <=500; j++){
Canvas->Pen->Color = clBlue;
a = j * 0.1;
a = A* sin(((6.28/(T*40))*j)+faz);
Canvas->MoveTo(90+j,180-a);
a2 = j+1 * 0.1;
a2 = A* sin(((6.28/(T*40))*j)+faz);
Canvas->LineTo(91+j,180-a2);
Canvas->Pen->Color = clRed;
b = j * 0.1;
b = A2* sin(((6.28/(T2*40))*j)+faz2);
Canvas->MoveTo(90+j,180-

;
b2 = j+1 * 0.1;
b2 = A2* sin(((6.28/(T2*40))*j)+faz2);
Canvas->LineTo(91+j,180-b2);
Canvas->Pen->Color = clGreen;
Canvas->MoveTo(90+j,180-b-a);
Canvas->LineTo(91+j,180-a2-b2);