Отправляет email-рассылки с помощью сервиса Sendsay

Программирование в Turbo PASCAL

  Все выпуски  

Программирование в Turbo PASCAL


Служба Рассылок Subscribe.Ru проекта Citycat.Ru


Служба почтовых рассылок Subscribe.Ru и проект Pascal-2000 mf company
ПРОГРАММИРОВАНИЕ В TURBO PASCAL
pascal-sub@mail.ru

  Здравствуйте уважаемые подписчики!
На сей раз немного об окнах в текстовом режиме Pascal

ОКНА В ТЕКСТОВОМ РЕЖИМЕ

   Turbo Pascal позволяет отображать информацию в рамках не всего экрана, а только в пределах его определенной части (окна). Одна из процедур позволяющих это осуществить – WINDOW модуля CRT, которая отображает на экране окно, определяемое как текущее. Заголовок данной процедуры имеет следующий вид:

WINDOW(X1,Y1,X2,Y2)

где, координаты окна (X1, Y1) и (X2,Y2) всегда отсчитываются от левого верхнего угла экрана и должны удовлетворять  условию: X1 и Y1 > 1, а X2 и Y2 < Xmax и Ymax соответственно. Так же междусобой X1<X2 и Y1<Y2. При не выполнении эти условий окно создано не будет. Xmax может принимать два значения  40 или 80 столбцов, а Ymax может принимать значение 25, 43 или 50 строк в зависимости от типа адаптера.

  Пример 1:
Программа наложения, меняющих цвет, окон.
Цвет отображаемых на экране символов устанавливается процедурой: TextColor, а цвет фона – процедура: TextBackGround, о которых более подробную информацию Вы можете получить в рассылке из архива.

Program Okna;
Uses Crt;
Var I: byte;
BEGIN ClrScr;
For I:=1 to 16 do
Begin TextBackGround(I); ClrScr;
Delay(300);
Window(I,I,I+15,I+6); end;
end.
  Пример 2:
Программа показа названия нашей рассылки "Программирование в Turbo Pascal", меняющего цвет.
Program Rassilka;
Uses Crt;
Var i: byte;
Begin ClrScr;
For i:=1 to 15 do
Begin
TextColor(i); TextBackGround(0);
{***}
GotoXY(10,i);
WriteLn('Программирование в Turbo Pascal'); Delay(250) end;
end.
* Если на месте {***} поставить процедуру ClrScr; (очистка экрана), то строчка "Программирование в Turbo Pascal" будет как бы падать вниз с изменением цвета.



Акция: "ДОЛОЙ ОШИБКИ!"

    При компиляции набранного кода или его выполнении программа Pascal выполняет проверку на наличие ошибок и выдает о них сообщения (Error...). Не все знают точно, что они означают и как с ними "бороться". Именно для них и предназначена эта акция. Теперь, если у Вас что-то не получается, а программа находит ошибку, то Вы можете прислать нам ее номер, название или весь Ваш код целиком, не забыв указать обратный e-mail, а мы со своей стороны обязательно постараемся Вам помочь:

!!!>>> Задать вопрос про "ошибку" <<<!!!

  Предлагаем Вам самим выбрать ТЕМУ для следующей рассылки. Если у Вас есть какие-либо вопросы по программированию в Pascal или же Вы наоборот хотите поделиться своими навыками, то вот наш адрес:

pascal-sub@mail.ru

   Мы ответим на ВСЕ присланные сообщения. Заранее спасибо за любые пожеланиям и рекомендациям по поводу.
 


Рассылки Subscribe.Ru
Подпиши товарища на "Программирование в PASCAL"

(Рекомендуем HTML-формат)


http://subscribe.ru/
E-mail: ask@subscribe.ru

В избранное