Курсовая работа: Побудова клавіатурного тренажера
int lran;
lran=random(623)+8;
LiteraRus->Left=lran;
LiteraRus->Caption=slitera; LiteraRus->Show(); }
}
//-----Нижче оформлений процес підсвітки падаючої літери на віртуальній клавіатурі
if (rezhim==1) {
if (slitera=='q') q->Font->Color=clRed; else q->Font->Color=clBlack;
if (slitera=='w') w->Font->Color=clRed; else w->Font->Color=clBlack;
if (slitera=='e') e->Font->Color=clRed; else e->Font->Color=clBlack;
if (slitera=='r') r->Font->Color=clRed; else r->Font->Color=clBlack;
if (slitera=='t') t->Font->Color=clRed; else t->Font->Color=clBlack;
if (slitera=='y') y->Font->Color=clRed; else y->Font->Color=clBlack;
if (slitera=='u') u->Font->Color=clRed; else u->Font->Color=clBlack;
if (slitera=='i') i->Font->Color=clRed; else i->Font->Color=clBlack;
if (slitera=='o') o->Font->Color=clRed; else o->Font->Color=clBlack;
if (slitera=='p') p->Font->Color=clRed; else p->Font->Color=clBlack;
if (slitera=='a') a->Font->Color=clRed; else a->Font->Color=clBlack;
if (slitera=='s') s->Font->Color=clRed; else s->Font->Color=clBlack;
if (slitera=='d') d->Font->Color=clRed; else d->Font->Color=clBlack;
if (slitera=='f') f->Font->Color=clRed; else f->Font->Color=clBlack;
if (slitera=='g') g->Font->Color=clRed; else g->Font->Color=clBlack;
if (slitera=='h') h->Font->Color=clRed; else h->Font->Color=clBlack;
if (slitera=='j') j->Font->Color=clRed; else j->Font->Color=clBlack;
if (slitera=='k') k->Font->Color=clRed; else k->Font->Color=clBlack;
if (slitera=='l') l->Font->Color=clRed; else l->Font->Color=clBlack;
if (slitera=='z') z->Font->Color=clRed; else z->Font->Color=clBlack;
if (slitera=='x') x->Font->Color=clRed; else x->Font->Color=clBlack;
if (slitera=='c') c->Font->Color=clRed; else c->Font->Color=clBlack;