Клуб студентов "Технарь". Уникальный сайт с дипломами и курсовыми для технарей.

(38 руб.)

Основы визуального программирования. Лабораторная работа № 2

Дата закачки: 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 Кбайт
Фаил: (.rar)

  Скачать

  Добавить в корзину

    Скачано: 13         Коментариев: 0

Есть вопросы? Посмотри часто задаваемые вопросы и ответы на них.
Опять не то? Мы можем помочь сделать!

Некоторые похожие работы:

Лабораторная работа №4 по дисциплине: Основы визуального программирования. Вариант №8
Лабораторная работа №1 по дисциплине: Основы визуального программирования. Вариант №8
Лабораторная работа №2 по дисциплине: Основы визуального программирования. Вариант №8
Лабораторная работа №3 по дисциплине: Основы визуального программирования. Вариант №8
Лабораторная работа №5 по дисциплине: Основы визуального программирования. Вариант №8
Лабораторная работа №2 по дисциплине: Основы визуального программирования. (ВСЕ варианты)
Лабораторная работа №3 по дисциплине: Основы визуального программирования. (ВСЕ варианты)
Ещё искать по базе с такими же ключевыми словами.