Проект “Декартова система координат”
Разработать проект, рисующий декартову систему координат.
a) Создайте новый проект в Delphi и сохраните его в отдельной папке “Декартова система координат”;
Разместите на форме со страницы Additional компонент Image. Данный компонент имеет канву – пространство для создания графических объектов – и позволяет рисовать на ней, а также облегчает располагать рисунки в области формы.
b) Установите цвет рисуемых объектов (осей) - свойство Pen и заливки (фона) - свойство Brush класса TCanvas.
c) в событии OnCreate формы реализуйте рисование декартовой системы координат на компоненте Image, подпись осей и начала системы координат, используя следующие методы класса TCanvas:
- MoveTo(x, y) – перемещение в точку с указанными координатами;
- LineTo(x', y') – рисование линии от текущей точки (x, y) до следующей точки с координатами (x', y');
- TextOut(x, y, ‘текст’) – вывод текста в указанную позицию (x, y);
Пример рисования оси y:
На Image1,на его канве, рисуем ОТ точки(середина ширины Image1,0)
На Image1,на его канве, рисуем ДО точки(середина ширины Image1,высота Image1)
d) Проверьте работу проекта.
Мне больше нечего сказать про эту лабораторную работу, качайте и пользуйтесь)
Надеюсь, Вам помог этот сайт и я в частности))
monks_jk