Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

ЛАБА_Метки. Кнопки. Редактирование текста

.doc
Скачиваний:
4
Добавлен:
01.04.2016
Размер:
37.38 Кб
Скачать

Лабораторная работа №24.

Метки. Кнопки. Редактирование текста.

Рассмотрим элементы управления наиболее часто встречающиеся в программах Windows. Они расположены на вкладке Standard палитры компонентов.

  1. Метка TLabel.

Метки предназначены для размещения в окне программы текстовой информации – различных пояснений, заголовков и т.д.

Основное свойство, содержащее текст метки – Caption. Его можно менять в ходе выполнения программы. Метка обрабатывает события от мыши, например OnClickщелчок мышью.

Свойства Alignment и Layout определяют выравнивание метки по горизонтали и вертикали.

Логическое свойство WordWrap позволяет разрешать или запрещать перенос текста на новую строку.

  1. Кнопка TButton.

Кнопки используются для выполнения определенных действий. При нажатии мышью на кнопку вызывается обработчик события OnClick. Текст кнопки задается свойством Caption. Если в тексте кнопки перед какой-то буквой стоит знак & то эта буква будет служить «горячей клавишей» для выполнения действия.

Логические свойства Cancel и Default устанавливаются в true, если хотите, чтобы нажатие Esc или Enter было эквивалентно нажатию на кнопку.

Вызов метода Click эквивалентен щелчку по кнопке.

В Delphi есть кнопки с картинками – компонент TBitBtn. Он имеет дополнительные свойства и находится во вкладке Additional.

Glyph – определяет имя BMP-файла, отображаемого на кнопке.

Kind – указывает один из стандартных типов кнопок - bkOk, bkCancel, bkHelp, bkYes, bkNo и т.д.

  1. Компоненты для редактирования строк.

Для ввода и редактирования одной строки используется элемент управления TEdit, многострочный редактор ­– компонент TMemo.

Оба редактора имеют общие свойства:

AutoSelect:boolean – если свойство имеет значение True, то текст выделяется при активизации редактора.

CharCase – определяет вид букв текста ecUpperCase, ecLowerCase, ecNormal.

MaxLength:integer ­- максимальное число символов для редактирования.

PasswordChar:Char – символ, который будет отображаться вместо букв при вводе паролей (по умолчанию #0)

ReadOnly:boolean -можно ли изменять текст.

Редакторы имеют также методы-процедуры

Clear – удаление текста;

SelectAll – выделение всего текста;

ClearSelection – удаление выделенного фрагмента;

CopyToClipboard; CutToClipboard;PasteFromClipboard – работа с буфером обмена.

Нажатие правой кнопки мыши на поле редактирования вызовет контекстное меню.

Рассмотрим разницу между TEdit и TMemo.

Строка ввода TEdit для установки и чтения строки ввода использует свойство Text:string. Если нужно вводить числа, то надо использовать функции преобразования.

Редактор TMemo содержит список строк Lines:TString. Можно использовать методы списка строк, такие как LoadFromFile, SaveToFile, Append и т.д.

В свойстве ScrollBalls можно задать наличие полосок прокрутки.

Оба редактора обрабатывают событие OnChange при изменении введенного текста.

Пример программы.

Рассмотрим программу, складывающую два введенных числа.

  1. Добавьте на форму компоненты Label1, Label2, Edit1,Edit2, Button1, Label3.

  2. Настойте свойства Label1.Caption:= ‘1 число’ , Label2.Caption:= ‘2 число’;

Label3.Caption:= ‘’ ; Edit1.text:=’0’; Edit2.text:=’0’; Button1.Caption='Сложить’

  1. Настройте обработчик события Button1Click:

procedure TForm1.Button1Click(Sender: TObject);

begin

Label3.Caption:=IntToStr(StrToInt(Edit1.text)+StrToInt(Edit2.text));

end;

4.. Запустите программу.

Задание к лабораторной работе № 24.

  1. Напишите программу, решающую квадратное уравнение. Программа должна содержать метку с описанием задачи, поля ввода для коэффициентов, кнопку «Решить» и поле Memo для вывода информации о решении, недоступное для редактирования. Для добавления строк в поле Memo используйте метод Append свойства Lines

  2. Напишите простой текстовый редактор. Окно программы должно содержать поле текста и кнопки «Загрузить», «Сохранить», «Выход». Для задания имени файла используйте функцию InputBox. Для проверки, существует ли файл, можно использовать логическую функцию FileExists(FileName). Выход из программы осуществляется методом формы Сlose.

Проверьте, что ваш текстовый редактор может передавать и принимать информацию из других программ Windows через буфер обмена.

2