Пример1. Предназначен для формирования конкретного воздействия на программу

Компонент TEdit

Компонент TButton

Предназначен для формирования конкретного воздействия на программу. Назначение кнопки обычно определяют свойством Caption. Кнопку можно нажать различными способами:

- с помощью мыши;

- выделить с помощью клавиши Tab;

- нажать клавишу пробел.

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

Одну из кнопок можно назначить кнопкой по умолчанию с помощью свойства

Default:= true;

В этом случае, если ни одна из кнопок не выделена, при нажатии клавиши Enter активизируется кнопка, у которой свойство

Default:= true;

Одну из кнопок можно назначить кнопкой завершения с помощью свойства Cancel:????

Button1.Cancel:= true;

В этом случае при нажатии клавиши Esc будет обрабатываться событие OnClick.

При любом способе нажатия кнопки вызывается ее метод Click, который в свою очередь вызывает обработчик события OnClick. Кнопка обрабатывает также событие OnDbClick.

Кнопка не обладает свойством Color.

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

Центральным свойством компонента является Text. Чтобы поместить текст в окно достаточно записать:

Edit1.Text:= ’Пример возможного текста’;

Если нужно при вводе использовать прописные или строчные символы используется свойство CharCase, которое может принимать три значения:

CharCase = (ecLowerCase,ecNormal,ecUpperCase);

Здесь:

ecLowerCase – соответствует строчным символам,

ecNormal - нормальным,

ecUpperCase – прописным символам.

Компонент TEdit может использоваться как компонент Tlabel, т.е. для вывода строковых данных. В этом случае необходимо присвоить свойству

ReadOnly:= true;

Весь текст в строке компонента TEdit можно удалить с помощью метода

Edit1.Clear;

Выделенный текст можно удалить с помощью метода

Edit1.ClearSelection;

Выделение текста возможно, когда

Edit1.AutoSelect:= true;

Используя компонент TEdit можно обмениваться информацией с ClipBoard. Для этого используются методы:

CopyToClipBoard – копировать в буфер,

CutToClipBoard – вырезать,

PasteToClipBoard – вставить.

Пусть на форме имеются два компонента TEdit (TEdit1, TEdit2) и три компонента TButton (TButton1, TButton2 и TButton3). Рассмотрим фрагмент программы:

Procedure Tform1.Button1Click;

begin

Edit2.Clear;

end;

Procedure Tform1.Button2Click;

begin

Edit1.CopyToClipBoard;

end;

Procedure Tform1.Button3Click;

begin

Edit2.PasteFromClipBoard;

end;

Строка ввода класса TEdit обрабатывает все события от мыши и клавиатуры посредством активизации событий OnChange. При изменении текста в компоненте TEdit возникает событие OnChange.

Дата добавления: 2014-01-07