Курсовая работа: Побудова клавіатурного тренажера

Timer1->Enabled=false;

Timer2->Enabled=false;

PTimer->Hide();

TrainUkr->Hide();

TrainRus->Hide();

TrainEng->Hide();

Options->Show();

}

//Організація виводу часу під час тренування--------------------------------

void __fastcall TTrainForm::Timer1Timer(TObject *Sender)

{

if (sec==59){ min++; sec=-1;

}

sec++; chas1++;

int nul=0;

if (sec<10) timersec->Caption=IntToStr(nul)+IntToStr(sec); else timersec->Caption=IntToStr(sec);

if (min<10) timermin->Caption=IntToStr(nul)+IntToStr(min); else timermin->Caption=IntToStr(min);

}

//Наступний код обробляється під час падання літери-------------------------

void __fastcall TTrainForm::Timer2Timer(TObject *Sender)

{

//-----Присвоюються випадкові по горизонталі координати падаючой літери

//-----та перевірка того, чи вчасно була натиснута відповідна літера

if (rezhim==1){

LiteraEng->Top=(LiteraEng->Top)+1;

if (LiteraEng->Top>225) {

if (LiteraEng->Top!=255+1)

NoCorect++;

NePravilno->Caption=IntToStr(NoCorect);