TURBO PASCAL

Новости

Программы   

Turbo Pascal 

Игры

Документация   

Странности

FAQ

Ссылки

Форум

Гостевая книга

Рассылка

Благодарности

Об авторе

 

 

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).

Function WhereY: Byte

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

Procedure WriteBuf(Buf: PChar; Count: Word) Выводит в окно Count символов из буфера Buf.

Procedure WriteChar(Ch: Char)

Выводит в текущую позицию окна символ Ch.

 

 Глава 10

Оглавление

На первую страницу

Rambler's Top100 Rambler's Top100
PROext: Top 1000

(с)Все права защищены

По всем интересующим вопросам прошу писать на электронный адрес

Hosted by uCoz