Графические примитивы
Модуль GraphABC
Модуль GraphABC содержит константы, типы, процедуры, функции и классы для рисования в графическом окне. Они подразделяются на следующие группы:
Графические примитивы
| Процедура / функция | Действие |
| SetPixel(x,y,color) | Закрашивает один пиксел с координатами (x,y) цветом color. |
| Line(x1,y1,x2,y2); | Рисует отрезок с началом в точке (x1,y1) и концом в точке (x2,y2). |
| Circle(x,y,r); | Рисует окружность с центром в точке (x,y) и радиусом r. |
| Ellipse(x1,y1,x2,y2); | Рисует эллипс, заданный своим описанным прямоугольником с координатами противоположных вершин (x1,y1) и (x2,y2). |
| Rectangle(x1,y1,x2,y2); | Рисует прямоугольник, заданный координатами противоположных вершин (x1,y1) и (x2,y2). |
| RoundRect(x1,y1,x2,y2,w,h); | Рисует прямоугольник со скругленными краями; (x1,y1) и (x2,y2) задают пару противоположных вершин, а w и h – ширину и высоту эллипса, используемого для скругления краев. |
| Arc(x,y,r,a1,a2); | Рисует дугу окружности с центром в точке (x,y) и радиусом r, заключенной между двумя лучами, образующими углы a1 и a2 с осью OX (a1 и a2 – вещественные, задаются в градусах и отсчитываются против часовой стрелки). |
| Pie(x,y,r,a1,a2); | Рисует сектор окружности, ограниченный дугой (параметры процедуры имеют тот же смысл, что и в процедуре Arc). |
| Chord(x,y,r,a1,a2); | Рисует фигуру, ограниченную дугой окружности и отрезком, соединяющим ее концы (параметры процедуры имеют тот же смысл, что и в процедуре Arc). |
| TextOut(x,y: integer; s: string); | Выводит строку s в позицию (x,y) (точка (x,y) задает верхний левый угол прямоугольника, который будет содержать текст из строки s). |
| FloodFill(x,y,color); | Заливает область одного цвета цветом color, начиная с точки (x,y). |
Цветовые константы
Стандартные цвета задаются символическими константами:
| clBlack – черный clPurple – фиолетовый clWhite – белый clMaroon – темно-красный clRed – красный clNavy – темно-синий clGreen – зеленый clBrown – коричневый clBlue – синий clSkyBlue – голубой clYellow – желтый clCream – кремовый | clAqua – бирюзовый clOlive – оливковый clFuchsia – сиреневый clTeal – сине-зеленый clGray – темно-серый clLime – ярко-зеленый clMoneyGreen – цвет зеленых денег clLtGray – светло-серый clDkGray – темно-серый clMedGray – серый clSilver – серебряный |
Действия с пером
| Процедура / функция | Действие |
| SetPenColor(color: integer); | Устанавливает цвет пера, задаваемый параметром color. |
| SetPenWidth(w: integer); | Устанавливает ширину пера, равную w пикселам. |
| SetPenStyle(ps: integer); | Устанавливает стиль пера, задаваемый параметром ps. |
| Стили пера задаются следующими именованными константами: | |
| |
| Действия с кистью | |
| SetBrushColor(color: integer); | Устанавливает цвет кисти, задаваемый параметром color. |
| SetBrushStyle(bs: integer); | Устанавливает стиль кисти, задаваемый параметром bs. |
| Стили кисти задаются следующими именованными константами: | |
| |
| Действия со шрифтом | |
| SetFontColor(color: integer); | Устанавливает цвет шрифта. |
| SetFontSize(sz: integer); | Устанавливает размер шрифта в пунктах. |
| SetFontName(name: string); | Устанавливает наименование шрифта. |
| По умолчанию установлен шрифт, имеющий наименование MS Sans Serif. Наиболее распространенные шрифты – это Times, Arial и Courier New. Наименование шрифта можно набирать без учета регистра. | |
| SetFontStyle(fs: integer); | Устанавливает стиль шрифта. |
| Стили шрифта задаются следующими именованными константами: | |
| fsNormal | обычный |
| fsBold | жирный |
| fsItalic | наклонный |
| fsBoldItalic | жирный наклонный |
| fsUnderline | подчеркнутый |
| fsBoldUnderline | жирный подчеркнутый |
| fsItalicUnderline | наклонный подчеркнутый |
| fsBoldItalicUnderline | жирный наклонный подчеркнутый |
| Действия с графическим окном | |
| ClearWindow; | Очищает графическое окно белым цветом. |
| ClearWindow(c: ColorType); | Заливает графическое окно цветом c. |
| SetWindowSize(w,h: integer); | Устанавливает ширину и высоту графического окна. |
| SetWindowPos(l,t: integer); | Устанавливает отступ графического окна от левого и верхнего края экрана. |
| Все размеры устанавливаются и возвращаются в пикселах. |
Дата добавления: 2015-12-20; просмотров: 17; Мы поможем в написании вашей работы! |
Мы поможем в написании ваших работ!