pascalabcnet/PABCNetHelp/PABCUnits/CRT/Files/CRT functions.html

56 lines
4.1 KiB
HTML
Raw Permalink Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

<HTML><HEAD><object type="application/x-oleobject" classid="clsid:1e2a7bd0-dab9-11d0-b93a-00c04fc99f9e">
<param name="Keyword" value="ClearLine">
<param name="Keyword" value="ClrScr">
<param name="Keyword" value="Delay">
<param name="Keyword" value="GotoXY">
<param name="Keyword" value="HideCursor">
<param name="Keyword" value="KeyPressed">
<param name="Keyword" value="ReadKey">
<param name="Keyword" value="SetWindowCaption">
<param name="Keyword" value="SetWindowSize">
<param name="Keyword" value="SetWindowTitle">
<param name="Keyword" value="ShowCursor">
<param name="Keyword" value="TextBackground">
<param name="Keyword" value="TextColor">
<param name="Keyword" value="WhereX">
<param name="Keyword" value="WhereY">
<param name="Keyword" value="WindowHeight">
<param name="Keyword" value="WindowWidth"></object>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251"><link rel="StyleSheet" href="../../../default.css">
</HEAD><body><H1>Подпрограммы модуля CRT</H1>
<table border=0 cellpadding=5><tr><td><code><b>procedure</b> ClearLine;</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Очищает линию на которой установлен курсор</td></tr>
<tr><td><code><b>procedure</b> ClrScr;</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Очищает экран, заполняя его текущим цветом фона</td></tr>
<tr><td><code><b>procedure</b> Delay(ms: integer);</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Делает паузу на ms миллисекунд</td></tr>
<tr><td><code><b>procedure</b> GotoXY(x, y: integer);</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Переводит курсор в координаты (x,y)</td></tr>
<tr><td><code><b>procedure</b> HideCursor;</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Скрывает курсор</td></tr>
<tr><td><code><b>function</b> KeyPressed: boolean;</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Возвращает true если была нажата клавиша. Считать символ можно спомощью функции ReadKey</td></tr>
<tr><td><code><b>function</b> ReadKey: char;</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Считыват нажатую клавишу</td></tr>
<tr><td><code><b>procedure</b> SetWindowCaption(s: string);</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Задает заголовок консольного окна</td></tr>
<tr><td><code><b>procedure</b> SetWindowSize(w, h: integer);</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Задает размеры консольного окна</td></tr>
<tr><td><code><b>procedure</b> SetWindowTitle(s: string);</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Задает заголовок консольного окна</td></tr>
<tr><td><code><b>procedure</b> ShowCursor;</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Показывает курсор если он скрыт</td></tr>
<tr><td><code><b>procedure</b> TextBackground(c: integer);</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Задает цвет фона выводимого текста</td></tr>
<tr><td><code><b>procedure</b> TextColor(c: integer);</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Задает цвет выводимого текста</td></tr>
<tr><td><code><b>function</b> WhereX: integer;</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Возвращает Х-координату курсора</td></tr>
<tr><td><code><b>function</b> WhereY: integer;</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Возвращает Y-координату курсора</td></tr>
<tr><td><code><b>function</b> WindowHeight: integer;</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Возвращает высоту экрана</td></tr>
<tr><td><code><b>function</b> WindowWidth: integer;</code>
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Возвращает ширину экрана</td></tr>
</table>
</body></HTML>