ify"> У цих процедурах ми задаємо тип символів, які зможе ввести користувач. Так як для роботи програми нам потрібно, щоб вводилися числа, то ці процедури дозволяють вводити тільки цифри. br/>
procedureTForm1.Edit1Change (Sender: TObject) procedureTForm1.Edit2Change (Sender: TObject)
У цих процедурах ми перевіряємо присутність даних у рядках Edit1 і Edit2. Якщо рядка введення не пустили, то програма виконується далі, в іншому ж випадку з'являється вікно з текстом: В«Введено не всі дані!В». br/>В
Визначення кольору лінії:
colors: = RGBToColor (random (255), random (255), random (255)); Panel1.Canvas.Pen.Color: = colors;
Ці команди відповідають за вибір кольору олівця, який відбувається випадковим чином.
Визначення кольору заливки:
Panel1.Canvas.Brush.Color: = clWhite;
Ця команда відповідає за вибір кольору заливки полотна. У даному випадку, ми використовуємо білий колір. p align="justify"> Метод викреслювання
Метод Line:
Цей метод викреслює пряму з точки з координатами (x1, y1) в точку з координатами (x2, y2)
Виклик методу виглядає так:
Panel1.Canvas.Line (x1, y1, x2, y2);
Виклик методу в даній задачі виглядає так:
Panel1.Canvas.Line (x + Round (d * Cos (a * i)), y + Round (d * Sin (a * i)), x + Round (d * Cos ( a * (i + 1))), y + Round (d * Sin (a * (i + 1))));
Висновок
Показав можливості використання методів візуалізації в середовищі програмування Lazarus. Повністю розібрав завдання з використанням цих методів для студентів першого курсу математичного факультету. br/>
Список використаної літератури та джерел
В· Алексєєв Є.Р., Чеснокова О.В., Кучер Т.В. - В«Самовчитель з програмування на Free Pascal та LazarusВ» - 2011 рік.
В· Web-додаток «³зуалізація завдань курсу" Комп'ютерні науки "у середовищі LazarusВ» Автор: Полушкіна О.М. - 2012 рік.