Графическая

[Nextgen]

Нужно что бы при нажатии на кнопку создавались shape определенное количество, которые будут располагаться по окружности на одинаковом расстоянии, а также соединяются линиями. У меня не получается токо то что линии не соединяют эти shape.

Вот код:

int r=100; int j;
  int x=150, y=150;
  const float pi=3.1415926;
  j=1;  int u=3; //êîëè÷åñòâî shape
     TShape* shape;
  while (j<=u)
{
      Canvas->LineTo(x+5+r*cos(pi/180+j*pi/2*u), y+r*sin(pi/180-j*pi/2*u));
    shape=new TShape(Form1);
    shape->Parent=Form1;
    shape->Shape=stCircle;
    shape->Height=30;
    shape->Width=30;
    shape->Top=y+r*sin(pi/180+j*pi/2*u)-15;
    shape->Left=x+r*cos(pi/180+j*pi/2*u)-15;

      j=j+1;}
}