Фактическая температура воздуха в Находке on-line. Прогноз погоды в Находке  

Лабораторные программирование. Задания и исходники(Delphi 7)

Ищем и рекомендуем книги ИТ-тематики, обсуждаем исходники.

Модератор: Aroch

Лабораторные программирование. Задания и исходники(Delphi 7)

Сообщение Char0Day » Вт окт 30, 2007 9:04 pm

Как-то делал задание 16 Лабораторных работ по программированию.

Лабораторная работа №01 по дисциплине "Программирование"

ТЕМА: Знакомство со средой программирования.
Создание консольного приложения.
Создать консольное приложение, при выполнении которого будет происходить суммирование вводимых с клавиатуры в отдельных строках целых чисел до ввода нуля, после чего на экран будет выведена в отдельной строке сумма введенных чисел с соответствующим поясняющим текстом, и затем процесс ввода и суммирования можно будет начать заново (если сразу после вывода суммы будет введен ноль, то произойдет выход из программы).
Вложения
lab01.rar
Исходники Консольного приложения "Суммирование чисел" Delphi 7
(27.18 Кб) Скачиваний: 45
Последний раз редактировалось Char0Day Вс ноя 04, 2007 5:27 pm, всего редактировалось 1 раз.
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Char0Day » Вс ноя 04, 2007 1:17 pm

Лабораторная работа №02 по дисциплине "Программирование"

ТЕМА: Алфавит языка программирования Delphi (Object Pascal). Идентификаторы.
Переменные и константы. Типы данных. Описание (объявление) переменных.
Операции. Стандартные функции. Выражения.
Оператор (инструкция) присваивания.
Операторы (инструкции) ввода и вывода в режиме консольного приложения.
Комментарии. Создание простейших программ.

ПРОГРАММА 2-1
-------------
23. Создайте консольное приложение, при выполнении которого происходит:
а) ввод двух целых чисел;
б) вычисление целой части и остатка от деления первого из введенных чисел на
второе;
в) вывод в следующей строке слева направо значений введенных чисел и полученных
результатов вычислений с расположенным левее каждого результата названием
соответствующей операции (DIV и MOD);
г) в строках текста программы с операторами, выполняющими вычисления, должны
также находиться комментарии на русском языке с названиями действий,
выполняемыми соответствующими операциями.

ПРОГРАММА 2-2
-------------
24. Создайте консольное приложение, при выполнении которого происходит:
а) вывод текста "X= " и затем ввод в этой же строке вещественного аргумента;
б) вычисление и печать в отдельных строках значений всех перечисленных в пп.13 и
14 функций от введенного аргумента с расположенным левее каждого результата
названием соответствующей функции (кроме, разумеется функции Pi);
в) для функций Sqrt(x) и Ln(x) следует вычислять значения
Sqrt(Abs(x))и Ln(Abs(x));
г) в тексте программы перед строками с соответствующими операторами должны быть
вставлены строки с комментариями "Математические функции"
и "Функции преобразования".

ПРОГРАММА 2-3
-------------
Создайте консольное приложение, при выполнении которого происходит:
а) ввод трех вещественных чисел X, Y и Z;
б) вычисление и печать в отдельной строке результата вычислений по формуле

S = (SIN(X•PI/180) • e^(-ABS(Y+Z)) )/(Y^2 + Z^2)
Вложения
lab02.rar
(17.68 Кб) Скачиваний: 39
Последний раз редактировалось Char0Day Вс ноя 04, 2007 5:35 pm, всего редактировалось 1 раз.
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Aroch » Вс ноя 04, 2007 1:34 pm

Char0Day, задание работ вынес бы отдельно тут, а то не понятно что качать. И обычно поисковиками ищут подобный материал, но твои ссылки так точно мало кто найдет.
Boku wa naze kaze no you ni kumo no you ni ano sora e to ukabu hane ga nai naze... [Trinity Blood]
Аватара пользователя
Aroch
Смотритель
 
Сообщения: 177
Зарегистрирован: Ср сен 19, 2007 8:57 am
Откуда: Nakhodka

Сообщение Char0Day » Вс ноя 04, 2007 5:13 pm

Aroch,
Истину говоришь. Переделываю :yes:

Лабораторная работа №03 по дисциплине "Программирование"

ТЕМА: Логические выражения. Операторы (инструкции) передачи управления.
---- Составные операторы (инструкции).

ПРОГРАММА 3-1
-------------
16. Создайте консольное приложение, предназначенное для получения решения
квадратного уравнения вида ax2+bx+c=0.
Приложение должно использовать ПОЛНУЮ ФОРМУ УСЛОВНОГО ОПЕРАТОРА
и выполнять следующие действия:
а) ввод значений вещественных коэффициентов a, b и c;
б) если значение дискриминанта D=b2-4ac≥0, то вычисление значений корней квадратного уравнения по формулам
x1 =(-b-D1/2)/2a, x2 = (-b+D1/2)/2a и вывод результатов;

в) если значение дискриминанта D=b2-4ac<0 (что говорит об отсутствии
у уравнения действительных корней), то вывод текста "D<0".
г) в строках текста программы с операторами должны также находиться комментарии
на русском языке с кратким описанием действий, выполняемыми соответствующими
операторами.

ПРОГРАММА 3-2
-------------
17. Создайте консольное приложение, выполняющее те же действия,
что и приложение из п.16, но использующее
СОКРАЩЕННУЮ ФОРМУ УСЛОВНОГО ОПЕРАТОРА и ОПЕРАТОР ПЕРЕХОДА с МЕТКОЙ
(в тексте программы также должны быть комментарии).

ПРОГРАММА 3-3
-------------
18. Создайте консольное приложение с использованием ОПЕРАТОРА ВЫБОРА
и других ОПЕРАТОРОВ ПЕРЕДАЧИ УПРАВЛЕНИЯ
и выполняющее следующие действия:
а) вывод слова "Месяц" на английском языке и затем ввод в этой же строке
целого числа, значение которого может совпадать с номером какого-либо месяца;
б) если значение введенного числа совпадает с номером какого-либо месяца,nто вывод названия времени года, к которому относится этот месяц, на английском языке (если месяц январь, то в строке с названием времени года дополнительно вывод пожелания счастливого Нового года на английском языке) и затем переход на начало следующей строки;
если значение введенного числа не совпадает с номером какого-либо месяца,
то вывод текста "----" и затем переход на начало следующей строки;
в) переход к пп."а)" на вывод слова "Месяц" на английском языке и ввод числа
и т.д..

ПРОГРАММА 3-4
-------------
17. Создайте консольное приложение, выполняющее те же действия,
что и приложение из п.16, но работающее таким образом, чтобы оно
после вывода результатов снова переходило бы на ввод значений коэффициентов
квадратного уравнения.



Исходный код (Delphi 7)
Вложения
lab03.rar
(16.21 Кб) Скачиваний: 46
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Char0Day » Вс ноя 04, 2007 5:47 pm

Лабораторная работа №04 по дисциплине "Программирование"

ТЕМА: Операторы (инструкции) цикла.


ПРОГРАММА 4-1, ПРОГРАММА 4-2 и ПРОГРАММА 4-3
--------------------------------------------
9. Создайте три консольных приложения (для циклов с while, repeat и for),
каждое из которых, по аналогии с соответствующим примером из п.8,
должно суммировать элементы числового ряда

s=1/1! + 1/2! +1/3!+ … + 1/n

с введенным значением точности или,
для цикла for, с введенным значением числа n,
и выводить результат вычислений.

ПРОГРАММА 4-4 и ПРОГРАММА 4-5
-----------------------------
10. Создайте два консольных приложения, реализующих задачу из п.9
с использованием только операторов ПЕРЕДАЧИ УПРАВЛЕНИЯ
(одно из них должно выполнять ввод значения точности,
другое – ввод числа n,
и оба приложения должны выводить результат вычислений).

Исходный код (Delphi 7)
Вложения
lab04.rar
(17.14 Кб) Скачиваний: 27
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Char0Day » Вс ноя 04, 2007 5:54 pm

Лабораторная работа №05 по дисциплине "Программирование"

ТЕМА: Массивы. Форматы вывода.

ПРОГРАММА 5-1 и ПРОГРАММА 5-2
-----------------------------

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



2. Создайте консольное приложение, при выполнении которого происходит:
а) ввод вещественных чисел в двумерный массив, состоящий из 3 строк
по 4 элемента в каждой, с нижними границами индексов, равными 1;
б) вычисление для каждой строки этого двумерного массива
суммы значений элементов строки и присвоение вычисленных значений сумм
элементам одномерного массива соответствующей длины;
в) вычисление для каждой строки этого двумерного массива
среднего значения элементов строки и присвоение вычисленных
средних значений элементам еще одного одномерного массива
соответствующей длины;
г) вывод в одной строке с двумя знаками после десятичной точки
значений первых элементов этих двух одномерных массивов,
затем вывод в другой строке также с двумя знаками после десятичной точки
значений вторых элементов этих двух одномерных массивов
и т.д. для всех остальных значений элементов
этих двух одномерных массивов.


Исходный код (Delphi 7):
Вложения
lab05.rar
(11.02 Кб) Скачиваний: 32
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Char0Day » Вс ноя 04, 2007 5:57 pm

Лабораторная работа №06 по дисциплине "Программирование"

ТЕМА: Логические выражения и логические переменные. Символы и строки.

ПРОГРАММА 6-1 и ПРОГРАММА 6-2
-----------------------------

18. Создайте консольное приложение, при выполнении которого происходит
ввод вещественного значения величины "x", вычисление и вывод значения
величины "y", если
y=1 при 0<=x<=2;
y=0 при x<0 или x>2.

19. Создайте консольное приложение, при выполнении которого происходит
ввод вещественного значения величины "x", вычисление и вывод значения
величины "y", если
y=1 при x<=-10, при 0<=x<=2 и при x>=20;
y=0 при остальных значениях x.

ПРОГРАММА 6-3
-------------

1. Создайте консольное приложение, при выполнении которого происходит ввод
с клавиатуры одного любого символа и вывод его кода.

ПРОГРАММА 6-4
-------------

2. Создайте консольное приложение, выполняющее следующие действия:
а) вывод слова "Месяц" на английском языке и затем ввод в этой же строке
слова на английском языке, которое может совпадать с названием какого-либо
месяца;
б) если введенный текст совпадает с названием какого-либо месяца,
то вывод названия времени года, к которому относится этот месяц,
на английском языке
(если месяц январь, то в строке с названием времени года
дополнительно вывод пожелания счастливого Нового года
на английском языке)
и затем переход на начало следующей строки;
если введенный текст не совпадает с названием какого-либо месяца,
то вывод текста "----" и затем переход на начало следующей строки;
в) переход к пп."а)" на вывод слова "Месяц" на английском языке и ввод текста
и т.д..


Исходный код (Delphi 7):
Вложения
lab06.rar
(16.15 Кб) Скачиваний: 29
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Char0Day » Вс ноя 04, 2007 6:05 pm

Лабораторная работа №07 по дисциплине "Программирование"

ТЕМА: Константы и их использование.
---- Подпрограммы. Процедуры и функции.
Процедуры и функции для работы со строками.
Создание процедур и функций.


ПРОГРАММА 7-1 и ПРОГРАММА 7-2
-----------------------------

1. Создайте консольное приложение, при выполнении которого происходит то же,
что и при выполнении ПРОГРАММЫ 5-1 без поиска минимального и максимального
значений и их индексов, но в объявлении массивов использованы именованные
константы.

2. Создайте консольное приложение, при выполнении которого происходит то же,
что и при выполнении ПРОГРАММЫ 5-2, но в объявлении массивов использованы
именованные константы.

ПРОГРАММА 7-3 и ПРОГРАММА 7-4
-----------------------------

3. Создайте консольное приложение, при выполнении которого происходит ввод
на английском языке в отдельных строках фамилии, имени и отчества,
начинающихся с больших букв:
Familia
Imia
Otchestvo
и затем происходит формирование и вывод строки следующего вида:
Familia I.O.

4. Создайте консольное приложение, при выполнении которого происходит ввод
на английском языке в отдельных строках фамилии, имени и отчества,
содержащих или не содержащих пробелы впереди, внутри и сзади в этих строках,
начинающихся с больших или маленьких букв и содержащих большие или маленькие
буквы:
faM iLia
Im iA
otcheStvo
и затем происходит формирование и вывод строки следующего вида:
Familia I.O.


ПРОГРАММА 7-5 и ПРОГРАММА 7-6
-----------------------------

5. Создайте консольное приложение, при выполнении которого происходит:
а) ввод трех вещественных чисел X, Y и Z;
б) вызов процедуры, описанной в этой же программе и вычисляющей значение
S=X2+Y2+Z2
б) вычисление с использованием вызова этой процедуры и печать в отдельной строке
результата вычислений по формуле

D = (e^(-S)+e^S)/S • (sin2(X/S0,5)+sin2(Y/S0,5)+sin2(Z/S0,5)).


6. Создайте консольное приложение, при выполнении которого происходит:
а) ввод трех вещественных чисел X, Y и Z;
б) вычисление и печать в отдельной строке результата вычислений по формуле

D = (e^(-S(X,Y,Z)+e^S(X,Y,Z))/S*(sin2(X/S0,5(X,Y,Z)) +sin2(Y/S0,5(X,Y,Z))+sin2(Z/S0,5(X,Y,Z))).
S(X,Y,Z)
с использованием вместо S вызова функции, описанной в этой же программе и вычисляющей значение S(X,Y,Z)= X2+Y2+Z2


Исходный код (Delphi 7):
Вложения
lab07.rar
(23.55 Кб) Скачиваний: 34
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Char0Day » Вс ноя 04, 2007 6:09 pm

Лабораторная работа №08 по дисциплине "Программирование"

ТЕМА: Создание простейших проектов типа Application.

ПРОГРАММА 8-1
-------------

1. Создайте проект и разместите в форме надпись (Label) и две кнопки (Button)
с вкладки Standard палитры компонентов
(текст надписи должен быть крупным и хорошо видимым в форме,
на одной и кнопок должна быть надпись ГРУППА, на другой - ФИО).
Создайте такие обработчики событий, чтобы после запуска программы
при нажатии на кнопки на месте надписи появлялись бы, соответственно,
номер Вашей группы или Ваша фамилия с инициалами).
Используйте для изменения надписей свойство Caption.
Создавайте обработчики для событий нажатия на кнопки (OnClick).

ПРОГРАММА 8-2
-------------

2. Создайте проект с пустой формой. Создайте обработчики событий
для изменения цвета формы после запуска программы:
при одиночном щелчке левой кнопкой "мыши" - с первоначального цвета
формы - на красный цвет, с красного на желтый, с желтого на зеленый,
с зеленого на красный, с красного на желтый и т.д.;
при двойном щелчке левой кнопкой "мыши" - с любого цвета
на первоначальный цвет формы.
Используйте для изменения цвета формы свойство Color.
Создавайте обработчики для событий нажатия на кнопки (OnClick и OnDblClick).



Исходный код (Delphi 7):
Вложения
lab08.rar
(16.55 Кб) Скачиваний: 28
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Char0Day » Вс ноя 04, 2007 6:12 pm

Лабораторная работа №09 по дисциплине "Программирование"

ТЕМА: Использование поля ввода и редактирования.
---- Редактирование приложений.

1. Создайте проект типа Application и разместите в форме следующие элементы
(для Текстовых полей используйте компонент Edit с вкладки Standard
Палитры компонентов):


Текстовое поле1 Надпись1

Текстовое поле2 Надпись2

Кнопка1 Кнопка2

Надпись3


тексты надписей: для Надписи1 - "РАСССТОЯНИЕ", для Надписи2 - "ВРЕМЯ",
для Надписи3 - "СКОРОСТЬ: "
должны быть крупными и хорошо видимыми в форме,
на Кнопке1 должна быть надпись ВЫЧИСЛИТЬ, на Кнопке2 – ВЫХОД).

Для кнопки ВЫЧИСЛИТЬ создайте обработчик нажатия на эту кнопку
вычисляющий вещественное значения скорости
(по вещественным значениям расстояния и времени,
получаемым из Текстовых полей 1 и 2, свойство Text)
и добавляющий это значение скорости в виде текста справа к Надписи3
(для преобразований из текстового вида в вещественный и обратно
используйте функции StrToFloat и FloatToStr).

Для кнопки ВЫХОД создайте обработчик нажатия на эту кнопку
выполняющий выход из программы или, иначе говоря, для закрытие формы
(используйте метод Close).
РЕДАКТИРОВАНИЕ ПРИЛОЖЕНИЙ
-------------------------

ПРОГРАММА 9-2
-------------

2. Отредактируйте ПРОГРАММУ 9-1 таким образом, чтобы она реагировала
на ввод нулевого значения в Текстовое поле2 добавлением к тексту Надписи3
текста "ВРЕМЯ НЕ ДОЛЖНО БЫТЬ РАВНО 0!"

ПРОГРАММА 9-3
-------------

3. Отредактируйте ПРОГРАММУ 8-2, таким образом, чтобы при выполнении программы
при одиночном щелчке левой кнопкой "мыши" цвет менялся:
с первоначального цвета формы - на красный цвет
и затем по принципу, похожему на принцип действия светофора:
с красного через желтый на зеленый, затем с зеленого через желтый на красный
и т.д.,
(при двойном щелчке левой кнопкой "мыши" по-прежнему должен происходить
переход с любого цвета на первоначальный цвет формы).
Если ПРОГРАММА 8-2 не была составлена Вами, то составьте ее заново
уже в измененном виде ПРОГРАММЫ 9-3.



Исходный код (Delphi 7):
Вложения
lab09.rar
(24.05 Кб) Скачиваний: 27
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Char0Day » Вс ноя 04, 2007 6:15 pm

Лабораторная работа №10 по дисциплине "Программирование"

ТЕМА: Реализация решения простой алгебраической задачи.

ПРОГРАММА 10-1
--------------

1. Создайте проект типа Application, предназначенный для получения решения
квадратного уравнения вида ax2+bx+c=0:
а) в форме приложения должен выполняться ввод значений вещественных
коэффициентов a, b и c в текстовых полях (компоненты Edit)и должны выводиться
результаты в виде надписей (компоненты Label) после нажатия на кнопку
(компонент Button);
б) если значение дискриминанта D=b2-4ac≥0, то должны выводиться значения корней
уравнения x1 и x2 (например, x1=0.5 x2=2.5);
в) если значение дискриминанта D=b2-4ac<0, то должен выводиться текст
Уравнение не имеет действительных корней;
г) в форме приложения должна также находиться кнопка для завершения работы
приложения (компонент Button);
д) в строках текста программы с операторами должны также находиться комментарии
на русском языке с кратким описанием действий, выполняемых соответствующими
операторами.



Исходный код (Delphi 7):
Вложения
lab10.rar
(11.48 Кб) Скачиваний: 25
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Char0Day » Вс ноя 04, 2007 6:19 pm

Лабораторная работа №11 по дисциплине "Программирование"

ТЕМА: Модификация приложения для решения простой алгебраической задачи.

ПРОГРАММА 11-1
--------------

4. Внесите следующие изменения и дополнения в ПРОГРАММУ 10-1, предназначенную
для получения решения квадратного уравнения вида ax2+bx+c=0:
а) в форме приложения должен выполняться ввод значений вещественных
коэффициентов a, b и c в текстовых полях (компоненты Memo) с выравниванием
по правому краю (свойство Alignment) и должны выводиться
результаты в виде надписей (компоненты Label) после нажатия на кнопку
(компонент BitBtn с вкладки Additional Палитры компонентов)
с использованием имеющихся обработчиков событий таким образом,
чтобы приложение выполняло бы те же функции, что и его прототип
с полями Edit и с кнопками Button, а заголовки на кнопках BitBtn имели бы
вид с полужирным начертанием шрифта и цветом, отличающимся от черного;
б) для ввода данных в поле Memo во время конструирования в окне формы
используется свойство Lines с последующим использованием специального окна
редактирования,
для изменения данных в поле Memo программным путем используется свойство
времени выполнения Text, отображающее содержимое всех строк свойства Lines
в виде одной длинной строки, включающей в себя символы границ отдельных
строк свойства Lines (в данном приложении при использовании свойства Text
рекомендуется во время конструирования в окне формы очистить все строки
свойства Lines в специальном окне редактирования);
в) если значение дискриминанта D=b2-4ac≥0, то должны выводиться значения корней
уравнения x1 и x2 (например, x1=0.5 x2=2.5);
г) если значение дискриминанта D=b2-4ac<0, то должен выводиться текст
Уравнение не имеет действительных корней;
д) если значение коэффициента a=0 (уравнение становится линейным), то должно
выводиться значение корня x, вычисляемого по формуле x=-c/b
(например, x=0.5);
е) если значения коэффициентов a=0, b=0, c≠0, то должен выводиться текст
Уравнение не имеет решений;
ж) если значения коэффициентов a=0, b=0, c=0, то должен выводиться текст
x – любое число;
з) в форме приложения должна также находиться кнопка для завершения работы
приложения (компонент BitBtn);
и) в строках текста программы с операторами должны также находиться комментарии
на русском языке с кратким описанием действий, выполняемых соответствующими
операторами.

5. Используя свойства Hint и ShowHint, введите для кнопок короткие тексты,
поясняющие назначение этих кнопок, и установите режим отображения этих
текстов при наведении указателя "мыши" на кнопку.



Исходный код (Delphi 7):
Вложения
lab11.rar
(13.39 Кб) Скачиваний: 23
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Char0Day » Вс ноя 04, 2007 6:23 pm

Лабораторная работа №12 по дисциплине "Программирование"

ТЕМА: Использование флажков и переключателей.


4. Создайте проект типа Application
В форме должны присутствовать
индикатор с флажком "Изменение цвета" (компонент CheckBox)
и кнопки переключателя или радиокнопки (компонент RadioButton).

При убранном флажке индикатора "Изменение цвета"
(свойство State компонента CheckBox равно cbUnchecked)
кнопки переключателя или радиокнопки (компонент RadioButton)
должны иметь вид нерабочих элементов,
при установленном флажке индикатора "Изменение цвета"
(свойство State компонента CheckBox равно cbChecked) –должны иметь рабочий вид,
то есть кнопки переключателя или радиокнопки (компонент RadioButton)
должны иметь значение свойства Enabled, равное, соответственно, False или True.
При конструировании выбранной кнопки переключателя (в данном случае кнопки
"По умолчанию") значение свойства Checked должно быть выбрано равным True.


7. При переключении кнопок переключателя форма должна приобретать заданный цвет
(по умолчанию форма должна приобретать стандартный цвет).

8. Имена всех используемых компонентов приложения должны быть доступны
при использовании соответствующих сочетаний клавиш с подчеркнутым
символом в названии компонента (в свойстве Caption должен использоваться
символ & перед тем символом, который будет подчеркнутым).



Исходный код (Delphi 7):
Вложения
lab12.rar
(26.64 Кб) Скачиваний: 31
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Char0Day » Вс ноя 04, 2007 6:38 pm

Лабораторная работа №13 по дисциплине "Программирование"

ТЕМА: Использование меню.

ПРОГРАММА 13-1
--------------

1. Создайте проект типа Application на основе ПРОГРАММЫ 12-1 (в том числе
с использованием формы, компонентов и обработчиков событий этой ПРОГРАММЫ 12-1)
и разместите в форме следующие элементы:


2. Команды главного меню окна приложения "Цвет формы" и "Вид" должны раскрываться
как на Рисунках 3 и 4.

3. После установки в форме компонента MainMenu компоненты меню создаются в окне конструктора меню Form1.MainMenu1 (Рисунок 2), которое появится на экране, если:
или выполнить двойной щелчок по компоненту MainMenu;
или в контекстном меню для компонента MainMenu выбрать команду Menu Desinger...;
или использовать свойство Items компонента MainMenu.


4. Создание пунктов меню и подменю производится путем ввода названия пункта меню или
подменю в качестве значения свойства Caption.
Для вставки в подменю строки с разделительной чертой значение свойства Caption
этой строки должно иметь значение, состоящее из одного символа дефиса (-).
Для создания многоуровневого меню, раскрывающегося из пункта подменю, можно:
или использовать сочетание клавиш Ctrl+;
или в контекстном меню для этого пункта подменю выбрать команду Create Submenu.

5. Структура создаваемого меню появляется в окне Object TreeView (Рисунок 2).


6. При выполнении команд меню "Цвет формы => ..." форма должна приобретать
заданный цвет (по умолчанию форма должна приобретать стандартный цвет).

7. При выполнении команд меню "Вид => С флажком" на форме должен присутствовать
индикатор с флажком "Изменение цвета" (компонент CheckBox).
При убранном флажке индикатора "Изменение цвета"
кнопки переключателя или радиокнопки (компонент RadioButton)
должны иметь вид как на Рисунках 3 или 4,
при установленном флажке индикатора "Изменение цвета" – как на Рисунке 5.

8. При переключении кнопок переключателя форма должна приобретать заданный цвет
(по умолчанию форма должна приобретать стандартный цвет).

9. При выполнении команд меню "Вид => Без флажка" форма должна иметь вид, как
на Рисунке 6, то есть индикатор с флажком и кнопки переключателя должны иметь
значение свойства Visible, равное False.


10. При запуске приложения окно формы должно иметь вид как на Рисунке 5.
При выполнении команд меню "Выход" приложение должно завершать работу.

11. Контекстное меню в области формы должно содержать те же команды и выполнять
те же действия, что и главное меню приложения (смотрите Рисунки 7 и 8).
Компоненты контекстного меню создаются аналогично компонентам главного меню.
Для того чтобы контекстное меню действовало, необходимо для события формы
PopupMenu выбрать значение, совпадающее с именем контекстного меню.

12. Имена всех команд и всех других используемых компонентов приложения должны быть
доступны при использовании соответствующих сочетаний клавиш с подчеркнутым
символом в названии команды или компонента (в свойстве Caption должен
использоваться символ & перед тем символом, который будет подчеркнутым).



Исходный код (Delphi 7):
Вложения
lab13.rar
(158.94 Кб) Скачиваний: 49
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

Сообщение Char0Day » Вс ноя 04, 2007 6:40 pm

Лабораторная работа №14 по дисциплине "Программирование"

ТЕМА: Использование раскрывающегося списка.
ПРОГРАММА 14-1
--------------

1. Создайте проект типа Application и разместите в форме раскрывающийся список
ComboBox с вкладки Standard Палитры компонентов (Рисунок 1):

2. При выполнении приложения из раскрывающегося списка может быть выбран цвет,
приобретаемый формой (Рисунок 2).
Доступ к строкам компонента ComboBox для их заполнения может быть получен в окне
String List Editor (см. Рисунок 3), которое появляется на экране при использовании
свойства Items (щелчок по кнопке "..." в строке этого свойства).
Значение выбранной строки компонента ComboBox можно получить из значения свойства
Text при обработке события OnChange, связанного с выбором строки списка.


Исходный код (Delphi 7):
Вложения
lab14.rar
(41.71 Кб) Скачиваний: 23
Char0Day
Горожанин
 
Сообщения: 500
Зарегистрирован: Пн июл 24, 2006 1:34 pm
Откуда: г. Находка

След.

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1

cron