Обучающая программа "Графика" программированию в графическом режиме на языке turbo-pascal 7.x
Дипломная работа - Компьютеры, программирование
Другие дипломы по предмету Компьютеры, программирование
*
4Ответ неверный. Достаточно установить параметр Top=False процедуры 002
Bar3D. Дополниетльные меры излишне.
*
*
051Ответ неверный. Процедура DrawPoly построит звезду с одной невидимой002
гранью. Цвет фигуры будет соответствовать цвету фона.
*
2Ответ неверный. Цвет фигуры будет соответствовать цвету фона и будет002
белым только в случае, когда фон экрана белый.
*
3Ответ правильный. 005
*
4Ответ правильный. Однако, закраска белым цветом возможна и 004
по умолчанию.
*
*
061Ответ правильный. 005
*
2Ответ неверный. Функция GetModeName возвращает строковое название 002
требуемого графического режима для текущего адаптера.
*
3Ответ неверный.Функция GetMaxMode возвращает максимальный номер 002
графического режима для текущего адаптера.
*
4Ответ неверный. Процедура GetModeRange выдает справку о диапазоне 002
номеров графических режимов заданного графического адаптера.
*
*
071Ответ неверный. Такая возможность существует. 002
*
2Ответ правильный. 005
*
3Ответ неверный. Данные процедуры возвращают максимально возможные 002
для текущего драйвера и режима графические позиции курсора.
*
4Ответ неверный. Процедура MoveRel смещает курсор относительно его 002
текущей позиции.
*
*
1081Ответ неверный. Рисунок будет иметь следующий вид: 002
*
2 2Ответ неверный.Рисунок будет иметь следующий вид: 002
*
3Ответ правильный. 005
*
3 4Ответ неверный. рисунок будет иметь следующий вид: 002
*
*
091Ответ неверный. 002
*
2Ответ неверный. 002
*
3Ответ правильный. 005
*
4Ответ неверный. 002
*
*
101Ответ правильный. 005
*
2Ответ неверный. 002
*
3Ответ неверный. 002
*
4Ответ неверный. 002
*
*
0
УПРАВЛЕНИЕ ЦВЕТОМ И СТИЛЕМ ИЗОБРАЖЕНИЙ
В данном разделе мы рассмотрим возможности управления цветовой
палитрой и стилем рисования.
* procedure GetPalette(var PaletteType);
Возвращает текущую плитру и количество цветов в ней. Применя-
ется только в графическом режиме и только с драйверами EGA, EGA 64
и VGA.
* procedure SetAllPalette(var Palette);
Меняет все цвета палитры на заданные. Переменная без типа
Palette в первом байте содержит число N- количество цветов в палитре
а в последующих N байах - коды задаваемых цветов. Если задана вели-
чина -1, то исходный цвет остается без изменений.
* procedure SetPalette(NumberColor:word;Color:byte);
Изменяет один из цветов палитры. NumberColor - порядковый
номер изменяемого цвета. Color -код нового цвета.
* procedure SetColor(Color:word);
Устанавливает текущий цвет рисования.Color - код цвета либо
его имя. Возможные значения параметра приведены на следующем экране
УПРАВЛЕНИЕ ЦВЕТОМ И СТИЛЕМ ИЗОБРАЖЕНИЯ
_____________________________________________________________________
Имя Значение Назначение
--------------------------------------------------------------------
Black 0 черный
Blue 1 синий
Green 2 зеленый
Cyan 3 голубой
Red 4 красный
Magenta 5 фиолетовый
Brown 6 коричневый
LightGray 7 светло-серый
DarkGray 8 темно-серый
LightBlue 9 светло-синий
LightGreen 10 светло-зеленый
LightCyan 11 светло-голубой
LightRed 12 розовый
LightMagenta 13 светло-фиолетовый
Yellow 14 желтый
1White 15 белый
УПРАВЛЕНИЕ ЦВЕТОМ И СТИЛЕМ ИЗОБРАЖЕНИЯ
* procedure SetBKColor(Color:word);
Устанавливает цвет фона рисования. Color - код или имя цвета.
Для получения справок о кодах цветов, связанных с курсором и
фоном рисования, используются функции:
function GetColor:word;
function GetBKColor:word;
Факторами, определяющими стиль рисования, являются толщина и
способ выражения линий, используемых в изображениях контурных линий
и линий закраски замкнутых фрагментов рисунков.
* procedure SetLineStyle(LineStyle:word; Pattern:word;
* Thiekness:word);
Устанавливает стиль контурных линий и их толщину. Параметр
LineStyle может принимать следующие значения:
SolidLn = 0 ___________________________________________________
DottedLn = 1 ...................................................
CenterLn = 2 ._._._._._._._._._._._._._._._._._._._._._._._._._ .
DashedLn = 3 _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _
UserBitLn = 4 тип, определяемый пользователем.
Когда LineStyle=userBitLn, задается параметр Pattern - шаблон
лини?/p>