Проект 1

На этапе выполнения форма должна иметь следующий вид:

Чему равно свойство Parent у Label1 и Label2?

Для label1 Parentfont установите в true, а для Label2 в false. Измените шрифт у Panel1, Panel2 и Label2.

По нажатию на кнопку измените родителей меток на Panel2

По нажатию на кнопку измените родителей меток на Panel1

Как изменяются шрифты у меток?

Проект 2 “CheckBox ”

На этапе выполнения форма должна иметь следующий вид:

a) Создайте новый проект в Delphi и сохраните его в отдельной папке “Выбор уровня игры”;

b) Разместите на форме компонент RadioGroup. Этот компонент представляет собой группу взаимосвязанных индикаторов – радиокнопок, из которых можно выбрать обычно только одну:

· Задайте надписи радиокнопок, используя свойство Items компонента RadioGroup;

· Разместите радиокнопки в 2 колонки, задав соответствующее значение в свойстве Colums;

· Оформите заголовок компонента RadioGroup;

· С помощью свойства ItemIndex – номер выбранной радиокнопки - установите, что опция “Новичок” будет выбрана по умолчанию. Учтите, что индексы начинаются с 0. Значение -1 означает отсутствие выбранной кнопки;

c) Разместите на форме компонент CheckBox, который позволяет пользователю включить и выключить опции программы:

· Оформите заголовок компоненты CheckBox;

· Обратите внимание, что свойство Checked – включена опция – установлено в false;

d) Разместите на форме компонент GroupBox. Этот компонент служит для группировки компонентов. Оформите заголовок этого компонента в соответствии с требуемым;

e) Разместите на компоненте GroupBox четыре компонента Label. В качестве заголовка у первого и второго компонента Label укажите “Уровень” и “Звук”, в качестве заголовка у третьего и четвертого компонентов укажите “Новичок” и “Не включать”. Выровняйте все метки на GroupBox с помощью средств Delphi;

f) После запуска программы на выполнение пользователь для выбора уровня щелкнет по соответствующей радиокнопки и это значение отобразится в Label3, следовательно событие OnClick для компонента RadioGroup необходимо обработать следующим образом:

case RadioGroup1.ItemIndex of

0: Label3.Caption: = 'Новичок';

1: Label3.Caption: = 'Мастер';

2: Label3.Caption: = 'Крутой';

3: Label3.Caption: = 'Монстр';

end;

g) Аналогично, событие OnClick для компонента CheckBox необходимо обработать следующим образом:

if CheckBox1.Checked then

Label4.Caption: = 'включен'

else

Label4.Caption: = 'не включен';

h) Проверьте работу проекта.

.

Проект 3 “Фраза ”

Разработайте проект, который конструирует и выводит на форму фразу английского языка “The something is on (under, near) the something”. Оформите список предметов этой фразы с помощью двух компонентов ListBox, выбор предлога осуществите с помощью компонента RadioGroup. При построении фразы на каждом этапе должен быть доступен только один из компонентов. На этапе выполнения форма должна иметь следующий вид: