вопрос по процедуре GotoXY и TextAttr и

[Mister Been]

Уважаемые программисты! Подскажите пожалуйста, если кто знает
как работают процедуры GotoXY и TextAttr. Ни как не могу разобраться, читаю книгу Паскаля, как только пробую создать какую-нибудь программку получается совсем не то как надо.
И ещё, если кто знает подскажите как работает функция WhereX и WhereY и для чего
она предназначена.
Зараннее благодарен

[eoln]

GotoXY - идти в координаты (х, у)
WhereX - определить положение курсора по Х-координате(не мышь)
TextAttr - что-то не слышал

Открываем help в программе и там даже с примерами всё

[Mister Been]

Как-то мало понятно, если бы кто-нибудь привёл хоть маленький примерчик

[Artificial]

WhereX, WhereY - определяет положение курсора
Пример из RTL

Program Example7 ;
uses Cr t ;
{ Program to demonstrate the WhereX and WhereY f u n c t i o n s . }
begin
Writeln ( ’ Cursor post ion : X= ’ ,WhereX, ’ Y= ’ ,WhereY ) ;
end .

GotoXY - перемещает тот самый Курсор на координаты X,Y
X - 1..80, y - 1..25
Простой пример из того же RTL:

Program Example6 ;
uses Cr t ;
{ Program to demonstrate the GotoXY f u n c t i o n . }
begin
ClrScr ;
GotoXY(10 ,10) ;
Write ( ’ 10 ,10 ’ ) ;
GotoXY(70 ,20) ;
Write ( ’ 70 ,20 ’ ) ;
GotoXY(1 , 22 ) ;
end.

GotoXY(79,1); Write('A'); - Напишет Букву A в правом верхнем углу.
Если назнаешь, что такое RTL - C:\FPC\2.2.0\doc\RTL.PDF (Содержит все ф-ции)

[Mister Been]

А TextAttr что за такая функция, и чо делает

[eoln]

TextAttr (variable) (Crt unit)
Stores currently selected text attributes
The text attributes are normally set through calls to TextColor and
TextBackground.
However, you can also set them by directly storing a value in TextAttr.

See also:
CRT.TPU

------------------------------------------------------
TextAttr (ПЕРЕМЕННАЯ) (устройство Видео)
Хранит к настоящему времени выбранные текстовые атрибуты
Текстовые атрибуты нормально установлены через вызовы на TextColor и TextBackground.
Тем не менее, Вы можете также установить им непосредственно храня величину в TextAttr.

Смотри также:
CRT.TPU
------------------------------------------------------
Значит с цветом работает - тип byte (и не функция, а переменная)
З.Ы. Переводил не я - Сократ

[Mister Been]

А какой-нибудь примерчик, а то всё на теории.
И немного больше объяснения, а то всё как-то сжато

[B_N]

Mister Been, если нужно "больше объяснения" - открывайте книгу. Их по паскалю достаточное количество, например здесь. Не стоит злоупотреблять вниманием к своим вопросам. И не стоит заниматься кросспостингом.

[Serge_Bliznykov]

1) полностью согласен с B_N - читать и ещё раз читать!!! если что-то конкретное непонятно - можете спрашивать. Только КОНКРЕТНО.

2) выкладываю пример использования GotoXY и TextAttr в реальной программе - программе форматирования текстов TextFormatter

p.s. crtfix116.zip - это для исправления ошибки
"Runtime error 200 ..." в .EXE/.TPU