Адаптация MS—DOS—программ к работе в среде Windows 243

10.2.2. Процедуры и функции

Procedure AssignCRT(var F: Text)

Связывает содержимое файловой переменной F с виртуальным экраном.

Procedure CIrEOL

Очищает строку от текущего положения курсора до конца строки.

Procedure CIrScr

Очищает виртуальное окно.

Procedure CursorTo(X,Y: Integer)

Переводит курсор в заданную точку виртуального экрана. Начало отсчета соответствует точке 0,0.

Procedure DoneWinCRT

Уничтожает окно вывода программы. Эта процедура автоматически вызывается при закрытии окна.

Procedure GotoXY(X,Y: Integer)

Переводит курсор в нужную точку окна. Начало отсчета соответствует точке 1,1.

Procedure InitWinCRT

Создает виртуальное окно вывода. Эта процедура автоматически вызывается при первом обращении программы к функциям текстового вывода.

Function KeyPressed: Boolean

Возвращает True, если буфер ввода содержит хотя бы один непрочитанный символ.

Function ReadBuf(Buf: PChar; Count: Word): Word

Читает до Count символов из клавиатуры в память, на которую указывает Buf, и возвращает количество действительно прочитанных символов.

Function ReadKey: Char

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

Procedure ScrollTo(X,Y: Integer)

Смещает содержимое окна так, чтобы его левый верхний угол соответствовал точке X,Y (начало отсчета 0,0).

Procedure TrackCursor

Смещает содержимое окна такг чтобы в нем стал виден курсор.

Function WhereX: Byte

Возвращает текущую абсциссу курсора (начало отсчета 1,1).