Оформление текста на экране в Паскаль
Оформление и разметку текста используют довольно редко , однако бывают случаи , когда они вам пригодятся.
Возможно , когда-нибудь вы столкнетесь с такой задачей : как оформить текст в паскале.
В данной статье вы узнаете о том , как изменить цвет текста , как добавить цветной фон , как очистить экран и т.д.
Модуль crt
Для всех ниже приведенных функций требуется подключать дополнительный модуль crt. Подключать его нужно в блоке uses :
program mypascal;
uses crt;
Если вы не подключите данный модуль , то функции по оформлению текста не будут работать.
После того , как вы его подключите , программа будет работать в новом окне размером 80×25. Представлять такое окно можно как таблица в 25 строк и 80 столбцов.
GotoXY
Когда мы выводим текст на экран , то курсор находится в координате 1,1 ( столбец-1 , строка-1 ). Но для того , чтобы изменить место положение выводимого текста , в паскале предусмотрена функция gotoxy.
program mypascal;
uses crt;
begin
gotoxy(25,5);
writeln(‘Hello’);
end.
TextColor
Стандартно , в языке программирования паскаль текст выводится строго черным цветом , но его также можно изменить. Изменить цвет текста можно командой textcolor. Чтобы изменить цвет текста требуется использовать команду textcolor(red) , а в скобках указать цвет ( например red ). В скобках можно использовать название цвета , а также код цвета.
Но стоит помнить , что команда textcolor не меняет весь текст на экране ,а только тот , который выводится после этой команды.
program mypascal;
uses crt;
begin
writeln(‘Hello’);
textcolor(green);
writeln(‘Hello’);
end.
Результат выполнения данной программы будет выглядеть примерно так :
Clrscr
Функция clrscr стирает весь текст , который был выведен на экран до использования данной функции. Также с помощью неё можно закрасить экран в определенный цвет. О том как это сделать читайте далее.
TextBackGround
Тексту также можно задавать цвет фона. Фон для текста задается командой textbackground. В скобках , в аналогии с textcolor можно указывать имя или код цвета.
program mypascal;
uses crt;
begin
writeln(‘Hello’);
textbackground(green);
writeln(‘Hello’);
end.
Результат выполнения данной программы будет выглядеть так :
С помощью данной команды можно задать фон всему рабочему окну программы,
Сделать это можно так :
program mypascal;
uses crt;
begin
textbackground(green);
clrscr;
writeln(‘Hello’);
writeln(‘Hello’);
end.
В данном случае всё окно рабочей программы будет окрашено в зеленый цвет.
Delay
С помощью команды delay можно остановить программу на определенное количество времени . Это время указывается в скобках в мкс.
Как сделать в pascal зеленый цвет тексту
Константы цветов
Навигация
Язык:
Русский
English
Используйте эти константы с подпрограммами TextColor , SetColor , SetFillStyle , а также SetPalette , SetAllPalette , и TextBackground :
Тёмные цвета
Светлые цвета
Для установки мигающего текста, добавьте константу Blink (128) к значению цвета.
См. также
- Лекция №14.1: Методы создания пользовательского интерфейса
- Таблица символов 866 (ASCII, OEM, DOS)
- TextColor
- SetColor
- SetFillStyle
Код для вставки: 
:: 
:: 
:: ГОСТ :: 
Поделиться: 
// 
Для форумов:
Для блогов:
Для Википедии:
 |
Как сделать в pascal зеленый цвет тексту
Как сделать цветной текст в PascalABC.Net?
Условно у меня есть программа:
program 123; begin writeln('Привет! '); end.Как сделать так, чтоб вывелось слово «Привет! » зелёного цвета?
Последний раз редактировалось Stilet; 24.12.2015 в 20:52 .
| Артём (Начинающий) |
| Посмотреть профиль |
| Найти ещё сообщения от Артём (Начинающий) |
Форумчанин
Регистрация: 19.03.2010
Сообщений: 409
Подключите модуль Crt или GraphABC и воспользуйтесь соответствующими командами для установки цвета текста
Есть вопросы, пишите в ЛС.
| rubius2008 |
| Посмотреть профиль |
| Найти ещё сообщения от rubius2008 |
Форумчанин
Регистрация: 26.03.2015
Сообщений: 189
Сообщение от rubius2008
Подключите модуль Crt или GraphABC и воспользуйтесь соответствующими командами для установки цвета текста
А где пример?
Моя родина там, где мой компьютер
Pascal. Как сделать цветной текст в паскале. Ну в том смысле та надпись синим, та зеленым и т д
Пример программы с вводом переменных
program colorPrct;
uses crt;
var a,b,c:real;
begin
textcolor(4);
writeln(‘Hello world’);
textcolor(15);
read(a,b,c);
end.
В скобках, после textcolor идет любое число, экспериментируйте 🙂
Похожие вопросы
Ваш браузер устарел
Мы постоянно добавляем новый функционал в основной интерфейс проекта. К сожалению, старые браузеры не в состоянии качественно работать с современными программными продуктами. Для корректной работы используйте последние версии браузеров Chrome, Mozilla Firefox, Opera, Microsoft Edge или установите браузер Atom.