HOME ПРИМЕРЫ THANKS НОВИЧКАМ ДОКИ LINKS JavaScript Mail


 
В этот день много лет назад...
26 ноября. В 1580 году (444 года назад) - Гражданская война во Франции завершается признанием права гугенотов на вероисповедание.
 
 

Turbo Pascal Documentation

Процедура OutTextXY

Модуль Graph


     Функция: Пересылает строку на устройство вывода.
     Описание:  OutTextXY(Х,Y  :  integer;  текст_строка   :
string)
     Примечания: Строка, заданная параметром "текст_строка",
выводится в точке (Х,У). Если строка слишком длинная и выхо-
дит за пределы экрана или текущей области просмотра, то  она
усекается.
     Процедура OutText используется для вывода текста в мес-
те  расположения текущего указателя, процедура OutTextXY ис-
пользуется для вывода текста в любом заданном месте экрана.
     Прочее: См. также процедуры OutText, SetTextStyle, Set-
TextJustify, GetTxtSettings, TextHeight, TextWidth.
     Пример:

uses Graph;
  var
    Gd, Gm : integer;
  begin
    Gd := Detect;
    InitGraph(gd, Gm, '');
    if GraphResult <> grOk then
       Halt(1);
  MoveTo(0,0);
OutText('Неэфффективно');
  OutTextXY(GetX,GetY,'Также неэффективно');
OutTextXY(0,0,'Превосходно!');{ заменяет выведенное ранее }
Readln;
CloseGraph;
end.




HOME