Лабораторная работа N 1

Прикладное программирование

Методические указания к выполнению лабораторных работ

для студентов специальности 220301

ЭЛЕКТРОСТАЛЬ 2006

ВНИМАНИЕ!!!!

В весеннем семестре 2013 г выполняются работы:

1,2,3,4,7

Лабораторная работа N 1

“РАЗРАБОТКА ПРОСТЕЙШИХ ПРИЛОЖЕНИЙ В СРЕДЕ DELPHI ”

ЦЕЛЬ РАБОТЫ:

Знакомство с базовыми компонентами VCL Delphi, приобретение навыков программирования в среде Delphi.

ОТЧЕТ ПО ЛАБОРАТОРНОЙ РАБОТЕ ДОЛЖЕН СОДЕРЖАТЬ:

1. Задание.

2. Описание используемых компонентов.

3. Описание программы.

4. Текст программы с комментариями.

5. Результаты работы программы.

ВАРИАНТЫ ЗАДАНИЙ:

Вариант 1

1. Разместить на форме компонент TRadioGroup c 4 кнопками в группе. Добавить компонент TLabel, текст которого меняется в зависимости от того, какая кнопка нажата. Установить всплывающие подсказки для всех компонентов.

2. Разместить на форме (размер 300х450) 2 компонента TLabel и 2 TEdit, и кнопку OK.

В TEdit вводятся новые размеры формы.

По щелчку OK

– форма меняет размер на заданный (если пользователь пытается выйти за границы min 100х200, max 450х550, выдается предупреждение),

– заголовок формы меняется на 'Example',

– устанавливается размер шрифта в Тedit 14 pt, цвет – красный.

Вариант 2

1. Разместить на форме список TListBox, TEdit и кнопки Add, Load, Delete. По щелчку Add текст из TEdit добавляется в качестве элемента списка в TlistBox, Load загружает элементы списка из файла, Delete удаляет текущий элемент списка.

2. Поместить на форму 2 компонента TEdit, в которых должна отображаться текущая позиция курсора. При перемещении курсора над TEdit вид курсора меняется на crNo,

редактирование текста в TЕdit запрещено.

Вариант 3

1. Разместить на форме 2 компонента редактирования TEdit. По мере ввода данных в первый элемент, они должны появляться во втором элементе TEdit. Кнопка CLEAR должна очищать оба элемента.

Запретить измерение размеров формы.

Установить подсказки для всех компонентов формы.

2. Поместить на форму компонент TRadioGroup (кнопки красный, синий, зеленый).

Форма должна менять цвет на выбранный в RadioGroup.

Вариант 4

1. Разместить на форме список TComboBox и компонент редактирования TEdit. После того, как пользователь выбирает элемент списка, он должен быть отображен в TEdit.

2. Разместить на форме компонент TPageControl (вкладка "цвет формы" содержит список возможных цветов, "размер формы" поля для ввода высоты и ширины) и кнопку OK. При нажатии на кнопку форма изменяет свойства на заданные.

Максимальный размер формы (100x100) и минимальный (500x500) устанавливаются во время проектирования.

Вариант 5

1. Разместить на форме компоненты TMemo и TEdit, метку TLabel и кнопку ОК. По щелчку OK текст из поля TЕdit должен быть добавлен в TMemo. В TLabel отображается количество строк, содержащихся в TMemo.

Запретить изменение размеров формы. Установить подсказки для всех компонентов.

2. Поместить на форму кнопку. Отслеживать перемещение курсора и перемещать кнопку по форме так, чтобы нельзя было нажать на нее мышью.

Вариант 6

1. Разместить на форме компоненты TMemo, TСomboBox со списком шрифтов, TspinEdit для установки размера шрифта, TСhekBox для установки стилей шрифта.

При нажатии кнопки ''Apply" устанавливается соотв. переметры шрифта для TMemo.

2. Поместить на форму Tpanel. Разместить на форме и на панели по кнопке. При нажатии кнопки должно появляться окно с именем компонента-родителя и компонента- владельца, цвет родительского компонента должен меняться на синий.

Вариант 7

1. Поместить на форму компонент RadioGroup (кнопки: лето, зима, осень, весна) и ComboBox. Список ComboBox должен содержать названия тех месяцев, которые соответсвуют кнопке, выбранной в RadioGroup.

2. Поместить на форму два компонента TEdit При запуске приложения фокус ввода получает Edit2.

Кнопка Clear удаляет текст в TEdit

Кнопка Hide скрывает TEdit, кнопка Show показывает.

Вариант 8

1. Поместить на форму компонент TlistBox, содержащий список названий курсоров. Выбранный в списке курсор должен быть установлен для формы. Две метки Tlabel должны отображать текущию позицию курсора.

2. Поместить на форму размером 300x400 несколько компонентов TShape и флажок CheckBox с заголовком "изменять размеры компонентов". Если флажок установлен, то при изменениии размеров формы размеры компонентов Tshape меняются пропорционально изменению размеров формы (max размер формы 400X500 min 200X300).

Вариант 9

1. Поместить на форму TRadioGroup с несколькими кнопками, соответствующими различным цветовым палитрам (спискам цветов), и ComboBox. При выборе палитры в RadioGroup меняется список цветов в ComboBox. При выборе цвета в ComboBox цвет формы меняется на выбранный.

2. Поместить на форму таймер и метку. Форма черная, цвет шрифта метки белый. Каждые две секунды цвета должны инвертироваться. Пользователь может задать в окне TEdit количество возможных изменений цвета. При достижении указанного предела приложение закрывается.

Вариант 10

1. Разместить на форме компоненты Tмemo и кнопку "Info". При нажатии на кнопку выводятся параметры шрифта Memo (цвет, размер, имя шрифта) и количество слов в Memo.

2. Поместить на форму RadioGroup c двумя кнопками (ListBox, ComboBox), два списка ListBox и ComboBox, кнопки "Загрузить", "Очистить", "Поменять" При нажатии кнопки в RadioGroup фокус получает выбранный список. При нажатии кнопки "Загрузить" загружаются из файла элементы списка, который находится в фокусе, "Очистить" удаляет нечетные элементы списка, который находится в фокусе. "Поменять" меняет местами элементы списков ListBox и ComboBox.