[ главная ]   [ рейтинг статей ]   [ справочник радиолюбителя ]   [ новости мира ИТ ]



Ответов: 0
25-02-12 07:01







   Web - программирование
PHP


ASP






XML



CSS

SSI





   Программирование под ОС











   Web - технологии








   Базы Данных









   Графика






Данные




Программирование под ОС / Pascal - Delphi /

Базовые процедуры и функции

Для построения изображений на экране используется система координат. Отсчет начинается от верхнего левого угла экрана, который имеет координаты (0,0). Значение Х (столбец) увеличивается слева направо, значение Y (строка) увеличивается сверху вниз.
 Чтобы строить изображения, необходимо указывать точку начала вывода. В текстовых режимах эту точку указывает курсор, который присутствует на экране. В графических режимах видимого курсора нет, но есть невидимый текущий указатель CP(Current Pointer). Фактически это тот же курсор, но он невидим.

Процедуры модуля Graph


Процедура Формат Действие
SetColor SetColor(a: word); Устанавливает цвет, которым будет осуществляться рисование
SetBkColor SetBkColor(a: word); Устанавливает цвет фона
SetFillStyle SetFillStyle(a, b: word);
a - стиль закраски, b - цвет
Устанавливает стиль и цвет закраски
SetLineStyle SetLineStyle(a, b, c: word);
а - стиль линии, b- образец построения линии (может устанавливаться пользователем), с-толщина линии
Устанавливает стиль и толщину линии
SetTextStyle SetTextStyle(a, b, c: word); Устанавливает шрифт, стиль и размер текста
SetFillPattern SetFillPattern(Pattern: FillpatternType; Color: word); Pattern - маска Выбирает шаблон заполнения, определенный пользователем
ClearDivice ClearDivice; Очищает экран и устанавливает текущий указатель в начало
SetViewPort SetViewPort(x1, y1, x2, y2: integer, Clip: boolean); Устанавливает текущее окно для графического вывода
ClearViewPort ClearViewPort Очищает окно
PutPixel PutPixel(a, b, c: integer); Рисует точку цветом с в (x,y)
Line Line(x1, y1, x2, y2: integer); Рисует линию от (x1, y1) к (x2,y2)
Rectangle Rectangle(x1, y1, x2, y2: integer); Рисует прямоугольник с диагональю от (x1, y1) к (x2, y2)
Bar Bar(x1, y1, x2, y2: integer); Рисует закрашенный прямоугольник
Bar3D Bar3D(x1, y1, x2, y2, d: integer; a: boolean); Рисует трехмерную полосу (параллелепипед)
Circle Circle(x, y, r: word); Рисует окружность радиуса r с центром в точке (x, y)
Arc Arc(x, y, a, b, R: integer);
a, b- начальный и конечный углы в градусах
Рисует дугу из начального угла к конечному, используя (x,y) как центр
Ellipse Ellipse(x, y, a, b, Rx, Ry: integer);
a, b - начальный и конечный углы в градусах
Рисует эллиптическую дугу от начального угла к конечному, используя (x, y) как центр
FillEllipse FillEllipse(x, y, Rx, Ry: integer);
Rx, Ry - вертикальная и горизонтальная оси
Рисует закрашенный эллипс
MoveTo MoveTo(x, y: integer); Передвигает текущий указатель в (x, y)
MoveRel MoveRel(x, y: integer); Передвигает текущий указатель на заданное расстояние от текущей позиции на x по горизонтали и на y по вертикали
OutText OutText(text: string); Выводит текст от текущего указателя
OutTextxy OutTextxy(x, y: integer; text: string); Выводит текст из (x, y)
Sector Sector(x, y, a, b, Rx, Ry: integer);
a, b - начальный и конечный углы в градусах
Рисует и заполняет сектор эллипса


Функции модуля Graph


GetBkColor Возвращает текущий фоновый цвет
GetColor Возвращает текущий цвет
GetX Возвращает координату X текущей позиции
GetY Возвращает координату Y текущей позиции
GetPixel Возвращает цвет точки в (x, y)




Комментарии

 Ваш комментарий к данному материалу будет интересен нам и нашим читателям!



Последние статьи: Программирование под ОС / Pascal - Delphi /

Работа со шрифтами на Win API
06-06-2010   

Сегодня поговорим о шрифтах, и о том, каким образом работать с ними на Win API. Нам потребуется переменная типа HFONT. Изменить стиль шрифта можно у любого компонента, я покажу это на примере кнопки... подробнее

Кол. просмотров: общее - 3462 сегодня - 0

Работа с таймером на Win API
06-06-2010   

Таймер - вещь в хозяйстве очень полезная. Если некое действие нужно повторять с определенной периодичностью, то таймер, это как раз то, что нужно... подробнее

Кол. просмотров: общее - 3455 сегодня - 1

Работа с мультимедийным таймером на Win API
06-06-2010   

Мы уже знакомы с системным таймером, сегодня познакомимся с мультимедийным, основное отличие которого, более высокая скорость (точность) работы... подробнее

Кол. просмотров: общее - 3581 сегодня - 0

Создание CheckBoxов средствами Win API
06-06-2010   

Сегодня наша программа научится работать с CheckBoxами. CheckBox можно представить как флаг, который можно установить или сбросить, и в зависимости от его состояния выполнять определенные действия... подробнее

Кол. просмотров: общее - 3697 сегодня - 1

Создание группы RadioButton средствами Win API
06-06-2010   

В прошлый раз мы сделали несколько радио-кнопок, которые автоматически объединялись в одну группу. Сейчас рассмотрим, как создавать несколько независимых групп радио-кнопок... подробнее

Кол. просмотров: общее - 3515 сегодня - 0



  WWW.COMPROG.RU - 2009-2012 | Designed and Powered by Zaipov Renat | Projects