.    .    .    .    .
		}
#pragma endregion
	private:
		int pos, pos1; //глобальные 
		String^ w, ^us, ^pas;
		String^ key; //ключ открытия 1-й страницы 

// Кнопка "Выход"
private: System::Void button2_Click(System::Object^  sender, System::EventArgs^  e) {
	 Close();
 }
// Обработчик нажатия клавиши в поле "Логин"
private: System::Void textBox1_KeyDown(System::Object^  sender, 
   System::Windows::Forms::KeyEventArgs^  e) {
	 if(e->KeyCode == Keys::Enter) {
		 //проверка UserName 
		 String^ s = textBox1->Text;
		 int jj = s->Compare(s,"admin"); 
		 if(!jj) //это имя администратора 
		 {
			 button1->Enabled = true; //открывается его кнопка 
			 button1->Focus();
			 textBox2->Text = "";
			 return;
		 }
		 int j = 0, i = 0; 
		 for(i=0; i<listBox1->Items->Count; i++)
		 {
			 w = listBox1->Items[i]->ToString();
			 int pos = w->IndexOf("/");
			 us = w->Substring(0, pos);
			 jj = s->Compare(s, us);
			 if(jj) continue;
			 else
			 {
				 j++;
				 int pos1 = pos + 1; 
				 break;
			 }
		 } //for
		 if (!j)
		 {
			 MessageBox::Show("Ошибка в UserName", 
                                 "Защита логином и паролем",
				 MessageBoxButtons::OK,
				 MessageBoxIcon::Asterisk); 
			 textBox1->Text=""; 
			 textBox1->Focus(); 
			 return;
		 }
		 //Здесь имя пользователя найдено, надо идти на ввод пароля
		 textBox2->Text="";
		 textBox2->Focus();
		 return;
	 } //if  (== Enter) 
 }

// Обработчик нажатия клавиши в поле "Пароль"
private: System::Void textBox2_KeyDown(System::Object^  sender, 
    System::Windows::Forms::KeyEventArgs^  e) {
	 //обработка пароля
	 if(e->KeyCode == Keys::Enter) {
		 String^ s=textBox2->Text;
		 int j=0;
		 int pos = w->IndexOf("/"); //подгонка под начало поиска 1-го
		                            //разделителя после найденного.
		 //1-й всегда найдется, т. к. он нашелся 
		 //при поиске UserName
		 int pos1 = w->IndexOf("/", pos+1); //ищется 2-й разделитель 
		 if(!pos1)
		 {
			 MessageBox::Show("Ошибка в строке паролей", 
				 "Защита логином и паролем",
				 MessageBoxButtons::OK,
				 MessageBoxIcon::Asterisk); 
			 textBox2->Text="";
			 textBox2->Focus(); 
			 return;
		 }
		 pas = w->Substring(pos+1, (pos1 - pos - 1)); 
		 int jj = s->Compare(s,pas);
		 if (jj) 
		 {
			 MessageBox::Show("Ошибка в Password", 
				 "Защита логином и паролем",
				 MessageBoxButtons::OK,
				 MessageBoxIcon::Asterisk); 
			 textBox2->Text=""; 
			 textBox2->Focus(); 
			 return; 
		 }
		 //пароль сравнился. Проверяем дату 
		 pos1 = pos1 + 1; 
		 pas = w->Substring(pos1); 
		 DateTime din, dtek; 
		 dtek = dtek.Today;  //текущая дата
		 din = din.Parse(pas);// =StrToDate(pas);  дата из пароля 
		 if(dtek > din)
		 {
			 key = pas; 
			 return;
		 }
		 textBox1->Text = ""; 
		 textBox2->Text = ""; 
		 tabControl1->SelectedIndex = 1;
	 } // Key== 
}//обработчик

// Обработчик переключения вкладок
private: System::Void tabControl1_SelectedIndexChanged(System::Object^  sender, 
    System::EventArgs^  e) {
	 int i = key->Compare(key, pas);
	 if (!i)
	 {
		 tabControl1->SelectedIndex = 0;
	 }
}
// Обработчик изменения размеров формы
private: System::Void Form1_Resize(System::Object^  sender, System::EventArgs^  e) {
	 textBox1->Focus();  //установка фокуса ввода на UserName
 }

// Обработчик первого отображения формы
private: System::Void Form1_Shown(System::Object^  sender, System::EventArgs^  e) {
	 textBox1->Focus();  //установка фокуса ввода на UserName
 }

// Обработчик кнопки "Администратор"
private: System::Void button1_Click(System::Object^  sender, System::EventArgs^  e) {
	 if (listBox1->Visible == false)
		 listBox1->Show(); 
	 else
	 {
		 listBox1->Hide();
		 button1->Enabled = false;
		 textBox1->Focus();
	 }
 }