Курсовая работа: Работа со списками

lstObjects->Items->Add("Bezie Curve ("+IntToStr(firstNumber)+" lines)");

}//end if n==3

}//end if Curve

if (cboObject->Text=="Линия"){

n++;

frmMain->Canvas->Pen->Color=clbColor->Selected;

if (n==1) {l1.p1.x=X;l1.p1.y=Y;}

if (n==2) {

l1.p2.x=X;l1.p2.y=Y;

LineBufer.add(l1,"");

Objects.add(1,"Line");

LoadLines(chkSecondary->Checked);

n=0;

}//end if n==2

}//End if Line

if (cboObject->Text=="Прямоугольник"){

n++;

queue <Tline> Lines;

TRectangle Rect;

if (n==1) {l1.p1.x=X;l1.p1.y=Y;}

if (n==2) {

l1.p2.x=X;l1.p2.y=Y;

Lines=Rect.Create(l1.p1.x,l1.p1.y,l1.p2.x,l1.p2.y,clbColor->Selected);

for (int i=0;i<=Lines.count();i++) LineBufer.add(Lines.getvalue(i),"");

Objects.add(4,"Rectangle");

LoadLines(chkSecondary->Checked);

n=0;

}//end if n==2;

}//end if rectangle;