Состав сооружений: решетки и песколовки: Решетки – это первое устройство в схеме очистных сооружений. Они представляют...
Опора деревянной одностоечной и способы укрепление угловых опор: Опоры ВЛ - конструкции, предназначенные для поддерживания проводов на необходимой высоте над землей, водой...
Топ:
Особенности труда и отдыха в условиях низких температур: К работам при низких температурах на открытом воздухе и в не отапливаемых помещениях допускаются лица не моложе 18 лет, прошедшие...
Генеалогическое древо Султанов Османской империи: Османские правители, вначале, будучи еще бейлербеями Анатолии, женились на дочерях византийских императоров...
Интересное:
Аура как энергетическое поле: многослойную ауру человека можно представить себе подобным...
Отражение на счетах бухгалтерского учета процесса приобретения: Процесс заготовления представляет систему экономических событий, включающих приобретение организацией у поставщиков сырья...
Берегоукрепление оползневых склонов: На прибрежных склонах основной причиной развития оползневых процессов является подмыв водами рек естественных склонов...
Дисциплины:
2018-01-30 | 179 |
5.00
из
|
Заказать работу |
|
|
SetPenWidth(3); // толщина пера - 3 пиксела
SetPenStyle(psSolid); // стиль пера "Сплошное перо"
DrawCircle(320,240, 220); // нарисовали сплошную окружность R=220
SetPenStyle(psDash); // стиль пера "Штриховое перо"
DrawCircle(320,240, 180); // нарисовали штриховую окружность R=180
SetPenStyle(psDot); // стиль пера "Пунктирное перо"
DrawCircle(320,240, 140); // нарисовали пунктирную окружность R=140
End.
Установка цвета и стиля заливок – Brush (Кисть)
Цвет и стиль заливки замкнутых графических элементов (например, кругов и прямоугольников) используется объект Brush (Кисть).
Процедуры кисти
SetBrushColor(C); | Цвет кисти – цвет сплошной заливки, С – переменная типа Color | |
SetBrushHatch(Hatch); | Стиль штриховки. В модуле GraphABC около 60 типов штриховки | |
SetHatchBrushBackgroundColor(С); | Цвет заднего плана штриховки, тип Color | |
SetBrushStyle(Style); | Стиль кисти, где Style принимает одно из 3х значений: bsClear – Прозрачная кисть. Закраска не происходит bsSolid – Сплошная кисть. Закрашивает замкнутую область цветом заданным в процедуре SetBrushColor(C); bsHatch – Штриховая кисть. Штрихует замкнутую область типом штриха заданным в процедуре SetBrushHatch(Hatch); и цветом заднего плана штриховки SetHatchBrushBackgroundColor(С); | |
План применения параметров кисти (* необязательный параметр):
1. Задать цвет кисти в SetBrushColor(C);
*2. Если нужно задать тип штриховки в SetBrushHatch(Hatch);
*3. Если нужно задать цвет заднего плана штриховки в SetHatchBrushBackgroundColor(С);
4. Применить эти параметры к текущей кисти в SetBrushStyle(Style);
5. Нарисовать замкнутую фигуру с заливкой (Rectangle, Circle)
Типы штриховки
Приведено несколько штриховок, на самом деле в модуле их около 60.
Значения свойства Hatch | Тип штриховки | Образец штриховки |
bhCross | Прямоугольная клетка | |
bhDiagonalCross | Косоугольная клетка | |
bhBackwardDiagonal | Косой штрих / / / / / | |
bhForwardDiagonal | Косой штрих \ \ \ \ \ | |
bhHorizontal | Штриховка горизонтальными линиями | |
bhVertical | Штриховка вертикальными линиями |
|
Пример. Прямоугольники разных цветов и прозрачности.
Uses GraphABC;
Begin
SetBrushColor(clRed); //красный
FillRectangle(50,50,100,Window.Height - 50);
SetBrushColor(clGreen); //зелёный
FillRectangle(150,50,200,Window.Height - 50);
SetBrushColor(clBlue); //синий
FillRectangle(250,50,300,Window.Height - 50);
SetBrushColor(ARGB(127,255,0,0)); //красный, прозрачность 127
FillRectangle(20,100,420,150);
SetBrushColor(ARGB(63,0,255,0)); //зелёный, прозрачность 63
FillRectangle(20,200,420,250);
SetBrushColor(ARGB(31,0,0,255)); //синий, прозрачность 31
FillRectangle(20,300,420,350);
End.
Пример.Нарисуем три круга – с прозрачнм фоном, с желтой заливкой, со штриховкой на салатовом фоне. Обводку кругов не меняем (рисуется пером по умолчанию чёрного цвета).
Uses GraphABC;
Begin
Window.Clear(RGB(220,220,220));
SetBrushColor (clYellow); // Задали цвет кисти – clYellow (жёлтый)
SetBrushHatch (bhVertical); //Задали стиль штриховки – bhVertical (вертикаль)
|
|
Типы сооружений для обработки осадков: Септиками называются сооружения, в которых одновременно происходят осветление сточной жидкости...
Индивидуальные и групповые автопоилки: для животных. Схемы и конструкции...
Папиллярные узоры пальцев рук - маркер спортивных способностей: дерматоглифические признаки формируются на 3-5 месяце беременности, не изменяются в течение жизни...
Биохимия спиртового брожения: Основу технологии получения пива составляет спиртовое брожение, - при котором сахар превращается...
© cyberpedia.su 2017-2024 - Не является автором материалов. Исключительное право сохранено за автором текста.
Если вы не хотите, чтобы данный материал был у нас на сайте, перейдите по ссылке: Нарушение авторских прав. Мы поможем в написании вашей работы!