Многострочное окно редактирования TMemo.



Многострочное окно редактирования TMemo используется для ввода, отображения и редактирования многострочных текстов.

Класс TMemo является потомком класса TControl, следовательно, многие свойства (цвет, шрифт и т.д.) и методы класса TControl присутствуют и в классе TMemo. Ниже приведен список основных свойств и методов, добавленных в классе TMemo.

Свойство Тип Описание
Lines TStrings Список строк, содержащихся в TMemo
ScrollBars TScrollStyle = (ssNone, ssHorizontal, ssVertical, ssBoth) Определяет, содержит ли TMemo полосы прокрутки. ssNone – полосы прокрутки отсутствуют ssHorizontal – горизонтальная полоса прокрутки ssVertical – вертикальная полоса прокрутки ssBoth – горизонтальная и вертикальная полосы прокрутки
MaxLength Integer Указывает максимальное количество символов, которое пользователь может вводить в компонент.
ReadOnly Boolean Указывает, может ли пользователь изменять текст в компоненте.
BorderStyle TborderStyle=(bsSingle, bsNone) Указывает, ограничена ли клиентская область компонента одинарной бордюрной линией

Пример 1: Вывести на экран значение функции  в точках x=10, x=0, x=5.

Решение: Для вывода на экран воспользуемся компонентом TMemo. Сам вывод оформим в обработчике события onClick объекта Button1.

 
procedure TForm1.Button1Click(Sender: TObject); Var x,y:Real; begin  memo1.Clear;  x:=10;  y:=sqr(x)/(x+2);  memo1.Lines.add('x='+FloatToStr(x)+' f(x)='+floatToStr(y));  x:=0;  y:=sqr(x)/(x+2);  memo1.Lines.add('x='+FloatToStr(x)+' f(x)='+floatToStr(y));  x:=5;  y:=sqr(x)/(x+2);  memo1.Lines.add('x='+FloatToStr(x)+' f(x)='+floatToStr(y)); end;

 

 


В этом примере использовалась операция склеивания строк «+» для вывода в одну строку объекта Memo1 несколько значений.

 

Пример 2: Вывести на экран числа от 1 до 100.

Решение: Для вывода на экран воспользуемся компонентом TMemo. Сам вывод оформим в обработчике события onClick объекта Button1.


Задание к лабораторной работе по Теме 1:

1. На городской субботник деканат закрепил за группами электроснабжения следующие объекты:

99Э1 – территория у входа в 14 корпус;

99Э2 – аудитория 15201;

99Э3 – коридор 2 этажа 15 корпуса;

99ЭС – преподавательская кафедры информатики.

Создать программу, которая по выбранной группе сообщает задание на субботник. Список группы оформить в виде радиокнопок RadioGroup.

2. Задание 1 выполнить с использованием объектов GroupBox и RadioButton.

3. Вычислить значение в точке Х=10, X=6, X=8 для следующих функций:

а)

б)

в)

 

Функция выбирается с использованием радиокнопок.

Задание к лабораторной работе по Теме 2:

1.Вывести на экран 40 раз известное стихотворение: «У попа была собака …» (не забыть поставить линейки прокрутки).

2.В поле ввода TEdit содержится номер строки TMemo. Необходимо удалить из TMemo строку с указанным номером. Если строки с таким номером нет, вывести на экран соответствующее сообщение.

3.В TEdit вводится строка. Необходимо выполнить поиск введенной строки в TMemo, вывести ее номер на экран. После этого поменять местами с первой строкой TMemo. Если строка не найдена, вывести сообщение.

 

 


Дата добавления: 2018-11-24; просмотров: 342; Мы поможем в написании вашей работы!

Поделиться с друзьями:






Мы поможем в написании ваших работ!