Листинг 11.23

iragma once

[namespace Му67 Регистрация пользователя в приложении {

asing namespace System; I using namespace System:: ComponentModel; Ivsing namespace System: :Collections;

lusing namespace System::Windows:: Forms;

using namespace System:: Data; using namespace System:: Drawing;

public ref class Forml : public System::Windows::Forms::Form

[public: Forml (.void) 1

InitializeConponent ();

TODO: Add the constructor code here [)

I protected: I / <summary>

У администратора имеется свой пароль (admin), который для простоты зашит в программу. Если пользователь наберет имя, соответствующее паролю администратора, кнопка разблокируется и высветится список паролей. При [повторном нажатии на эту кнопку список паролей исчезает, и кнопка снова [блокируется.

время работы на первой вкладке остальные будут заблокированы. При j вводе данных регистрации признаком окончания ввода является нажатие клавиши <Enter>.

рма с компонентами, реализующими регистрацию, а также результаты ее выполнения показаны на рис. 11.107. Текст приложения (приводится весь айл, чтобы читатель мог детально разобраться в задаче) приводится в лис-I танге 11.23.

III Clean up any resources being used. / </suirimary> -Forml() {

if (components) {

delete components;

private: System::Windows::Forms::TabControl tabControll; protected:

private: System::Windows::Forms::TabPage tabPagel; private: System::Windows::Forms::Label labeil; private: System::Windows::Forms::TabPage tabPage2; private: System::Windows::Forms::Button buttonl; private: System::Windows::Forms::TextBox textBox2; private: System::Windows::Forms::TextBox textBoxl; private: System::Windows::Forms::Label label3; private: System::Windows::Forms::Label label2; private: System::Windows::Forms::ListBox listBoxl; private: System::Windows::Forms::Button button2;

private: / <summary>

/ Required designer variable. Здесь пользовательская информация int pos,posl; глобальные String w, us, pas;

String key; ключ открытия 1-й страницы private: System::Windows::Forms::Label label4;

/ </summary> System: :ComponentModel: :Container coirponents;

#pragma region Windows Form Designer generated code / <summary>

this->tabControll = (gcnew System::Windows: :Forms::TabControI ()), this->tabPagel = (gcnew System: :Windows::Forms: :TabPage () ) ; this->listBoxl = (gcnew System::Windows::Forms::ListBox()); >this->button2 = (gcnew System::Windows::Forms::Button()); this->buttonl = (gcnew System::Windows::Forms::Button()); this->textBox2 = (gcnew System::Windows::Forms::TextBox()); this->textBoxl = (gcnew System::Windows::Forms::TextBox()); this->label3 = (gcnew System::Windows::Forms::Label()); this->label2 = (gcnew System::Windows::Forms::Label()); this->labell = (gcnew System::Windows::Forms::Label ()); I this->tabPage2 = (gcnew System: :Windows: : Forms: :TabPage () ) ; this->label4 = (gcnew System: :Windows: :Forms: :Label ()) ; this->tabControll->SuspendLayout () ; this->tabPagel->SuspendLayout0; this->tabPage2->SuspendLayout () ; this->SuspendLayout () ;

tabControll

this->tabControll->Controls->Add(this->tabPagel); this->tabControll->Controls->Add(this->tabPage2); this->tabControll->Location = System::Drawing::Point(12, 12); this->tabControll->Name = L tabControll ; this->tabControll->SelectedIndex = 0;

this->tabControll->Size = System::Drawing::Size(403, 274); this->tabControll->TabIndex = 0;

this->tabControll->SelectedIndexChanged += gcnew System: :EventHandler(this,&Forml::tabControll SelectedIndexChanged);

tabPagel

[ /Required method for Designer support - do not modify I / the contents of this method with the code editor. I / </suiranary>

I void InitializeComponent (void)