Прямоугольник вычерчивается
методом Rectangle, инструкция вызова которого в общем виде выглядит следующим
образом:
Объект.Canvas.Rectangle(x1,
y1,x2, y2)
где:
объект — имя объекта (компонента),
на поверхности которого выполняется вычерчивание;
x1, y1 и х2, у2 — координаты
левого верхнего и правого нижнего углов прямоугольника.
Метод RoundRec тоже
вычерчивает прямоугольник, но со скругленными углами. Инструкция вызова метода
RoundRec выглядит так:
Объект.Canvas.RoundRec(x1,y1,х2,
у2, х3, у3)
где:
x1, y1, х2, у2 -- параметры,
определяющие положение углов прямоугольника, в который вписывается прямоугольник
со скругленными углами;
х3 и у3 — размер эллипса, одна
четверть которого используется для вычерчивания скругленного угла (рис. 10.8).
Рис. 10.8. Метод
RoundRec вычерчивает прямоугольник со скругленными углами
Вид линии контура (цвет,
ширина и стиль) определяется значениями свойства Реп, а цвет и стиль заливки
области внутри прямоугольника — значениями свойства Brush поверхности (canvas),
на которой прямоугольник вычерчивается.
Есть еще два метода,
которые вычерчивают прямоугольник, используя в качестве инструмента только кисть
(Brush). Метод FillRect вычерчивает закрашенный прямоугольник, а метод FrameRect
— только контур. У каждого из этих методов лишь один параметр — структура типа
TRect. Поля структуры TRect содержат координаты прямоугольной области, они могут
быть заполнены при помощи функции Rect.
Ниже в качестве примера
использования методов FillRect и FrameRect приведена процедура, которая на поверхности
формы вычерчивает прямоугольник с красной заливкой и прямоугольник с зеленым
контуром.
Знаете ли Вы, что такое "усталость света"? Усталость света, анг. tired light - это явление потери энергии квантом электромагнитного излучения при прохождении космических расстояний, то же самое, что эффект красного смещения спектра далеких галактик, обнаруженный Эдвином Хабблом в 1926 г. На самом деле кванты света, проходя миллиарды световых лет, отдают свою энергию эфиру, "пустому пространству", так как он является реальной физической средой - носителем электромагнитных колебаний с ненулевой вязкостью или трением, и, следовательно, колебания в этой среде должны затухать с расходом энергии на трение. Трение это чрезвычайно мало, а потому эффект "старения света" или "красное смещение Хаббла" обнаруживается лишь на межгалактических расстояниях. Таким образом, свет далеких звезд не суммируется со светом ближних. Далекие звезды становятся красными, а совсем далекие уходят в радиодиапазон и перестают быть видимыми вообще. Это реально наблюдаемое явление астрономии глубокого космоса. Подробнее читайте в FAQ по эфирной физике.