DELPHI 7

vk.com/club152685050 | vk.com/id446425943

Memo (Поле просмотра)

vk.com/club152685050 | vk.com/id446425943

Button (Кнопка)

vk.com/club152685050 | vk.com/id446425943

Button (Кнопка)

vk.com/club152685050 | vk.com/id446425943

MainMenu (Главное меню программы)

vk.com/club152685050 | vk.com/id446425943

MainMenu

(Главное меню программы

vk.com/club152685050 | vk.com/id446425943

CheckBox

(независимый перекл.)

RadioButton

(зависимый перекл.)

vk.com/club152685050 | vk.com/id446425943

Компонент Флажок (TCheckBox)

			Свойство, метод	Назначение
			.Caption	Подпись к элементу
			.Alignment = taRightJustify	Месторасположение
			taLeftJustify	подписи относительно
				флажка
			.AllowGrayed = true	Установка состояний:
				«выключен», «включен
				частично», «включен»
			.State = cbUnchecked	«выключен»
			cbGrayed	«включен частично»
			cbChecked	«включен»

vk.com/club152685050 | vk.com/id446425943

Компонент Флажок (TCheckBox)

Procedure TForm1.CheckBox1Click (Sender: TObject); Begin

Case CheckBox1.State of

cbUnchecked : Label1.Caption := ‘выключено’; cbGrayed : Label1.Caption := ‘затемнено’; cbChecked : Label1.Caption := ‘включено’;

End;

End;

vk.com/club152685050 | vk.com/id446425943

Компонент Переключатель

(TRadioButton)

			Свойство, метод	Назначение
			.Caption	Подпись к элементу
			.Alignment	Положение подписи
				относительно
				переключателя
			.Checked = True	Включение кнопки
			.OnClick	Отслеживание состояния
				переключателя

vk.com/club152685050 | vk.com/id446425943

Компонент Переключатель

(TRadioButton)

Procedure TForm1.RadioButton1Click (Sender: TObject); Begin

If RadioButton1.Checked

Then Label1.Caption := ‘Включен первый переключатель’;

End;

Procedure TForm1.RadioButton2Click (Sender: TObject); Begin

If RadioButton2.Checked

Then Label1.Caption := ‘Включен второй переключатель’;

End;