====== Программирование в X-Window средствами Free Pascal ======

[[index|Перейти к содержанию]]

===== 1.2.7. Лабораторная работа №2 "Текст и графика" =====

  - Напишите программу, выводящую текстовое сообщение в произвольную позицию (в пределах окна) произвольным цветом. Цвет и координаты должны меняться при изменении размеров окна.\\ \\ {{ http://www.sources.ru/pascal/graph/xwinfpc/images/image11.gif }}
  - Составьте программу, принимающую со стандартного ввода маску шрифта, выводимую строку, координаты х, у и отображающую окно с текстом согласно введенной информации.\\ \\ {{ http://www.sources.ru/pascal/graph/xwinfpc/images/image12.gif }}
  - Нарисуйте в окне график функции sin(x) на отрезке [ -π; π ]. Оси подпишите курсивом, метки по осям - обычным шрифтом, начало координат (0) выделите жирным шрифтом.\\ \\ {{ http://www.sources.ru/pascal/graph/xwinfpc/images/image13.gif }}
  - Нарисуйте в окне 100 окружностей. Цвет, координаты центра и радиус выбирать случайным образом.\\ \\ {{ http://www.sources.ru/pascal/graph/xwinfpc/images/image14.gif }}
  - Используя StructureNotifyMask и русский шрифт, модифицируйте программу из первого задания лабораторной работы №1 таким образом, чтобы сообщение всегда отображалось в центре окна.\\ \\ {{ http://www.sources.ru/pascal/graph/xwinfpc/images/image15.gif }}
  - Составьте программу, выводящую в окно все символы стандартного курсорного шрифта.\\ \\ {{ http://www.sources.ru/pascal/graph/xwinfpc/images/image16.gif }}

== Приложение ==

Демонстрационные исполняемые файлы: [[http://www.sources.ru/pascal/graph/xwinfpc/lab2.zip|lab2.zip]]

Исходный код модулей (x.pp, x11.pp, xlib.pp, xresource.pp, xutil.pp): [[http://www.sources.ru/pascal/graph/xwinfpc/units.zip|units.zip]]