- •Содержание
- •Лабораторная работа № 1
- •1.1 Главное окно Delphi.
- •1.2 Окно формы.
- •1.3 Окно инспектора формы.
- •1.4 Окно программы.
- •Лабораторная работа №2
- •Ход работы
- •5. Свойство Anchors.
- •6. Компонент tRadioGroup.
- •7. Компонент tGroupBox.
- •8. Компонент tCheckBox.
- •9. Компонент tScrollBar.
- •Лабораторная работа №3.
- •Ход работы
- •Лабораторная работа №4
- •Ход работы
- •1. Загрузите систему визуального программирования Delphi.
- •3. Компонент Image.
- •5. Шаблон формы.
- •6. Вспомогательное меню.
- •7. Диалоги.
- •I. Записать в файл. II.Считать из файла
- •8. Для проверки правильности ваших действий осуществите прогон программы.
- •Лабораторная работа №5
- •1. Загрузите систему визуального программирования Delphi.
- •2. Организуйте работу Вашего приложения, разработанного на предыдущем занятии (Lab4).
- •Лабораторная работа №6
- •Ход работы
- •1. Загрузите систему визуального программирования Delphi.
- •2. Создайте подкаталог Lab6 в своем каталоге.
- •4. Компонент tStatusBar.
- •5. Интерфейс Drag&Drop.
- •7. События, связанные с мышью.
- •8. Общие свойства компонентов Hint.
- •Лабораторная работа № 7
- •Ход работы
- •1. Загрузите систему визуального программирования Delphi.
- •3. Панели инструментов.
- •4. Многостраничный блокнот.
- •5. Компонент tPaintBox.
- •6. Компоненты tAnimate, tProgressBar, tUpDown, tShape, tTimer.
- •7. Календари.
- •Лабораторная работа № 8.
- •1. Загрузите систему визуального программирования Delphi.
- •3. Смените пиктограмму в левом верхнем углу формы, указав конкретный файл с рисунком пиктограммы в поле значения свойства Icon (пиктограмма) формы.
- •8. Вставьте на панель три флажка (объекты типа CheckBox).
- •17. Запрограммируйте команду «Выход» главного меню, воспользовавшись стандартной процедурой Close.
- •18. Запрограммируйте команду «Очистить поле вывода» контекстного меню.
- •20. Запустите созданную на этот момент программу и исследуйте ее работу.
- •21. Запрограммируйте команду «Табулировать».
- •22. Выполните программу и поупражняйтесь с разными значениями левой, правой границы и шага аргумента. Закройте окно программы «Табулирование функции».
- •Лабораторная работа № 9.
- •2. Откройте новую форму с многостраничным блокнотом.
- •3. Выделите и удалите клавишей Delete панель (Panel2) с кнопками ok, Cancel и Нelp в нижней части открытой формы.
- •4. Поменяйте заголовок формы с «Tabbed Notebook Dialog» на «Телефонный справочник» и поменяйте стиль границы окна (BorderStyle) на Sizeable (способный менять размер).
- •5. Выделите (щелкнув внутри страницы мышью) и удалите (Delete) третью страницу блокнота TabSbeet3.
- •7. Заполните обе страницы формы визуальными объектами так, как это показано на рис. 6 и рис. 7.
- •8. Сохраните выполненную на данный момент форму в своей папке.
- •18. Добавьте на форму два объекта - стандартные диалоги Windows для открытия и сохранения файлов.
- •19. Запрограммируйте процедуры открытия и сохранения файлов телефонного справочника (команды главного меню «Прочитать из файла» и «Записать в файл»).
- •20. Напишите процедуру создания формы.
- •21. Напишите процедуру заполнения полей редактирования NewEdit.
- •22. Напишите процедуру заполнения комбинированного списка NewComboBox.
- •24. Запрограммируйте команду главного меню «Сохранить изменения в списке записей».
- •25. Запрограммируйте кнопку перехода на предыдущую запись «Предыдущий».
- •26. Аналогично запрограммируйте кнопку «Следующий».
- •27. Сохраните программу и убедитесь в правильности ее работы.
Лабораторная работа №5
АТРИБУТЫ И СТИЛИ ФОРМЫ. СОЗДАНИЕ И УНИЧТОЖЕНИЕ ФОРМЫ. ВИЗУАЛИЗАЦИЯ ФОРМЫ. ИСПОЛЬЗОВАНИЕ НЕСКОЛЬКИХ ФОРМ В ПРИЛОЖЕНИИ.
Теоретические сведения
Стандартный проект в Delphi состоит из форм. Форма умеет взаимодействовать с инструментами среды разработки (палитрой компонентов, инспектором объектов и т.д.) и размещенными на ней компонентами. Они обеспечивают создание пользовательского интерфейса и хранение программной логики приложения.
В стандартном приложении задача создания и удаления форм возлагается на само приложение. Если разработчик оставил все формы в списке создаваемых автоматически, то после инициализации программы будут выполнены конструкторы всех форм проекта. При необходимости создать форму самостоятельно разработчик может использовать ее конструктор:
If Form1 = Nil then Form1:= TForm1.Create(Application);
Удаление созданных таким образом форм осуществляется автоматически. При необходимости уничтожить форму в еще работающем приложении используется метод Reliase.
If Form1 <> Nil then Release;
Метод Show обеспечивает появление формы и ее работу в немодальном режиме. Метод ShowModal обеспечивает появление формы и ее работу в модальном режиме.
Для того чтобы обратиться к методу Show, необходимо сделать ссылку на модуль окна в предложении Uses. Delphi автоматизирует вставку ссылки на модуль в предложение Uses. Для этого на этапе конструирования нужно активизировать главное окно, указав на него и щелкнув мышью, после чего обратиться к опции File/Uses Unit. В появившемся диалоговом окне нужно выбрать модуль и нажать <OK>. Если программист забыл сослаться на модуль, который подключен к проекту, Delphi при первой трансляции программы сообщит об этом и предложит вставить недостающую ссылку.
Метод Hide делает форму невидимой.
Метод Close закрывает окно, а для главного окна завершает работу программы. Обратите внимание, если главная форма невидима, и вы закрываете видимую форму (например, с помощью системной кнопки), то приложение остается в памяти. Этого в приложениях допускать нельзя, поэтому необходимо позаботиться о том, чтобы все формы были закрыты по окончании работы программы. Можно в событие Close формы поместить код: Application.Terminate.
Наличие стандартных элементов управления определяется свойством BorderIcons.
Значок формы определяется свойством Icon. Каждая форма может иметь собственное меню. За его использование отвечает свойство Menu.
Стиль формы определяется свойством BorderStyle.
Атрибуты и стили формы.
Поэкспериментируйте со свойством BorderIcons. Отметьте для себя, как меняется набор стандартных элементов управления на форме в зависимости от значения свойства.
Поэкспериментируйте со свойством BorderStyle. Отметьте для себя стили форм для каждого значения свойства.
Используя свойство Icon, определите для каждой формы индивидуальную пиктограмму. Пиктограммы расположены в подкаталоге Images/Icons.
Ход работы
1. Загрузите систему визуального программирования Delphi.
2. Организуйте работу Вашего приложения, разработанного на предыдущем занятии (Lab4).
3. Создайте новую форму (File/New/Form). Переименовать Form1 (Caption-Главная форма, Name-MainForm).
4. Для компонента TMainMenu вызовите Menu Designer, щелкнув по кнопке в правой половине строки Items инспектора объектов. Создайте опции меню, аналогичные надписи на кнопках Button формы. Текст опции вводится в строке Caption окна инспектора объектов. Опции меню разделите чертой, для чего назовите очередной элемент меню именем «-».
Главное меню формы должно иметь вид:
Лабораторные работы Выход
Lab2
Lab3
Lab4
Сохранить как Main
5. Назначить главной форму MainForm (Project/Options/Main form:MainForm). Придать функциональность каждому пункту меню.
6. Создать Aboutbox (File/New/Other.../Forms/About box/OK). Изменить: Product Name - Лабораторная работа; Version-1; Copyright-ФИО; Comments-удалить. Кнопке «ОК» придать функциональность (закрытие). Сохранить как About. В MainMenu MainForm (lab5) добавить кнопку «Об авторе» и придать ей функциональность.
7. Работа приложения должна начинаться с ввода пароля (File/New/Other.../Dialogs/Password Dialog/OK). Для кнопки «ОК» написать процедуру «На проверку пароля». Для кнопки «Cancel» назначить процедуру на закрытие. При правильном вводе пароля осуществляется переход к следующей форме. Сохранить форму как Password. Назначить главной форму PasswordDlg (Project/Options/Main form: PasswordDlg).
8. При работе с формами должна существовать возможность перехода от формы к форме. В каждый момент времени на экране видимой должна быть только одна форма. Формы лабораторных работ должны представлять собой прямоугольник без рамки и заголовка.
Программу запишите в Ваш каталог Lab5.