ИП2_лр05

Лабораторная работа №05 по дисциплине "Информатика и программирование модуль 2"
ТЕМА: Многострочные текстовые поля, списки, меню, контекстные меню
---- и их использование.
ИСПОЛЬЗОВАНИЕ МНОГОСТРОЧНОГО ТЕКСТОВОГО ПОЛЯ
-------------------------------------------1. Многострочное текстовое поле TMemo
с вкладки Standard окна "Tool Palette"
предназначено для ввода и редактирования текста, который может состоять
из нескольких строк.
Ниже в таблице перечислены основные свойства текстового поля TMemo
и приведены краткие описания этих свойств.
Свойство
Name
Описание
Имя текстового поля (обычно Memo1 или Memo2, Memo3 и т.д.).
В операторах программы используется для доступа к свойствам и
методам текстового поля, например:
Memo1.Text:='Скорость = '+ Memo2.Text+' км/час';
Lines
В простых приложениях значение свойства Name обычно не меняют, и
оно остается равным Memo1 или Memo2, Memo3 и т.д..
Ввод текста в строки текстового поля на стадии проектирования
приложения с использованием окна специального редактора строк
StringListEditor (рисунок 1-1).
Рисунок 1-1
Текст, находящийся в текстовом поле, по умолчанию совпадающий
со значением свойства Name – например, Memo1, на стадии
проектирования в окне редактора строк StringListEditor обычно
удаляется или заменяется на иной текст.
Во время выполнения приложения при вводе и редактировании текста
в текстовом поле можно использовать команды контекстного меню и
соответствующие им стандартные сочетания клавиш для выполнения
обычных операций, связанных с редактированием фрагментов текста.
Lines.Count
При использовании этого свойства в операторах программы необходимо
указывать номера строк, начиная с нуля, например,
a:=Memo1.Lines[0];
Memo1.Lines[1]:=b;
Memo1.Lines[i+1]:=a+Memo1.Lines[i];
Количество строк текста в поле TMemo(свойство только для чтения)
изменяется при ручном вводе или удалении строк текста
или при использовании соответствующих методов (см. ниже).
Значение этого свойства на единицу больше номера последней строки
текстового поля, так как эти строки нумеруются, начиная с нуля.
Text
Alignment
ScrollBars
Font
Color
Enabled
Align
Текст, находящийся в текстовом поле и рассматриваемый как единое
целое (включая символы, соответствующие нажатию на клавишу Enter).
Это свойство доступно только во время выполнения программы, то есть
может быть использовано только в операторах процедур обработки
событий (такие свойства относятся к числу так называемых
свойств времени выполнения), например:
Memo1.Text:='1 '+Edit1.Text;
Определяет выравнивание текста сразу во всех строках текстового
поля (по левому, правому краю или по центру текстового поля).
Определяет наличие полос прокрутки в текстовом поле
(по умолчанию они отсутствуют).
Шрифт сразу всего текста в текстовом поле.
Цвет фона текстового поля.
Признак доступности текстового поля для работы с текстом в нем
(если значение свойства True – поле доступно, если False – нет).
Определяет выравнивание поля внутри клиентской области формы.
По умолчанию значение свойства равно alNone, и при запуске
приложения поле без изменения размеров остается там же, где оно
было размещено во время проектирования. При этом значении свойства
нет ограничений на изменение положения поля и его размеров.
При значениях свойства alTop или alBottom поле может занимать по
ширине всю свободную верхнюю или, соответственно, всю свободную
нижнюю часть клиентской области формы без возможности изменения
ширины поля.
При значениях свойства alLeft и alRight поле может занимать по
высоте всю свободную левую или, соответственно, всю свободную
правую часть клиентской области формы без возможности изменения
высоты поля.
Top
Left
Height
Width
Visible
Hint
ShowHint
При значении свойства alClient поле может занимать всю свободную
часть клиентской области формы без возможности изменения размеров
поля.
Расстояние в пикселях от верхнего края клиентской части формы до
верхнего края текстового поля.
Расстояние в пикселях от левого края клиентской части формы до
левого края текстового поля.
Высота текстового поля в пикселях.
Ширина текстового поля в пикселях.
Признак видимости текстового поля. Если значение свойства равно
True, то текстовое поле является видимым, если False – невидимым.
Текст подсказки, который появляется рядом с указателем "мыши",
указывающим на текстовое поле (для появления текста подсказки
необходимо, чтобы значение свойства ShowHint было равно True).
Признак разрешения появления текста подсказки, определяемого
значением свойства Hint. Если значение свойства ShowHint равно
True, то текст подсказки появляется, если False – не появляется.
Наиболее характерными свойствами текстового поля TMemo являются свойства
Lines и Alignment.
Для добавления новой строки текста в поле TMemo может быть использован
метод Add или метод Append свойства Lines,
например, для добавления строки 12345 можно использовать оператор
Memo1.Lines.Add('12345');
Для удаления выделенных фрагментов текста в поле TMemo может быть
использован метод ClearSelection, например:
Memo1.ClearSelection;
при этом оставшиеся строки текстового поля могут сдвигаться вверх,
занимая места удаленных строк.
Для удаления всего текста из поля TMemo может быть использован
метод Clear, например:
Memo1.Clear;
Каждый из упомянутых здесь методов устанавливает значение
свойства Lines.Count, равное количеству строк текстового поля TMemo
после использования метода.
ИСПОЛЬЗОВАНИЕ СПИСКОВ
--------------------2. Список строк TListBox
с вкладки Standard окна "Tool Palette"
предназначен для выбора из него строк.
Ниже в таблице перечислены основные свойства списка TListBox
и приведены краткие описания этих свойств.
Свойство
Name
Описание
Имя списка (обычно ListBox1 или ListBox2, ListBox3 и т.д.).
Items
В операторах программы используется для доступа к свойствам и
методам списка.
Ввод текста в строки списка на стадии проектирования приложения
с использованием окна специального редактора строк
StringListEditor (такого же, как на рисунке 1-1).
Count
При использовании этого свойства в операторах программы
необходимо указывать номера строк, начиная с нуля, например,
a:=ListBox1.Items[0];
ListBox1.Items[1]:=b;
ListBox1.Items[i+1]:=a+ListBox1.Items[i];
Количество строк в списке TListBox.
Свойство доступно только во время выполнения программы.
Значение этого свойства на единицу больше номера последней
строки списка, так как эти строки нумеруются, начиная с нуля.
MultiSelect
ExtendedSelect
Selected[i]
ItemIndex
Sorted
Это значение может быть использовано для добавления к списку
новой строки, при этом значение свойства автоматически
увеличивается на единицу.
Например, если до выполнения оператора
ListBox1.Items[ListBox1.Count]:='Новая строка';
значение ListBox1.Count равнялось 10, то после выполнения этого
оператора это значение станет равным 11.
При значении True возможно выделения нескольких строк списка
(указателем "мыши" при нажатой клавише Ctrl), при значении (по
умолчанию) False возможно выделение только одной строки.
Определяет возможность выделения интервала строк при нажатой
клавише Shift (при значении свойства MultiSelect, равном True).
Свойство-массив для определения номеров выделенных строк списка.
Если значение Selected[i] равно True, то строка выделена.
Свойство доступно только во время выполнения программы.
Значение индекса выделенной строки (при значении свойства
MultiSelect, равном False).
Свойство доступно только во время выполнения программы.
По умолчанию значение свойства равно -1 (ни одна строка не
выделена).
Определяет необходимость автоматической сортировки строк списка
в алфавитном порядке.
Font
Color
Enabled
Align
Top
Left
Height
Width
Visible
Hint
ShowHint
Эти свойства списка аналогичны соответствующим свойствам текстового
поля TMemo.
Наиболее характерными свойствами списка TListBox являются свойства
Items, MultiSelect, ExtendedSelect, Sorted.
Процедуры обработки событий, имеющие отношение к работе со списком,
создаются, как правило, для событий, связанных с другими компонентами,
например, с кнопками (при нажатии на кнопку может происходить,
например, копирование выделенной строки списка в текстовое поле).
Для добавления строк к списку может быть использован метод AddItem,
например, для добавления строки 12345 можно использовать оператор:
ListBox1.AddItem('12345',ListBox1);
Для удаления выделенных строк списка может быть использован
метод DeleteSelected, например:
ListBox1.DeleteSelected;
при этом оставшиеся строки списка сдвигаются вверх,
занимая места удаленных строк.
Для удаления всех строк списка может быть использован метод Clear, например:
ListBox1.Clear;
Каждый из упомянутых здесь методов устанавливает новое значение
свойства Count, равное количеству строк списка после использования метода.
3. Раскрывающийся список TComboBox
с вкладки Standard окна "Tool Palette"
предназначен для ввода текстовой строки в поле редактирования
непосредственным вводом с клавиатуры
или выбором строки в это поле редактирования из раскрывающегося списка.
Ниже в таблице перечислены основные свойства списка TComboBox
и приведены краткие описания этих свойств.
Свойство
Name
Описание
Имя списка (обычно ComboBox1 или ComboBox2, ComboBox3 и т.д.).
Text
В операторах программы используется для доступа к свойствам и методам
списка.
Текст, находящийся в поле редактирования, по умолчанию совпадающий со
значением свойства Name – например, ComboBox1, на стадии
проектирования обычно заменяется на иной текст или удаляется.
Во время выполнения приложения в поле редактирования
может выбираться любая из строк списка,
при вводе и редактировании текста в этом поле во время выполнения
приложения можно использовать команды контекстного меню и
соответствующие им стандартные сочетания клавиш для выполнения обычных
операций, связанных с редактированием фрагментов текста.
Items
Items.Count
ItemIndex
Sorted
Style
Align
Ввод текста в строки списка на стадии проектирования приложения с
использованием окна специального редактора строк StringListEditor
(такого же, как на рисунке 1-1).
При использовании этого свойства в операторах программы необходимо
указывать номера строк, начиная с нуля, например,
a:=ComboBox1.Items[0];
ComboBox1.Items[1]:=ComboBox1.Text;
ComboBox1.Items[i+1]:=a+ComboBox1.Items[1];
Количество строк в списке TComboBox.
Свойство доступно только во время выполнения программы.
Значение этого свойства на единицу больше номера последней строки
списка, так как эти строки нумеруются, начиная с нуля.
Это значение может быть использовано для добавления к списку новой
строки, при этом значение свойства автоматически увеличивается на
единицу.
Например, если до выполнения оператора
ComboBox1.Items[ComboBox1.Items.Count]:='Новая строка';
значение ComboBox1.Items.Count равнялось 10, то после выполнения
этого оператора это значение станет равным 11.
Значение индекса выбранной строки списка, текст которой является
значением свойства Text.
Если в поле редактирования списка проводилось редактирование
находящегося в нем текста, то значение свойства равно -1.
По умолчанию значение свойства также равно -1 (ни одна строка не
выбрана).
Определяет необходимость автоматической сортировки строк списка в
алфавитном порядке.
Определяет стиль изображения списка в зависимости от значения
свойства:
csDropDown – список можно раскрыть, в поле редактирования списка
может быть выбрана строка списка и в этом поле можно вводить или
редактировать текст (это значение устанавливается по умолчанию);
csDropDownList – список можно раскрыть, в поле редактирования
списка может быть выбрана строка списка, но в этом поле нельзя
вводить или редактировать текст;
csSimple – список нельзя раскрыть, в поле редактирования списка
может быть выбрана строка списка (с использованием клавиш
↑ и ↓ ) и в этом поле можно вводить или редактировать текст.
Определяет выравнивание списка внутри клиентской области формы.
По умолчанию значение свойства равно alNone, и при запуске
приложения список без изменения размеров остается там же, где он
был размещен во время проектирования. При этом значении свойства
нет ограничений на изменение положения списка.
При значениях свойства alTop или alBottom список может занимать по
ширине всю свободную верхнюю или, соответственно, всю свободную
нижнюю часть клиентской области формы без возможности изменения
ширины списка.
При значениях свойства alLeft и alRight список может примыкать к
левому верхнему или, соответственно, к правому верхнему углу
клиентской области формы.
При значении свойства alClient список может примыкать к верхней
границе клиентской области формы без возможности изменения размеров
списка.
Font
Color
Enabled
Top
Left
Height
Width
Visible
Hint
ShowHint
Эти свойства раскрывающегося списка аналогичны соответствующим
свойствам списка TListBox.
Высота раскрывающегося списка в пикселях (определяется размером шрифта
текста в поле редактирования этого списка).
Эти свойства раскрывающегося списка аналогичны соответствующим
свойствам списка TListBox.
Наиболее характерными свойствами раскрывающегося списка TComboBox являются
свойства Items, Text, Sorted.
Наиболее характерным событием для раскрывающегося списка TComboBox является
событие OnChange, наступающее при любом изменении
в поле редактирования списка, включая выбор строки в это поле редактирования
из раскрывающегося списка (процедура обработки этого события будет создана,
если поместить указатель "мыши" в область списка или на его значок в окне
Structure и затем выполнить двойной щелчок левой кнопкой "мыши").
В процедуре обработки этого события можно, например, выполнять операторы
программы, связанные с использованием значения,
выбранного из раскрывающегося списка (значения свойства Text этого списка).
Для добавления строк к раскрывающемуся списку может быть использован метод
AddItem, например, для добавления строки 12345 можно использовать оператор:
ComboBox1.AddItem('12345',ComboBox1);
Для удаления выбранной в поле редактирования строки из раскрывающегося
списка (с очисткой поля редактирования) может быть использован
метод DeleteSelected, например:
ComboBox1.DeleteSelected;
при этом оставшиеся строки раскрывающегося списка сдвигаются вверх,
занимая места удаленных строк.
Для удаления всех строк раскрывающегося списка (с очисткой поля
редактирования) может быть использован метод Clear, например:
ComboBox1.Clear;
Каждый из упомянутых здесь методов устанавливает новое значение свойства
Items.Count, равное количеству строк раскрывающегося списка
после использования метода.
СОЗДАНИЕ ПРОГРАММЫ (ПЕРВОЙ ИЗ ДВУХ)
----------------------------------ПРОГРАММА 5-1
НАЧАЛО
-----------------4. Создайте проект и разместите, как на рисунке 4-1,
– в верхней части формы:
слева – многострочное текстовое поле (TMemo),
в середине – раскрывающийся список (TComboBox),
справа – список (TListBox)
с вкладки Standard окна "Tool Palette";
– в средней части формы:
7 кнопок (TButton) с вкладки Standard окна "Tool Palette"
(для более рациональной технологии использования
процедур обработки событий, связанных с этими кнопками,
верхнюю из них рекомендуется размещать в форме в последнюю очередь);
– в нижней части формы:
6 кнопок (TBitBtn) с вкладки Additional окна "Tool Palette".
Рисунок 4-1
ПРОГРАММА 5-1
ПРОДОЛЖЕНИЕ
----------------------Для текстового поля TMemo:
– установите значение его свойства ScrollBars равным ssBoth
(для видимости полос прокрутки);
– удалите текст Memo1 (или другой текст) из этого поля, для чего используйте
его свойство Lines и затем окно String List Editor (как на рисунке 1-1).
Для раскрывающегося списка TComboBox удалите текст ComboBox1
(или другой текст) из поля редактирования этого списка.
Для раскрывающегося списка TComboBox и для списка TListBox установите
значение свойства Sorted равным True (для автоматической сортировки
строк списков в алфавитном порядке).
Для списка TListBox установите:
– значение его свойства MultiSelect равным True
(для возможности выделения нескольких строк списка),
– значение его свойства ExtendedSelect равным True
(для возможности выделения интервала строк списка
при нажатой клавише Shift).
На всех кнопках для надписей на них (таких же, как на рисунке 4-1)
установите полужирное начертание шрифта.
На кнопках TBitBtn для надписей на них установите красный цвет шрифта.
Создайте для списка TComboBox процедуру обработки события OnChange,
при выполнении которой строка из поля редактирования этого списка
добавлялось бы к строкам списка TListBox.
Создайте для кнопок с указанными ниже надписями на них процедуры обработки
событий OnClick,выполняющие следующие действия:
Memo to Combo – построчное добавление всего текста из поля TMemo
к строкам списка TComboBox, а также занесение верхней строки
поля TMemo в поле редактирования списка TComboBox.
В этом случае построчное добавление с использованием метода AddItem
может выглядеть так:
for i:=0 to Memo1.Lines.Count-1 do
ComboBox1.AddItem(Memo1.Lines[i],ComboBox1);
где i – переменная целого типа, описанная в этой же процедуре обработки
события OnClick между строками с procedure и с begin как, например,
var i: integer;
В остальных случаях построчное добавление может быть выполнено аналогично
с использованием соответствующих методов.
Memo to List – построчное добавление всего текста из поля TMemo
к строкам списка TListBox;
Text to Combo – добавление значения из поля редактирования списка TComboBox
к этому же списку в качестве его новой строки;
Combo to List – построчное добавление всех строк из списка TComboBox
к строкам списка TListBox;
Combo to Memo – построчное добавление всех строк из списка TComboBox
к строкам поля TMemo;
List to Memo – построчное добавление всех строк из списка TListBox
к строкам поля TMemo;
List to Combo – построчное добавление всех строк из списка TListBox
к строкам списка TComboBox, а также занесение верхней строки
списка TListBox в поле редактирования списка TComboBox.
ПРОГРАММА 5-1
ОКОНЧАНИЕ
--------------------Clear Selected in Memo – удаление выделенных фрагментов текста в поле TMemo;
Clear All in Memo – удаление всего текста из поля TMemo;
Clear Selected in Combo – удаление выбранной в поле редактирования строки
из списка TComboBox
(с очисткой поля редактирования этого же списка);
Clear All in Combo – удаление всех строк списка TComboBox
(с очисткой поля редактирования этого же списка);
Clear Selected in List – удаление выделенных строк списка TListBox;
Clear All in List – удаление всех строк списка TListBox;
После запуска созданного приложения следует ввести текстовые строки в поле
TMemo и проверить правильность работы всех созданных процедур обработки
событий, используя кнопки, а также выбор строки из списка TComboBox.
ИСПОЛЬЗОВАНИЕ МЕНЮ И КОНТЕКСТНЫХ МЕНЮ
------------------------------------5. Меню TMainMenu
с вкладки Standard окна "Tool Palette" используется
для создания в окне приложения главного меню (или просто меню)
этого приложения, а также раскрывающихся меню и подменю,
соответствующих командам главного меню.
Наиболее характерное свойство меню TMainMenu – Items.
При выборе этого свойства на экране появляется окно конструктора меню
(рисунок 5-1). Это окно также появляется, если поместить указатель "мыши"
в область компонента TMainMenu в окне формы или на его значок в окне
Structure и затем выполнить двойной щелчок левой кнопкой "мыши".
Рисунок 5-1.
При создании в этом окне команд меню и подменю необходимо иметь в виду
следующее:
А) Название создаваемой команды вводится в качестве значения ее свойства
Caption (в окне Object Inspector, где ввод названия команды следует
обязательно завершить нажатием клавиши Enter или другим способом).
Б) Выбор создаваемой команды производится переходом в область команды,
ограниченную пунктирной рамкой.
В) Редактирование названия созданной команды производится после ее выбора
путем изменения значения ее свойства Caption.
Г) Для добавления подменю к какой-либо команде создаваемого меню (или, иначе
говоря, для создания многоуровневого меню) можно использовать контекстное
меню и его команду Create Submenu или сочетание клавиш Ctrl+ →.
Д) Для вставки или удаления команд меню можно использовать контекстное меню
и его команды Insert или Delete.
Е) Для вставки в меню разделителя следует создать "команду" со значением
свойства Caption, состоящим из одного символа дефиса или "минуса" ("-").
Ж) Для команды меню (также как и для кнопок, флажков, переключателей) можно
указать символ быстрого доступа. Для этого значение свойства Caption
должно содержать перед этим символом символ амперсанда (&). Следующий за
амперсандом символ будет выглядеть подчеркнутым и будет являться символом
быстрого доступа (в этом случае доступ к команде может быть получен при
одновременном нажатии клавиши Alt и клавиши этого символа).
Для использования символа амперсанда в значении свойства Caption этот
символ следует ввести дважды подряд(&&).
Одновременно с созданием меню его структура со значками и названиями
создаваемых команд появляется в окне среды программирования Structure
(например, как на рисунках 5-3 и 5-2). Используя строки с названиями команд
в окне Structure, можно получать доступ к свойствам и событиям
этих команд в окне Object Inspector.
Рисунок 5-2
Рисунок 5-3
Для тех команд меню и подменю, при выборе которых должны происходить
какие-либо действия, наиболее характерным событием является событие OnClick.
В операторах программы для доступа к свойствам и методам команд меню
используются имена команд, задаваемые свойством Name
(для команды меню значение этого свойства
– для команд на английском языке автоматически формируется близкое
к вводимому названию этой команды,
– для команд на русском языке автоматически формируется
из буквы N и порядкового номера команды, как, например, на рисунке 5-2).
Из других свойств команд меню следует отметить
свойство Enabled
(если значение свойства равно True, то команда и ее подменю доступны
для выполнения, если False – то недоступны)
и свойство Visible
(если значение свойства равно True, то команда и ее подменю являются
видимыми, если False – невидимыми).
Эти свойства могут использоваться в тех случаях, когда команды меню
временно не должны быть доступны для выполнения
или не должны присутствовать в меню.
6. Контекстное меню TPopupMenu
с вкладки Standard окна "Tool Palette"
используется для создания в окне приложения контекстных меню, появляющихся
на экране при щелчке правой кнопкой "мыши", когда указатель "мыши" указывает
на компонент (или окно формы).
Наиболее характерное свойство меню TPopupMenu – Items.
При выборе этого свойства на экране появляется окно конструктора меню
(рисунок 6-1). Это окно также появляется, если поместить указатель "мыши"
в область компонента TPopupMenu в окне формы или на его значок
в окне Structure и затем выполнить двойной щелчок левой кнопкой "мыши".
Рисунок 6-1
Создание в этом окне команд контекстного меню TPopupMenu производится
аналогично созданию команд главного меню TMainMenu.
Также, аналогично главному меню TMainMenu, осуществляется использование
событий и доступ к свойствам и методам для контекстного меню TPopupMenu.
Для того чтобы контекстное меню для компонента (или формы) действовало
при выполнении приложения, необходимо для свойства PopupMenu или события
PopupMenu этого компонента (или формы) выбрать значение, совпадающее
с именем сформированного контекстного меню
(см., например рисунки 6-2 и 6-3).
Рисунок 6-2
Рисунок 6-3
На Рисунке 6-4 представлен пример окна приложения с главным меню
и на Рисунке 6-5 – с контекстным меню для области текстового поля.
Рисунок 6-4
Рисунок 6-5
Так как команды контекстного меню TPopupMenu часто дублируют
команды главного меню TMainMenu, можно для ускорения процесса создания
контекстного меню скопировать нужные команды из главного меню
в контекстное меню TPopupMenu. Для этого следует в окне конструктора
главного меню TMainMenu (см., например, рисунок 5-2), выделить нужные
команды (можно выделять сразу группами, используя клавиши Shift или Ctrl),
скопировать их в буфер обмена сочетанием клавиш Ctrl+C, открыть окно
конструктора контекстного меню TPopupMenu (см., например, рисунок 6-1),
вставить там из буфера обмена копируемые команды сочетанием клавиш Ctrl+V,
после чего скопированные команды будут вставлены в контекстное меню
вместе со своими подменю и с теми же свойствами,
что и команды главного меню приложения.
Для команд контекстного меню TPopupMenu, дублирующих действия команд
главного меню TMainMenu, можно использовать те же процедуры обработки
событий, что и для соответствующих команд главного меню (обычно событий
OnClick, соответствующих выбору команды в меню или в контекстном меню).
Кроме того, для команд главного меню TMainMenu и контекстного меню
TPopupMenu можно использовать процедуры обработки событий, связанных
с другими компонентами.
СОЗДАНИЕ ПРОГРАММЫ (ПОСЛЕДНЕЙ ИЗ ДВУХ)
-------------------------------------ПРОГРАММА 5-2
НАЧАЛО
-----------------7. Сохраните файлы модуля и проекта ПРОГРАММЫ 5-1
в другой папке с другими именами.
Добавьте в форму сохраненного проекта в верхней части формы (см. рисунок 7-1)
компоненты TMainMenu и TPopupMenu с вкладки Standard окна "Tool Palette",
изменяя при необходимости размеры этой формы.
(строка меню с командами Memo, Combo, List, Exit появится в окне формы
после создания меню с использованием компонента TMainMenu согласно
рисункам с 7-2 по 7-5).
Рисунок 7-1
ПРОГРАММА 5-2
ПРОДОЛЖЕНИЕ
----------------------Создайте в форме меню и контекстное меню согласно рисункам с 7-2 по 7-6.
Рисунок 7-2
Рисунок 7-3
Рисунок 7-4
Рисунок 7-5
Рисунок 7-6
ПРОГРАММА 5-2
ОКОНЧАНИЕ
--------------------Создайте для команды меню Exit процедуру обработки события OnClick
(связанного с выбором этой команды в меню) для выхода из программы или,
иначе говоря, для закрытия окна формы (используйте метод Close).
Для каждой из остальных команд меню и контекстного меню в качестве процедуры
обработки события OnClick выберите ранее созданную процедуру для той кнопки,
надпись на которой соответствует названию команды меню или контекстного меню.
После запуска созданного приложения следует ввести текстовые строки в поле
TMemo и проверить правильность использования ранее созданных процедур
обработки событий при выполнении команд меню и контекстного меню.
ОТЧЕТ О ВЫПОЛНЕНИИ РАБОТЫ
------------------------8. Продемонстрируйте тексты созданных программ,
а также их выполнение в среде программирования и независимо от нее.
________________________________________________________________________________