Краткая справка по языку программирования Turbo Pascal


         

Краткая справка по языку программирования Turbo Pascal


Константы, определяющие графический режим

Графический драйвер

Константа режима

Растр

Палитра

Число страниц

Имя

Значение

Имя

Значение

CurrentDriver*

-128

Detect

0

CGA

1

CGACO

0

320х200

СО

1

CGAC1

1

320х200

С1

1

CGAC2

2

320х200

С2

1

CGAC3

3

320х200

СЗ

1

CGAHl

4

640х200

2 цвета

1

MCGA

2

MCGACO

0

320х200

СО

1

MCGAC1

1

320х200

С1

1

MCGAC2

2

320х200

С2

1

MCGAC3

3

320х200

СЗ

1

MCGAMed

4

640х200

2 цвета

1

MCGAHi

5

640х480

2 цвета

1

EGA

3

EGALo

0

640х200

16 цветов

4

EGAHi

1

640х350

16 цветов

2

EGA64

4

EGA64Lo

0

640х200

16 цветов

1

EGA64Hi

1

640х350

4 цвета

1

EGAMono

5

EGAMonoHi

3

640х350

2 цвета

1**

EGAMonoHi

3

640х350

2 цвета

2***

IBM8514

6

IBM8514Lo

0

640х480

256 цветов

1

IBM8514Hi

1

1024х768

256 цветов

1

HercMono

7

HercMonoHi

0

720х348

2 цвета

2

ATT400

8

ATT400CO

0

320х200

СО

1

ATT400C1

1

320х200

С1

1

ATT400C2

2

320х200

С2

1

ATT400C3

3

320х200

СЗ

1

ATT400Med

4

640х200

2 цвета

1

ATT400Hi

5

640х400

2 цвета

1

VGA

9

VGALo

0

640х200

16 цветов

2

VGAMed

1

640х350

16 цветов

2

VGAHi

2

640х480

16 цветов

1

PC3270

10

PC3270Hi

0

720х350

2 цвета

1

* используется в процедуре GetModeRange

** 64 К на EGAMono-карте

*** 256К на EGAMono-карте

Прочие константы

Имя

Тип

Значение

Использование

Примечание

TopOn

boolean

True

Определяют, изображать ли верхнюю грань в процедуре Bar3D Изображать

TopOff

boolean

False

Не изображать

NormalPut

word

0

Определяют способ наложения изображения при выводе процедурой Putlmage Изображение

заменяется новым

CopyPut

word

0

 

XORPut

word

1

по логике ХОР

OrPut

word

2

по логике OR

AndPut

word

3

по логике AND

NotPut

word

4

по логике NOT

ClipOn

boolean

True

Определяют, отсекать ли изображение за пределами визуального порта, устанавливаемого процедурой SetViewPort Отсекать изображение

ClipOff

boolean

False

Выводить изображение

Black

word

0

Установка цвета в процедурах SetColor, SetBkColor, PutPixel Черный

Blue

word

1

Синий

Green

word

2

Зеленый

Cyan

word

3

Циан (цвет морской волны)

Red

word

4

Темно-красный

Magenta

word

5

Пурпурный

Brown

word

6

Коричневый

LightGray

word

7

Светло-серый

DarkGray

word

8

Темно-серый

LightBlue

word

9

Голубой

LightGreen

word

10

Ярко-зеленый

LightCyan

word

11

Светлый циан

LightRed

word

12

Ярко-красный

LightMagenta

word

13

Ярко-пурпурный

Yellow

word

14

Желтый

White

word

15

Белый

EGABIack

word

0

Установка цветов при работе с монитором IBM 8514 Черный

EGABlue

word

1

Синий

EGAGreen

word

2

Зеленый

EGACyan

word

3

Циан

EGARed

word

4

Темно-красный

EGAMagenta

word

5

Пурпурный

EGABrown

word

20

Коричневый

EGALightgray

word

7

Светло-серый

EGADarkgray

word

56

Темно-серый

EGALightblue

word

57

Голубой

EGALightgreen

word

58

Ярко-зеленый

EGALightcyan

word

59

Светлый циан

EGALightred

word

60

Ярко-красный

EGALightmagenta

word

61

Ярко-пурпурный

EGAYellow

word

62

Желтый

EGAWhite

word

63

Белый

SolidLn

word

0

Определение шаблона начертания линии в процедурах GetLineSettings

и SetLineStyle

Сплошная

Dotted Ln

word

1

Точечная

CenterLn

word

2

Пунктирная

DashedLn

word

3

Штриховая

UserBitLn

word

4

Определенная пользователем

EmptyFill

word

0

Для установки шаблонов закраски в процедурах GetFillSettings, SetFillStyle

Цвет фона

SolidFill

word

1

Цвет рисунка

LineFill

word

2

Горизонт. штриховка

LtSlashFill

word

3

Штриховка /////

SlashFill

word

4

Утолщ. штриховка

BkSlashFill

word

5

Утолщ. штриховка

LtBkSlashFill

word

6

Расплывчатая штр.

HatchFill

word

7

Решетка

XHatchFill

word

8

Косая решетка а

InterleaveFill

word

9

Частое переплетение

WideDotFill

word

10

Редкие точки

CloseDotFill

word

11

Частые точки

UserFill

word

12

Шаблон, определенный пользователем

LeftText

word

0

Установка способа привязки текста к точке вывода по горизонтали и вертикали Левым краем

CenterText

word

1

По центру

RightText

word

2

Правым краем

BottomText

word

0

Нижним краем

CenterText

word

1

По центру

TopText

word

2

Верхним краем

NormWidth

word

1

Определение толщины линий в процедурах GetLineSettings и SetLineStyle Одинарная

ThickWidth

word

3

Тройная

DefaultFont

word

0

Определение шрифта для текста в процедурах SetTextStyle и GetTextSettings Матричный шрифт

TriplexFont

word

1

Триплекс

Small Font

word

2

Мелкий шрифт

SansSerifFont

word

3

Сан-сериф

GothicFont

word

4

Готический

HorizDir

word

0

Определение направления текста в процедурах SetTextStyle и GetTextSettings Горизонтальное

VertDir

word

1

Вертикальное

UserCharSize

word

0

Определение размера шрифта для процедур SetTextStyle и GetTextSettings Размер, определенный пользователем



Содержание  Назад  Вперед