Программирование в X-Window средствами Free Pascal
1.2.7. Лабораторная работа №2 "Текст и графика"
Напишите программу, выводящую текстовое сообщение в произвольную позицию (в пределах окна) произвольным цветом. Цвет и координаты должны меняться при изменении размеров окна.
![](/lib/exe/fetch.php?tok=bf338d&media=http%3A%2F%2Fwww.sources.ru%2Fpascal%2Fgraph%2Fxwinfpc%2Fimages%2Fimage11.gif)
Составьте программу, принимающую со стандартного ввода маску шрифта, выводимую строку, координаты х, у и отображающую окно с текстом согласно введенной информации.
![](/lib/exe/fetch.php?tok=19acba&media=http%3A%2F%2Fwww.sources.ru%2Fpascal%2Fgraph%2Fxwinfpc%2Fimages%2Fimage12.gif)
Нарисуйте в окне график функции sin(x) на отрезке [ -π; π ]. Оси подпишите курсивом, метки по осям - обычным шрифтом, начало координат (0) выделите жирным шрифтом.
![](/lib/exe/fetch.php?tok=1f4bc6&media=http%3A%2F%2Fwww.sources.ru%2Fpascal%2Fgraph%2Fxwinfpc%2Fimages%2Fimage13.gif)
Нарисуйте в окне 100 окружностей. Цвет, координаты центра и радиус выбирать случайным образом.
![](/lib/exe/fetch.php?tok=f9ca51&media=http%3A%2F%2Fwww.sources.ru%2Fpascal%2Fgraph%2Fxwinfpc%2Fimages%2Fimage14.gif)
Используя StructureNotifyMask и русский шрифт, модифицируйте программу из первого задания лабораторной работы №1 таким образом, чтобы сообщение всегда отображалось в центре окна.
![](/lib/exe/fetch.php?tok=a285ab&media=http%3A%2F%2Fwww.sources.ru%2Fpascal%2Fgraph%2Fxwinfpc%2Fimages%2Fimage15.gif)
Составьте программу, выводящую в окно все символы стандартного курсорного шрифта.
![](/lib/exe/fetch.php?tok=4d571d&media=http%3A%2F%2Fwww.sources.ru%2Fpascal%2Fgraph%2Fxwinfpc%2Fimages%2Fimage16.gif)
Приложение
Демонстрационные исполняемые файлы: lab2.zip
Исходный код модулей (x.pp, x11.pp, xlib.pp, xresource.pp, xutil.pp): units.zip