10 класс. Физико – математический профиль. ОС Linux 5.0.2 Школьный мастер.

Урок для 10 класса на тему

«Создание проекта «Отметка» в среде Lazarus 0.9.29»

1. Открой программу Lazarus и создай новый проект (Проект / создать / приложение).

2. Сохрани проект в личной папке в папку «Отметка» (Проект / сохранить проект как / Отметка / unit1 / project1)

3. Установи свойства для формы:

Объект

Имя объекта (Name)

Свойства

Значение свойства

Форма

Tform1

Caption

Отметка

Font

Sans,14

Color

Салатный

4. Размести на форме следующие объекты: Label1, Label2, Label 3, ComboBox1, Edit1 и изменить их свойства

Объект

Имя объекта (Name)

Свойства

Значение свойства

Надпись 1

Label1

Caption

Количество ошибок

Font

Arial, 16

Надпись 2

Label2

Caption

Отметка

Font

Arial, 16

Надпись 3

Label3

Caption

Отсутствует

Font

Arial, 16

Поле со списком

ComboBox1

Style ( список для выбора значений)

csDropDownList

Items

6 строк с цифрами 0,1,2,3,4,5

( по одной цифре в строке)

Текстовое поле

Edit1

Text

Текст отсутствует

5. Выполни двойной щелчок мышью на объекте ComboBox1 . При этом в программный код будет добавлена заготовка

procedure TForm2.ComboBox1Change(Sender: TObject);

begin

…………..

end;

В разделе Var добавь недостающие данные о переменной N

var

Form1: TForm1;

N: byte;

Между словами begin и end впиши следующий код

N:= strtoint(edit1.Text);

case N of

0: label3.caption:= 'Отлично';

1: label3.caption:= 'Хорошо';

2: label3.caption:= 'Удовлетворительно';

3: label3.caption:= 'Плохо';

else

label3.caption:= 'Очень плохо';

end;

Переключись из редактора кода на форму с помощью значка

6. Выполни двойной щелчок мышью на объекте Edit1. При этом в программный код будет добавлена заготовка

procedure TForm1.Edit1Change(Sender: TObject);

begin

………..

end;

Между словами begin и end впиши следующий код

N:= strtoint(Edit1.Text);

case N of

0: label3.caption:= 'Отлично';

1: label3.caption:= 'Хорошо';

2: label3.caption:= 'Удовлетворительно';

3: label3.caption:= 'Плохо';

else

label3.caption:= 'Очень плохо';

7. Запусти проект на выполнение. Если есть ошибки, выполни отладку.

8. Выбирая из списка объекта Combobox1 числа, убедись, что код для этого объекта работает.

9. Последовательно вписывай числа от 0 до 5 в текстовое поле Edit1. Убедись, что код для этого объекта работает.

10. Продемонстрируйте работу учителю.