Задача 3

Программа для расчета квадратов случайных чисел ( )

1. Запускаем Lazarus.

2. В окне формы разместим таблицу (TStringGrid (вкладка Additional)), три кнопки (TButton), одна надпись (TLabel), одно текстовое поле (TEdit), Компонент TUpDown (вкладка Common Controls), четыре компонента TBevel (вкладка Additional). Функция TBevel – украшение.

3. С помощью окна Инспектор объектов выделяем объекты и меняем их свойства на приведенные в таблице:

Объект	Свойство	Значение свойства
Button1	Caption	Случайно
	Font	Шрифт: Bodoni MT
		Начертание: уплотненный курсив
		Размер: 16
Button2	Caption	Вычислить
	Font	Шрифт: Bodoni MT
		Начертание: уплотненный курсив
		Размер: 16
Button3	Caption	Выход
	Font	Шрифт: Bodoni MT
		Начертание: уплотненный курсив
		Размер: 22
Label1	Caption	Задать количество строк
	Font	Шрифт: Arial
		Начертание: полууплотненный курсив
		Размер: 18
Edit1	Text	Пустая строка
	Font	Шрифт: Algerian
		Начертание: сверхуплотненный наклонный
		Размер: 16
UpDown1	Associate	Edit1
Bevel1(2,3,4)	Height	155 (3,4); 3 (1,2)
	Width	3 (3,4); 156 (1,2)
StringGrid1	AutoEdit	False
	ColCount	3
	FixedCols	0
	RowCount	10
	Options	GoEditing (True)

4. Пишем код для Button3 (Выход) и компонента UpDown1:

5. Пишем код для Button1 (Случайно):

6. Запустим программу для того, чтобы проверить работает ли коды.

7. Пишем код для Button2 (Вычислить):

8. Запускаем программу.

Задача 4.

Создать проект, который имеет вид формы ввода логина и пароля пользователя. В нем после щелчка на кнопке появляется сообщение с надписями: «Вход выполнен» или «Неправильное имя пользователя или пароль».

Создать интерфейс программы по образцу:

Разместить текстовые поля, надписи и кнопку на форме, установить значения свойств, перечисленные в таблице. Когда вы это сделаете, форма примет такой вид, как на рисунке.

Ход выполнения

1. Загрузите Lazarus. Создайте новый проект и сохраните его.

2. Разместите на форме компоненты «Надпись» (2 шт), «Текстовое поле ввода» (2 шт) и «Кнопка».

3. Установите новые значения для свойств, перечисленные в таблице.

Компонент	Свойство	Значение
Форма	Color Position	Выберите любой цвет poDesktopCenter (приложение будет открываться по центру экрана).
Первое текстовое поле Второе текстовое поле	Text Text PasswordChar	Оставьте пустую строку Оставьте пустую строку *(при вводе цифр в поле будет виден этот символ)
Надпись 1	Caption	Введите логин
Надпись 2	Caption	Введите пароль
Кнопка	Font size	15

Как задать некоторые свойства, показано на картинках:

Форма:

Первое текстовое поле:

Второе текстовое поле ввода:

Для кнопки прописывается такой код:

if (Edit1.Text = 'admin') and ( Edit2.Text = '00000') then

ShowMessage ('Вход выполнен')

else ShowMessage('Неправильное имя пользователя или пароль');

Код для кнопки:

4. После компиляции появится такая форма:

5. При вводе в поле с логином текста «admin» и в поле с паролем текста «00000» (которые являются «правильными») и нажатии на кнопку «Вход» появится окно с надписью: «Вход выполнен». В противном случае появится окно с другой надписью: «Неправильное имя пользователя или пароль».