Курсовая работа: Автоматизация расчёта нагрузки и преподавателей ВУЗа

{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)

К-во Просмотров: 560
Бесплатно скачать Курсовая работа: Автоматизация расчёта нагрузки и преподавателей ВУЗа