TURBO PASCAL

Новости

Программы   

Turbo Pascal 

Игры

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

Странности

FAQ

Ссылки

Форум

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

Рассылка

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

Об авторе

 

 

10.2.1. Переменные модуля WinCRT

WindorfOrg: TPoint

Содержит начало координат виртуального окна. По умолчанию — 0,0.

WindowSize: TPoint

Содержит начальный размер окна.

ScreenSize: TPoint

Содержит размер экрана в символах. Начальное значение:

ScreenSize.X = 80 ScreenSize.Y = 25

Если вывод программы содержит более ScreenSize. У строк, лишние строки будут безвозвратно потеряны, поэтому перед первым выводом на экран следует поместить в это поле подходящее значение (см. пример выше). Точно так же следует настроить ScreenSize,X, если на экран выводятся длинные строки.

Cursor: TPoint

Содержит текущую позицию курсора. Левый верхний угол окна соответствует координатам 0,0. Это поле доступно только для чтения, его значение меняется при обращении к CursorTo или GotoXY.

Origin: TPoint

Содержит координаты левого верхнего угла окна просмотра относительно границ виртуального экрана. Поле доступно только для чтения, его значение меняется при обращении к процедуре ScrolITo.

InactiveTitle: PChar

Содержит указатель на строку символов, использующуюся в качестве заголовка для неактивного окна (т.е. окна после окончания работы программы).

AutoTracking: Boolean

Управляет «прокруткой» содержимого окна: если содержит True, окно автоматически сдвигает свое содержимое при выходе вывода за границы, если False — прокрутка запрещена. В неактивном окне можно использовать управляющие полосы для просмотра вывода даже в том случае, когда AutoTracking = False — окно просмотра меняет свое положение в пределах ScreenSize.

CheckEOF: Boolean

Содержит True, если программа обнаружила конец файла.

CheckBreak: Boolean

Содержит True, если пользователь нажал Ctrl—Break.

WindowTitle: array [0..79] of Char

Содержит заголовок активного окна (т.е. окна в момент работы программы).

 

 Глава 10

Оглавление

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

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

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

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

Hosted by uCoz