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

if (slitera=='б') m11->Font->Color=clRed; else m11->Font->Color=clBlack;

if (slitera=='ю') m111->Font->Color=clRed; else m111->Font->Color=clBlack;

};

//-----Нижче оформлений процес падання російської літери

//-----та підсвітка падаючої літери на віртуальній клавіатурі

if (rezhim==3){

TrainRus->Show();

LiteraRus->Show();

int LeftRan;

Randomize;

LeftRan=random(623)+8;

LiteraRus->Left=LeftRan;

slitera=RusWord();

LiteraRus->Caption=slitera;

if (slitera=='й') q2->Font->Color=clRed; else q2->Font->Color=clBlack;

if (slitera=='ц') w2->Font->Color=clRed; else w2->Font->Color=clBlack;

if (slitera=='у') e2->Font->Color=clRed; else e2->Font->Color=clBlack;

if (slitera=='к') r2->Font->Color=clRed; else r2->Font->Color=clBlack;

if (slitera=='е') t2->Font->Color=clRed; else t2->Font->Color=clBlack;

if (slitera=='н') y2->Font->Color=clRed; else y2->Font->Color=clBlack;

if (slitera=='г') u2->Font->Color=clRed; else u2->Font->Color=clBlack;

if (slitera=='ш') i2->Font->Color=clRed; else i2->Font->Color=clBlack;

if (slitera=='щ') o2->Font->Color=clRed; else o2->Font->Color=clBlack;

if (slitera=='з') p2->Font->Color=clRed; else p2->Font->Color=clBlack;

if (slitera=='х') p22->Font->Color=clRed; else p22->Font->Color=clBlack;

if (slitera=='ъ') p222->Font->Color=clRed; else p222->Font->Color=clBlack;

if (slitera=='ф') a2->Font->Color=clRed; else a2->Font->Color=clBlack;

if (slitera=='ы') s2->Font->Color=clRed; else s2->Font->Color=clBlack;

if (slitera=='в') d2->Font->Color=clRed; else d2->Font->Color=clBlack;