Этап 5. Разработка дочернего окна с кнопкой

Создадим дочернее окно с кнопкой, управляющей перемещением шаров в области клиента прикладного окна. Диаграмма классов и реализация пятого этапа представлены на рис. 5.3.5.1 и в примере 5.3.5.1.

Рис 5.3.5.1. Диаграмма классов Balls–приложения пятого этапа

Пример 5.3.5.1. Реализация пятого этапа разработки Balls–приложения на языке C#.

////////////////////

// C# File BallsCs5.cs

// Файл BallsCs5.cs полностью включает файл BallsCs4.cs, дополнив его

// новым классом User, порождённым из класса Balls. Класс User содержит

// управляющий элемент–кнопку, нажатие на которую приостанавливает

// или возобновляет перемещение шаров.

// Изменения файла BallsCs4.cs выделены жирным шрифтом

...

//-------------------------------------

class Ball // Класс обычного объекта

{ ...

void BallFunc ()

{

int n= 0;

while (life)

{

...

}

Console.Write (" Объект {0}", num.ToString ());

Console.WriteLine (" завершён");

}

} ...

//-------------------------------------

class User: Balls // Класс пользователя шаров

{

Private bool run;

Form pChildForm;

Button pBut;

Public User ()

{

run= true;

//---------------

pBut= new Button();

pBut.Location = new Point (32, 24);

pBut.Name = " pBut";

pBut.Size = new System.Drawing.Size (32, 24);

pBut.Text = " OK";

pBut.Click += new EventHandler (OnBut);

ClientSize = new System.Drawing.Size (200, 150);

//---------------

pChildForm= new Form ();

pChildForm.Location= new Point (250, 10);

pChildForm.Size= new Size (250, 250);

pChildForm.Text= " User";

PChildForm.Show ();

PChildForm.Controls.Add (pBut);

pChildForm.ClientSize = new System.Drawing.Size (200, 62);

}

//---------------

void OnBut (object obj, EventArgs arg) // Обработчик кнопки

{

Console.WriteLine (" OkMouse");

If (run)

{

run= false;

Suspend ();

}

Else

if (! run)

{

run= true;