Создайте обработчики событий, поступающих от объектов:
Exit1 – закрытие формы;
About1 – информация об авторах в стандартном окне (MessageDlg).
(Примечание: для размещения текста в нескольких строчках используйте #13#10.
Например: ‘Авторы’#13#10’Студенты СибГУТИ’)
1.1. Запустите Приложение
2. Создать всплывающее меню – компонент PopupMenu, содержащее пункты: Save, About, Exit.
2.1. PopupMenu должно появляться во время работы Приложения при нажатии на правую кнопку мыши. Для того, чтобы форма могла использовать PopupMenu, определите значение свойства PopupMenu для формы.
2.2. Для обработки событий OnClick объектов About2 и Exit2 установите обработчики событий OnClick объектов About1 и Exit1.
2.3. Запустите Приложение и проверьте работу объекта PopupMenu.
3. Поместите на форму объект Label. Присвойте свойству Caption значение FileName.
4. Поместите на форму объект Edit под объектом Label. Измените значение свойства Text объекта Edit1 на memos.txt .
5. Поместите на форму объект Memo. Измените его размер и выровняйте компоненты, расположенные на форме, используя в главном меню Edit | Align. (Для выделения группы компонентов используйте ‘захват’ компонентов левой кнопкой мыши)
6. Уберите у свойства Lines объекта Memo1 его значение. Установите вертикальную и горизонтальную полосы прокрутки, используя свойство ScrollBar объекта Memo1.
7. Для создания обработчика события, заключающегося в выборе пункта Save в главном меню, в процедуру обработки события OnClick объекта Save1 главного меню запишите код: Memo1.Lines.SaveToFile(‘memos.txt’);
Для обработки события OnClick объекта Save2 всплывающего меню подключите ту же процедуру Save1Click.
8. В процедуру обработки события OnActive формы запишите следующий код:
If FileExists(‘memos.txt’) then Memo1.Lines.LoadFromFile(‘memos.txt’)