Элемент управления Label (надпись или метка)

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

Чтобы установить текст, отображаемый элементом Label необходимо использовать его свойство Сaption. Значение этого свойства устанавливается в окне свойств. Изменение установленного свойства Caption (изменение текста надписи) возможно в процессе работы программы с помощью кода:

Label 1 -> Caption = “ Другая надпись”;

Свойство Aligment- определяет способ выравнивания текста внутри надписи. Например, выравнивание текста по правой границе поля метки можно осуществить с помощью кода:

Label 1 -> Aligment = taRightGustify;

Свойство Font этого компонента управляет цветом, размером и начертанием шрифта.

Чтобы размеры поля метки автоматически приспосабливались к изменению длины текста, необходимо свойству метки AutoSize присвоить значение true. Это свойство позволяет автоматически менять ширину рамки надписи в зависимости от объема текста.

Свойство WordWrap (перенос слов) - позволяет переносить текст надписи на следующую строку, при этом рамка надписи расширяется в вертикальном направлении.

Свойство Colorопределяет цвет фона надписи.

Label 1 -> Color = clRed;

Основные методы исвойстваметки Label демонстрирует приложение , приведенное на рисунках 5.15 и 5.16. На первом рисунке показан интерфейс приложения , а на втором –программный код.

Рис.5.15 Интерфейс приложения, характеризующего основные свойства метки Label

В интерфейс приложения(Рис.5.15) кроме формы включены : многострочное окно редактированияMemo1 , графическая кнопка типа BitBtnи пять радио кнопоктипаRadioButton.. Окно редактирования используется для демонстрации операторов кода при выполнении программы . Назначение других компонентов и их свойства, установленные во время проектирования, поясняются в таблице 5.8.

Таблица 5.8

Другие свойства компонентов принимаются по умолчанию.

// Программный код приложения, характеризующего основные свойства метки

#include <vcl.h>

#pragma hdrstop

#include "Unit1.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton1Click(TObject *Sender)

{

Lb1->Color=clAqua;//Изменение цвета фона

//Занесение в поле Memo1операторов программного кода

Memo1->Text="Lb1->Color=clAqua; ";

}

//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton2Click(TObject *Sender)

{

Lb1->AutoSize=true;//Включение авторазмера

Lb1->Caption="Количество знаков в надписи возросло ";//Изменение надписи

//Занесение в поле Memo1операторов программного кода

Memo1->Text="Lb1->AutoSize=true; ";

Memo1->Text=" Lb1->Caption=Количество знаков в надписи возросло ;";

}

//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton3Click(TObject *Sender)

{

Lb1->WordWrap=true;//Включение переноса строк

// Изменение надписи

Lb1->Caption="Количество знаков в надписи существенно возросло ";

//Занесение в поле Memo1операторов программного кода

Memo1->Text=" Lb1->Caption=Количество знаков в надписи существенно возросло ;";

}

//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton4Click(TObject *Sender)

{

Lb1->Font->Name="Times New Roman";//Изменение параметров шрифта

Lb1->Font->Size=14;

}

void __fastcall TForm1::RadioButton5Click(TObject *Sender)

{

Lb1->Visible=false;//Метка становится невидимой

}

//---------------------------------------------------------------------------

Рис.5.16 Программный код приложения, характеризующего основные свойства метки Label

В программном коде( Рис.5.16) показано, что свойства и методы компонента Label реализуются при включении радио кнопок RadioButton1 – RadioButton5 .Изменяемые свойства непосредственно отображаются на самом компоненте ,а соответствующий программный код заносится в окно редактора Memo1.

5.6 Элемент управления RadioButton (Радиокнопка)

Радиокнопки образуют группу взаимосвязанных индикаторов из которых может быть выбран только один, т.е.из кнопок, объединенных в группу, включена может быть только одна. При включении одной кнопки группы остальные кнопки автоматически выключаются. Таким образом, этот элемент управления предоставляет пользователю выбор одного варианта из многих.

Основные свойства элемента:

Caption -содержит надпись, появляющуюся около кнопки;

Alignment -определяет, с какой стороны от кнопки появляется надпись: taLeftJustify- слева, taRightJustify - справа (это значение принято по умолчанию);

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

Радиокнопки могут размещаться непосредственно на форме или на панелях GroupBox и RadioGroup. На панель RadioGroupкнопки не надо переноситьспалитры компонентов, так как они присутствуют там изначально и располагаются регулярными рядами. Надпись в левом верхнем углу панели определяется свойством Caption. Надписи кнопок и их количество определяются свойством Items, имеющим тип TStrings. Во время проектирования задание свойства Items осуществляется вызываемым из Инспектора Объектов редактором списков строк. Сколько строчек вы запишете в нем, столько и будет кнопок. Во время выполнения формировать список Items можно, используя методы и свойства класса TStrings.Кнопки можно разместить в несколько столбцов (не более 17), задав свойство Columns. По умолчанию Columns= 1, т.е. кнопки размещаются друг под другом.Определить, какую из кнопок выбрал пользователь, можно по свойству ItemIndex, которое показывает индекс выбранной кнопки (начинаются с 0). По умолчанию ItemIndex = -1, что означает отсутствие выбранной кнопки. Если вы хотите, чтобы в момент начала выполнения приложения какая-то из кнопок была выбрана (это практически всегда необходимо), то надо установить соответствующее значение ItemIndex во время проектирования. Если вы используете радиокнопки не для ввода, а для отображения данных, устанавливать значение ItemIndexможно программно во время выполнения приложения. Компонент RadioGroupцелесообразно использовать втехслучаях , когда надписи кнопок имеют примерно одинаковую длину, а число кнопок в каждом столбце одинаково. Если надписи на кнопках существенно разняться по длине , то целесообразно использовать компонент GroupBox,который допускает нерегулярное расположение кнопок.

Наиболее часто используемым событием радиокнопок является событие OnClick, которое наступает при щелчке на компоненте. В обработчике этого события можно анализировать свойств Checked, которое уже приняло новое значение.

Программный код приложения, характеризующего основные свойства компонента RadioButtonпоказан на рисунке 5.17 Для реализации интерфейса этого приложения на форме необходимо расположить однострочный реактор(Edit), две кнопки типа (Button), три радио кнопки(RadioButton ) и одну радио группу(RadioGroup) с тремя кнопками. Свойства элементов, установленные во время проектирования , показаны в таблице 5.9.

Таблице 5.9

Другие свойства компонентов принимаются по умолчанию.

//Программный код приложения, характеризующего основные свойства компонента RadioButton

#include <vcl.h>

#pragma hdrstop

#include "Unit1.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{

if(RadioButton1->Checked>0)

Edit1->Text="Включена 1-ая радиокнопка";

else if(RadioButton2->Checked>0)

Edit1->Text="Включена 2-ая радиокнопка";

else if(RadioButton3->Checked>0)

Edit1->Text="Включена 3-ая радиокнопка";

else

Edit1->Text="Не включена ни одна радиокнопка";

}

//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton1Click(TObject *Sender)

{

Form1->Color=clAqua;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton2Click(TObject *Sender)

{

Form1->Color=clRed;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton3Click(TObject *Sender)

{

Form1->Color=clBlue;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)

{

if(RadioGroup1->ItemIndex>-1)

Edit1->Text="Включена"+IntToStr(RadioGroup1->ItemIndex+1)+"-ая радиокнопка";

else

Edit1->Text="Не включена ни одна радиокнопка";

}

//---------------------------------------------------------------------

Рис.5.17Программный код приложения, характеризующего основные свойства компонента RadioButton

В этом приложении при включении радио кнопок RadioButton1, RadioButton2и RadioButton3меняются цвета фона формы, а события кнопок Button1и Button2(On Click)используются для определения включенных радио кнопок.