CheckBox

   CheckBox - независимый переключатель используется для установки параметров, характеризуемых двумя значениями - "Да" или "Нет" (true и false).
   Когда пользователь щелкает по переключателю, в нем изменяются значения свойств   Checked и State, а также генерируется событие OnClick. Обрабатывая это событие, можно установить зависимость между состоянием переключателя и состоянием других элементов.
Свойство Описание
TLeftRight Alignment Определяет, с какой стороны от переключателя находится текст.
bool AllowGrayent Если равно true, то переключатель имеет три состояния.
AnsiString Caption Текст рядом с переключателем.
bool Checked Определяет, включён ли переключатель ( при  AllowGrayent=false).
TCheckBoxState State Содержит текущее состояние (cbUnchecked, cbChecked, cbGrayed) переключателя (при  AllowGrayent = true).
 
Событие Описание
OnClick Возникает, когда пользователь щелкает по переключателю.

CheckBox  (пример - задание)

Создать форму, у которой четыре компонента CheckBox изменяют стиль шрифта Label1.
Смотри пример задания.
  1. Создайте приложение и на Form1 поместите компоненты Label и GroupBox.
  2. На GroupBox поместите четыре компонента CheckBox (см. пример ), установить их свойство Name соответственно CheckBoxBold, CheckBoxItalic, CheckBoxUnderline и CheckBoxStrike.
  3. У GroupBox, CheckBoxBold, CheckBoxItalic, CheckBoxUnderline и CheckBoxStrike становите свойства Caption согласно примеру.
Для компонента CheckBoxBold вести код тела функции обработчика событий OnClick:
void __fastcall TForm1::CheckBoxBoldClick(TObject *Sender)
{
  TFontStyles FntSt; Объявление переменной типа TFontStyle
  if(CheckBoxBold->Checked)
     FntSt<<fsBold;
Установить ”полужирный”
  if(CheckBoxItalic->Checked)
     FntSt<<fsItalic;
Установить ”наклонный”
  if(CheckBoxUnderline->Checked)
     FntSt<<fsUnderline;
Установить ”подчеркивание”
  if(CheckBoxStrike->Checked)
     FntSt<<fsStrikeOut;
Установить ”зачеркивание”
  Label1->Font->Style = FntSt; Установить стиль Label1
}
Для компонент CheckBoxItalic, CheckBoxUnderline и CheckBoxStrike назначить функцию обработчика событий OnClick :    CheckBoxBoldClick.

Запустите приложение на компиляцию !

RadioGroup

   RadioGroup - группа зависимых переключателей служит для установки взаимоисключающих параметров. При включении одного зависимого переключателя остальные переключатели этой группы выключаются.
   Когда пользователь щелкает по переключателю, в нем изменяются значения свойств   Checked и State, а также генерируется событие . Обрабатывая это событие, можно установить зависимость между состоянием переключателя и состоянием других элементов.
Свойство Описание
AnsiString Caption Надпись у группы зависимых переключателей.
int Columns Число колонок в группе зависимых переключателей.
int ItemIndex Номер выбранного элемента, начиная с нуля. Если все переключатели находятся в выключенном состоянии, то значение свойства равно -1.
TStrings* Items Массив подписей к зависимым переключателям.
 
Свойство Описание
OnClick Возникает, когда пользователь щелкает по переключателю.

RadioGroup  (пример - задание)

  Создать приложение, демонстрирующее возможность управления горизонтальным и вертикальным расположением надписи Label с помощью компонентов RadioGroup. Прозрачность фона подложки Label задается компонентом CheckBox.
Смотри пример.
  1. Создайте приложение и на Form1 поместите компонент Panel1 и задать его свойство Align равным alTop.
  2. На Panel1 поместите компонент Label и установить его свойство Align равным alClient.
  3. На Form1 поместите компонент RadioGroup1 и задать в инспекторе объектов его свойства :
    Caption Alignment
    ItemIndex 0
    Items Влево
    Центр
    Вправо
  4. На Form1 поместите компонент RadioGroup2 и задать в инспекторе объектов его свойства :
    Caption LayOut
    ItemIndex 0
    Items tlTop
    tlCenter
    tlBotton
  5. На Form1 поместите компонент CheckBox1 и задать в инспекторе объектов его свойства :
    Caption Transparent

Смотри пример задания.

Для компонента RadioGroup1 вести код тела функции обработчика событий OnClick
void __fastcall TForm1::RadioGroup1Click(TObject *Sender)
{
AnsiString S;
switch(RadioGroup1->ItemIndex)
  {
  case 0: S="Влево";
  Label1->Alignment=taLeftJustify; break;
Отмечена радиокнопка 0-Влево
  case 1: S="Центр";
  Label1->Alignment=taCenter; break;
Отмечена радиокнопка 1-Центр
  case 2: S="Вправо";
  Label1->Alignment=taRightJustify; break;
Отмечена радиокнопка 2-Вправо
  }
Label1->Caption=S;
}

Для компонента RadioGroup2 вести код тела функции обработчика событий OnClick

void __fastcall TForm1:: RadioGroup2Click(TObject *Sender)
{
Label1->Layout =
  (TTextLayout) (RadioGroup2->ItemIndex);
Преобразование типа int в тип TTextLayout
}

Для компонента CheckBox1 вести код тела функции обработчика событий OnClick

void __fastcall TForm1::CheckBox1Click(TObject *Sender)
{
  Label1->Transparent = CheckBox1->Checked;
}

CheckBox и RadioGroup  (задание)

Создать приложение, в котором четыре компонента CheckBox изменяют стиль шрифта Label1, а горизонтальным расположением Label1 управляют компонент RadioGroup. Прозрачность фона подложки Label1 задается компонентом CheckBox.
Смотри пример.