void UprCompPRM1() { SelectorCRRLIGHTLINE();//найти подсвеченную строку текущего текст потока PrepareEditMenu(sub_menu_upr_compPRM1); PassWord(EditUprPRM1); }//UprCompPRM1()
void UprCompDVHi() { SelectorMNGBAZA(MNGUPR_DVHI);//установка базы уставок SelectorCRRLIGHTLINE();//найти подсвеченную строку текущего текст потока PrepareEditMenu(sub_menu_upr_compDV); PassWord(EditUprDV); }//UprCompDVHi()
//----------------------------------------------------------------------------- void TAdministradora :: LoadAdministradorCuenta(AnsiString pNameFile) { TFile* administr = new TFile(pNameFile); administr->Open("rb"); if(administr->IsOpen()) { TSAdmin admin; administr->Read(&admin,sizeof(TSAdmin)); strcpy(aUsuario.c_str(),admin.user); AnsiString User = aUsuario.c_str(); Usuario(User); strcpy(aPassWord.c_str(),admin.pass); AnsiString Pass = aPassWord.c_str(); PassWord(Pass); } administr->Close(); delete administr; }
void UstCompMTZ5() { SelectorCRRLIGHTLINE();//найти подсвеченную строку текущего текст потока PrepareEditMenu(sub_menu_ust_compMTZ5); PassWord(EditUstMTZ5); }//VidCompMTZ5()