| Код |
void __fastcall TConstructor::PaintBox1MouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
startX = X;
startY = Y;
}
//---------------------------------------------------------------------------
void __fastcall TConstructor::PaintBox1MouseUp(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
rectangles.push_back(TRect(startX,startY,X,Y));
ShowMessage(IntToStr(rectangles.size()));//выводит 1, затем 2, затем 3(от количества нажатий)
}
//---------------------------------------------------------------------------
void __fastcall TConstructor::PaintBox1Paint(TObject *Sender)
{
PaintBox1->Canvas->Pen->Color = clBlack;
PaintBox1->Canvas->Pen->Width = 2;
if(rectangles.size()>0) //
{
ShowMessage(IntToStr(rectangles.size()));//до сюда не доходит (( почему ?
PaintBox1->Canvas->Rectangle(rectangles[0] );
}
}
|
|
)