Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Delphi (новый) без баз данных.doc
Скачиваний:
1
Добавлен:
01.07.2025
Размер:
7.61 Mб
Скачать

5.2. Memo-многострочный редактор

Компонент страницы Standard. предназначен для ввода и/или отображения длинного текста. Текст хранится в свойстве Lines и представляет собой пронумерованный набор строк (нумерация начинается с 0)

Повторяет свойства и методы Edit, а также имеет специфические

Свойство

Значение

CaretPos

Содержит координаты мигающего текстового курсора относительно границ клиентской области компонента

Lines

Содержит строки введенного текста

Lines[i:integer]

Доступ к строке текста с номером i

Lines.Count

Количество строк в поле

ScrollBars

Определяет наличие полос прокрутки

Методы

Назначение

LoadFromFile(filename:string)

Загрузка в компонент текста из файла

SaveToFile(filename:string)

Сохранение текста в файле

5.3. Практическая работа

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

Двойным щелчком назначьте на кнопку «Ввод» событие OnClick

procedure TForm1.BitBtn1Click(Sender: TObject);

begin

Label1.caption:=edit1.Text; //повторяем строку в метке

memo1.Lines.Add(edit1.text); //переносим в строку в редактор

edit1.Clear; //Очищаем строку ввода

edit1.SetFocus; //Передаем фокус ввода

end;

Назначьте событие OnActivate для формы, в котором опишите передачу фокуса ввода для компонента Edit, а также обработайте кнопку «Выход» и «Очистка»

5.4. Самостоятельная работа

Компьютер должен запросить имя пользователя. Если пользователь вводит знакомое имя, например, Вася, то компьютер приветствует его. В случае ввода любого другого слова, компьютер должен реагировать иначе, например, выводить запрос: "А где Вася?"

При запуске программы в окне присутствует надпись «Стучите!» и кнопка «Тук-тук», после щелчка по которой появляется надпись «Кто там?», поле для ввода имени и кнопка «Ok».

5.5. MaskEdit - специальный редактор

Компонент страницы Additional. Предназначен для ввода текста, соответствующего некоторому шаблону, задаваемому свойством EditMask. Если это свойство не задано, то действует как обычный редактор. Свойство EditText содержит текст до наложения на него маски шаблона (т.е. то, что ввел пользователь), а свойство Text – может содержать либо исходный текст, либо результат наложения на него шаблона.

Шаблон состоит из трех частей, отделенных друг от друга символом «;». Первая часть задает маску ввода, вторая – это символ «0» или «1», определяющий, записывается ли в Text результат наложения маски (1) или исходный текст (0), третья содержит символ, который в окне редактора будет стоять в полях, предназначенных для ввода символов. Маска состоит из описателей полей ввода (указывают, какой именно символ может ввести пользователь в данное поле), литералов (вставляются в текст, показываемый в окне редактора, но при вводе курсор перепрыгивает через них и не дает пользователю изменить их) и специальных символов (формируют дополнительные указания пользователю).

Описатели полей

Символ

Поле…

Символ

Поле…

L

должно содержать букву

c

может содержать любой символ

l

может содержать букву

0

должно содержать цифру

A

должно содержать букву или цифру

9

может содержать цифру

a

может содержать букву или цифру

#

может содержать цифру , «+», «-»

C

Должно содержать любой символ

Специальные символы

Символ

Значение

\

Следующий символ литерал

:

На это место вставляется символ- разделитель для часов, минут, секунд

/

На это место вставляется символ-разделитель для даты

;

Разделитель частей шаблона

!

Подавляет все ведущие пробелы

>

Все следующие за ним поля преобразуют буквы к заглавным

<

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

<>

Отменяет преобразование букв