IPB

> OutTextXY (процедура) (модуль Graph)
Чат
Форум
Загрузка...
 

Язык:
Русский
English

 OutTextXY (процедура)   (модуль Graph)


Посылает строку на устройство вывода.

Объявление

 Procedure OutTextXY(X, Y : Integer; TextString : String);

Режим

Real, Protected

Замечания

Отображает TextString в позиции (X, Y). Строка TextString усекается на границе области просмотра, если она слишком длинная. Если один из штриховых шрифтов активен, то строка TextString усекается на границе экрана, если она слишком длинная. Если заданный по умолчанию (растровый шрифт активен, и строка слишком длинная, чтобы поместиться на экране, то текст не отображается вообще.

Используйте OutText, чтобы вывести текст в текущей позиции указателя (CP). Используйте OutTextXY, чтобы вывести текст в любой другой точке экрана.

Процедура OutTextXY использует набор шрифтов SetTextStyle. Чтобы поддерживать совместимость кода при использовании нескольких шрифтов, используйте TextWidth и TextHeight для определения размера строки.

Процедура OutTextXY использует опции вывода, установленные SetTextJustify.

Ограничения

Нужно быть в графическом режиме.

Смотри также

Пример

Язык:
Русский
English


 { Пример программы для процедуры OutTextXY }

uses Graph;

var
  Gd, Gm : Integer;

begin
  Gd := Detect;
  InitGraph(Gd, Gm, 'X:\BP');
 if GraphResult <> grOk then
   Halt(1);
  MoveTo(0, 0);
  OutText('Inefficient');
 ReadLn;
  OutTextXY(GetX, GetY, 'Also inefficient');
 ReadLn;
  ClearDevice;
  OutTextXY(0, 0, 'Perfect!');   { Заменяет верхнюю надпись }
 ReadLn;
  CloseGraph;
end.
 
 К началу страницы 
Тэги: OutTextXY
 

Код для вставки: :: :: :: ГОСТ ::
Поделиться: //
 



-
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"