Иллюстрированный самоучитель по Turbo Pascal
Приложение 4. Стандартные библиотечные модули.
-
Модуль SYSTEM является основной библиотекой Турбо Паскаля. Он реализует подпрограммы для всех встроенных возможностей, таких как ввод/вывод, обработка строк, эмуляция арифметического сопроцессора, управление оверлеями и динамическое распределение памяти.
-
var | Input: Text; {Стандартный файл ввода} | Output: Text; {Стандартный файл вывода} | SaveInt00: Pointer; {Сохранение вектора $00} | ….. | SaveInt75: Pointer; {Сохранение вектора $75} | Input и Output – стандартные файлы, необходимые в каждой реализации языка Паскаль.
-
Модуль Dos реализует ряд очень полезных программ операционной системы и обработки файлов. Ни одна из программ модуля Dos не определена в стандартом Паскале и поэтому они размещены в собственном модуле.
-
var | DosError: Integer; | Значение, запомненное в DosError, представляет собой код ошибки операционной системы: | 0 – нет ошибки | 2 – файл не найден | 3 – путь не найден | 5 – доступ запрещен | 6 – неверный обработчик | 8 – нет памяти | 10 – неправильная среда | 11 – неправильный формат
-
Модуль CRT содержит подпрограммы управления текстовым выводом на экран дисплея, звуковым генератором и чтения клавиатуры. | В режиме текстового вывода используются следующие координаты экрана: левый верхний угол экрана имеет координаты 1.1;
-
Функции | Function KeyPressed; Boolean Возвращает True, если на клавиатуре была нажата клавиша, и False в противном случае. Не задерживает исполнение программы. | Function ReadKey: char Читает символ с клавиатуры без эхоповтора на экране.
-
Модуль Graph представляет собой мощную библиотеку графических подпрограмм универсального назначения, рассчитанную на работу с наиболее распространенными графическими адаптерами IBM-совместимых ПК. Подпрограммы модуля Graph обеспечивают различные режимы работы многорежимных адаптеров, полностью используют их цветовые возможности и разрешающую способность.
-
Константы задания драйверов и режимов работы | const | | Detect = | 0; | CGA = | 1; | MCGA = | 2; | EGA = | 3; | EGA64 = | 4; | EGAMono = | 5; | IBM8514 = | 6; | HercMono = | 7; | ATT400 = | 8; | VGA = | 9; | PC3270 = | 10; | CurrentDriver = -128;
-
type | PaletteType = record {Используется в GetPallete} | Size: Byte; | Colors: array [0..MaxColors] of Shortlnt; | end; | LineSettingsType = record {Используется в GetLineSettings} | LineStyle Word; | Pattern Word; | Thickness Word; | end; | TextSettingsType = record {Используется в GetTextSettings} | Font:Word;
-
Procedure Arc(X, Y: Integer; StAngle, EndAngle, Radius: Word) Рисует дугу радиусом Radius от начального угла StAngle к конечному EndAngle, используя X, Y как координаты центра. | Procedure Bar (X1, Y1, X2, Y2: Integer) Рисует полосу заданного размера, используя текущий стиль и цвет.
-
Procedure GetBkColor; Word Возвращает текущий фоновый цвет. | Procedure GetColor; Word Возвращает текущий цвет. | Procedure GetDriverName; String Возвращает строку с именем текущего драйвера. | Procedure GetGraphMode: Integer Возвращает текущий графический режим. | Procedure GetMaxColor;
Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.