Лабораторная работа №22 «Интегрированная среда программирования Delphi. Стандартные компоненты»

Цель: сформировать умения составлять простейшие программы в интегрированной среде программирования Delphi.

Задание:

Создать форму следующего вида:

Memo

Реализовать следующие возможности:

При выборе пункта меню «открыть» данные автоматически загружаются в текстовый редактор из файла base.txt, который находится в текущей директории, при выборе пункта меню «сохранить» - сохраняется в тот же файл.

• Меню следующего вида:

Вкладки меню Вид позволяют убирать и добавлять на форму соответствующие способы редактирования текста. Например, если снять галочку в меню Вид со шрифта соответствующая панель редактирования исчезнет с формы.

• Возможность изменения цвета текста, цвета фона и шрифта.

• При снятии галочки с «границы» рамка у окна редактирования текста исчезает:

• Возможность изменения стиля текста. Заметьте, что возможен выбор сразу всех стилей!

Лабораторная работа № 23

ТЕМА: Разработка программ обработки массивов с использованием компонент страницы Standart

ЦЕЛЬ РАБОТЫ:

1. Получить практические навыки разработки программ обработки массивов.

2. Отработать навыки составления программ с использованием компонент страницы Standart.

Задание для выполнения.

Разработать программу, которая позволяла бы вводить элементы массива из 10 чисел; при нажатии соответствующих кнопок: определяла минимальный и максимальный элементы, сортировала элементы массива по возрастанию и убыванию. В случае, если заполнены не все поля (введены не все значения элементов массива), должно быть соответствующее сообщение.

Контрольные вопросы:

1. Как изменить свойство объекта с использованием Object Inspector?

2. Как изменить свойство объекта программно?

3. Перечислите объекты страницы компонент Standart.

4. Какие файлы автоматически формируются при разработке проекта в среде Delphi?

5. В чем отличия дизайнера форм и редактора исходного кода программы?

Лабораторная работа №24 Разработка приложений с использованием дополнительных компонентов.

Цель: Изучить стандартные, дополнительные компоненты Delphi7. Научиться создавать приложения в среде Delphi7 с использованием стандартных и дополнительных компонентов.

Задание 1:

Создать форму следующего вида:

BitBtn

GroupBox

ListBox

Edit

Код кнопки «Очистить»:

ListBox1.Items.Clear();

Код кнопки «Добавить»:

BitBtn3.Enabled = false; BitBtn1.Enabled = true; Edit1.Enabled = true; Edit1.SetFocus();

Делаем кнопку «добавить» недоступной А кнопку «ОК» доступной Делаем доступной строку ввода И перемещаем курсор на эту строку

Описание формы:

При нажатии на кнопку Добавить становится доступным поле Edit, куда осуществляется ввод данных, и кнопка ОК, по нажатию на которую данные заносятся в ListBox. Кнопка Добавить становится недоступной.

При нажатии на кнопку Удалить осуществляется удаление последней записи из ListBox.

При нажатии на кнопку Очистить – ListBox становится пустым.

При нажатии на кнопку Переставить, форма примет следующий вид:

Edit3

Edit2

Код кнопки «Переставить»:

1. Очистить Edit2 и Edit3;

2. Сделать видимым GroupBox на котором расположены элементы;

3. Сделать недоступными все оставшиеся кнопки.

Код кнопки «ОК»

1. Сделать невидимым GroupBox на котором расположены элементы;

2. Сделать доступными все остальные кнопки;

3. Поменять местами элементы с помощью метода ListBox1.Items.Exchange(...написать код замены самостоятельно

В Edit осуществляется ввод номеров записей, которые необходимо поменять местами.

При запуске приложения данные автоматически загружаются в ListBox из текстового файла base.txt, который находится в текущей директории.

При нажатии на кнопку Сохранить данные в файле base.txt переписываются.

При нажатии на кнопку Загрузить данные из файла base.txt загружаются в ListBox.

Задание 2:

Создать форму следующего вида:

Shape

BitBtn

ColorBox

ComboBox

MaskEdit

Необходимо предоставить выбор:

Фигура
Стиль линии
Толщина	От 1 до 9 (компонент не должен позволять вводить символов отличных от цифр)
Стиль штриховки

При нажатии на кнопку Close приложение закрывается.

Вспомогательная информация:

Компонент Shape.

Определяет геометрическую фигуру, которую отобразит компонент TShape. Может принимать одно из следующих значений:

• stCircle - круг.

• stEllipse - эллипс.

• stRectangle - прямоугольник (значение по умолчанию).

• stRoundRect - прямоугольник со скругленными углами.

• stRoundSquare - квадрат со скругленными углами.

• stSquare - квадрат.

Свойство Brush отвечает за заливку/штриховку компонента. Свойство Pen отвечает за границу компонента. Оба эти свойства являются составными, т. е. можно задать как цвет, так и стиль, и др. параметры этих свойств.

Окно редактирования MaskEdit.

Компонент MaskEdit: в нем можно задать строку маски в свойстве EditMask. Маска состоит из трех разделов, между которыми ставится точка с запятой ";". В первом разделе шаблоне записываются специальным образом символы, которые можно вводить в каждой позиции, и символы, добавляемые самой маской; во втором разделе записывается 1 или 0 в зависимости от того, надо или нет, чтобы символы, добавляемые маской, включались в свойство Text компонента; в третьем разделе указывается символ, используемый для обозначения позиций, в которых еще не осуществлен ввод. Прочитать результат ввода можно или в свойстве Text, которое в зависимости от вида второго раздела маски включает или не включает в себя символы маски, или в свойстве EditText, содержащем введенный текст вместе с символами маски.

 Символы шаблона маски:

Символ	Описание
!	Наличие символа "!" означает, что в EditTextнедостающие символы предваияются пообелами. а отсутствие символа "!" означает, что птобелы размещаются в конце.
>	Символ ">" означает, что все последующие за ним символы должны вводиться в верхнем регистре, пока не кончится маска или пока не встретится символ "<".
<	Символ "<" означает, что все последующие за ним символы должны вводиться в нижнем регистре, пока не кончится маска или пока не встретится символ ">".
<>	Символы "<>" означают, что анализ регистра не производится.
\	Символ означает, что следующий за ним символ является буквенным, а не специальным, характерным для маски.
L	Символ "L" означает, что в данной позиции должна быть буква.
l	Символ "l" означает, что в данной позиции может быть только буква или ничего.
A	Символ "А" означает, что в данной позиции должна быть буква или цифра.
a	Символ "а" - в данной позиции может быть или буква, или цифра, или ничего.
С	Символ "С" означает, что в данной позиции должен быть любой символ.
с	Символ "с" означает, что в данной позиции может быть любой символ или ничего.
0	Символ "0" означает, что в данной позиции должна быть цифра.
9	Символ "9" означает, что в данной позиции может быть цифра или ничего.
#	Символ "#" - в данной позиции может быть цифра, знак "+", знак "-" или ничего.
:	Символ ":" используется для разделения часов, минут и секунд.
/	Символ "/" используется для разделения месяцев, дней и годов в датах.
_	Символ "_" означает автоматическую вставку в текст пробела.

Вводить маску можно непосредственно в свойство EditMask. Но удобнее пользоваться специальным редактором масок, вызываемым при нажатии кнопки с многоточием в строке свойства EditMask в Инспекторе Объектов.