Курсовая работа: Автоматизация расчёта нагрузки и преподавателей ВУЗа
Image1->Canvas->Pen->Style=psDot;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Edit1->Visible=false;
Button3->Visible=false;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
if (Edit1->Text!="пэ-81")
Application->MessageBox("Парольвведённеверно","Сообщениеобошибке",MB_OK);
else
{Application->MessageBox("Введите графический код","Добро пожаловать!",MB_OK);}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N6Click(TObject *Sender)
{
Image1->Canvas->Pen->Style=psDash;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N3Click(TObject *Sender)
{
Image1->Canvas->Pen->Style=psDot;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{