Лабораторная работа № 13
Использование компонентов отображения и редактирования.
Цель работы: Создавать программы с использованием компонентов
Label, Edit, Memo, MaskEdit, LAbelEdit.
Теория.
Для ввода и вывода информации используются следующие компоненты: Label, Edit, Memo (на странице Standard, рис 11), MaskEdit, LabelEdit (на странице Additional
Пример1: Найти сумму 2 чисел – целого и вещественного.
Перенесите на пустую форму, кнопку TButton со страницы Standard палитры компонент. Затем щелкните курсором мыши в нужном месте формы. На форме появится кнопка, Delphi присвоит имя по умолчанию – Button1.
Так же перенесите 2 компоненты TEdit, и 4 компоненты- TLabel.
Выделите на форме компонент Button1 – кнопку. Перейдите в Инспектор Объектов и измените свойство Caption (надпись), которое по умолчанию равно Button1 на «Выполнить».
Аналогично измените свойство Caption у компонетLabel на : Label1 >> «Число1» , Label2 >> «Число 2», Label3 >> «Результат», а у компоненты Labe4 свойство Caption удалить.
Удалите в Edit1 и в Edit2 значение в свойстве Text.
Расположите компоненты как на рисунке 13.1
Рисунок 13.1
Задание 1.
По указанию преподавателя выберите индивидуальное задание из нижеприведенного списка. В качестве f(x) использовать по выбору: sh(x), x2, ex. Отредактируйте вид формы и текст программы, в соответствии с полученным заданием.
16. Известно, что из четырех чисел ,, и одно отлично от трех других, равных между собой. Присвоить номер этого числа переменной n.
17. По номеру n (n>0) некоторого года определить c – номер его столетия (учесть, что, к примеру, началом XX столетия был 1901, а не 1900 год!).
18. Значения переменных a, b и с поменять местами так, чтобы оказалось a<=b<=c.
19. Дано целое k от 1 до 180. Определить, какая цифра находится в k-й позиции последовательности 10111213…9899 , в которой выписаны подряд все двузначные числа.
Контрольные вопросы :
-
Какие компоненты необходимы для работы со строками ?
-
Какие функции преобразования вы знаете ?
-
Как изменить значение свойства компонента программно ?
-
Перечислите свойства компоненты Label ?
-
Какое свойство определяет текст внутри компоненты ?
-
Перечислите события компоненты Edit ?