Все разделы / Программирование /
Страницу Назад
Поискать другие аналоги этой работы
![]() ![]() Основы визуального программирования. Лабораторная работа № 2ID: 134130Дата закачки: 22 Января 2014 Автор: Andrey Продавец: mamontynok ![]() Тип работы: Работа Лабораторная Форматы файлов: Microsoft Word Сдано в учебном заведении: СибГУТИ Описание: Лабораторная работа № 2 Тема: Компоненты MainMenu, PopupMenu, Memo, OpenDialog, SaveDialog. Создание вложенного динамического меню. Задание ЗАДАНИЕ 1: Создание простейшего редактора, который работает с файлом memos.txt, находящемся в текущей папке. 1. Создайте главное меню – компонент MainMenu - с пунктами: File Help New About… F1 Open… F3 Close Save F2 Save As… Exit Alt+X 1.1. Создайте обработчики событий, поступающих от объектов: Exit1 – закрытие формы; About1 – информация об авторах в стандартном окне (MessageDlg); 2. Создать всплывающее меню – компонент PopupMenu, содержащее пункты: Save, About, Exit; 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’) else Memo1.Lines.SaveToFile(‘memos.txt’); Тогда, если при запуске Приложения файл memos.txt существует в текущей папке, то он загружается в окно Memo1. В случае отсутствия файла memos.txt в текущей папке создается новый пустой файл memos.txt (в файл записывается пустое значение свойства Lines объекта Memo1); 9. Для того, чтобы сразу после запуска Приложения курсор находился в окне объекта Memo1, установите значения свойства ActiveControl формы, равным Memo1. Размер файла: 651,5 Кбайт Фаил: ![]() ![]() ![]() Скачано: 13 Коментариев: 0 |
Есть вопросы? Посмотри часто задаваемые вопросы и ответы на них. Опять не то? Мы можем помочь сделать! Некоторые похожие работы:Лабораторная работа №4 по дисциплине: Основы визуального программирования. Вариант №8Лабораторная работа №1 по дисциплине: Основы визуального программирования. Вариант №8 Лабораторная работа №2 по дисциплине: Основы визуального программирования. Вариант №8 Лабораторная работа №3 по дисциплине: Основы визуального программирования. Вариант №8 Лабораторная работа №5 по дисциплине: Основы визуального программирования. Вариант №8 Лабораторная работа №2 по дисциплине: Основы визуального программирования. (ВСЕ варианты) Лабораторная работа №3 по дисциплине: Основы визуального программирования. (ВСЕ варианты) Ещё искать по базе с такими же ключевыми словами. |
Вход в аккаунт:
Страницу Назад
Cодержание / Программирование / Основы визуального программирования. Лабораторная работа № 2