Курсовая работа: Автоматизация расчёта нагрузки и преподавателей ВУЗа
{Application->MessageBox("Защитаконфиденциальностиинформации","Введитепароль",MB_OK);
Edit1->Visible=true;
Button3->Visible=true;}}
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{
Image1->Canvas->LineTo(X,Y);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::CColorGrid1Change(TObject *Sender)
{
Image1->Canvas->Brush->Color=CColorGrid1->BackgroundColor;
Image1->Canvas->Rectangle(0,0,265,385);
Image1->Canvas->Pen->Width=1;
Image1->Canvas->Pen->Color=CColorGrid1->ForegroundColor;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N4Click(TObject *Sender)
{
Form1->Color=ColorBox1->Selected;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N10Click(TObject *Sender)
{
Image1->Canvas->Pen->Style=psSolid;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N1Click(TObject *Sender)