Материал: Разработка программы на языке C++ Builder 6

->Canvas->MoveTo(x,y); // рисуемпрямуюлиниювлево->Canvas->LineTo(x6,y6);

->Canvas->MoveTo(x,y); // рисуемпрямуюлиниювверх->Canvas->LineTo(x0,y0);

Image1->Canvas->MoveTo(x,y); // рисуем прямую линию вправо и вверх

Image1->Canvas->LineTo(x1,y1);

Image1->Canvas->MoveTo(x,y); // рисуем прямую линию вправо и вниз

Image1->Canvas->LineTo(x3,y3);

Image1->Canvas->MoveTo(x,y); // рисуем прямую линию влево и вниз

Image1->Canvas->LineTo(x5,y5);

Image1->Canvas->MoveTo(x,y); // рисуем прямую линию влево и вверх

Image1->Canvas->LineTo(x7,y7);

}

//---------------------------------------------------------------------------__fastcall TForm1::Button5Click(TObject *Sender)

{->Canvas->FillRect(Rect(0,0,Image1->Width,Image1->Height));

// очищает форму

}}

ПРИЛОЖЕНИЕ Г

РЕЗУЛЬТАТЫ ВЫПОЛНЕНИЯ ПРОГРАММЫ