Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Введение в ООП.doc
Скачиваний:
35
Добавлен:
17.09.2019
Размер:
488.96 Кб
Скачать

Компонент Tlabel

 

Стандартный компонент Tlabel предназначен для размещения на форме различного рода статических текстовых надписей, например, когда необходимо дать заголовки другим компонентам, не имеющим своего собственного свойства Caption.

Необходимо отметить следующие свойства компонента Tlabel:

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

AutoSize := true;

2. Чтобы текст мог располагаться в нескольких строках необходимо использовать свойство:

WordWrap := true;

При этом необходимо установить свойство

AutoSize := false;

С помощью свойства  Allignment задается выравнивание текста:

Allignment := (taLeftJustify, taCenter, taRightJustify)

Left – прижать текст к левой стороне,

Center – выводить текст по центру,

Right – прижать текст к правой стороне.

         Пример. Пусть на форму помещены кнопка Button1 и метка. При нажатии кнопки требуется в метке выводить текст.

 

Procedure Button1.Click;

begin

   Label1.WordWrap := true;

   Label1.AutoSise := false;

   Label1.Allignment := taCenter;

   Label1.Caption := ’Проба должна   ’;

end;

 

Свойство TransParent позволяет указывать на прозрачность или непрозрачность фона компонента Tlabel. Это свойство может принимать только булевские значения. Так, если требуется, чтобы фон был прозразный, следует записать:

TransParent := true;

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

Компонент tEdit

 

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

Центральным свойством компонента является 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 – вставить

Компонент tButton

 

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

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

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

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

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

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

Default := true;

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

Default := true;

 

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

Button1.Cancel := true;

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

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

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