Вопрос № 79515: Здраствуйте.
Подскажите, пожалуйста, как в TurboPascal 7 сделать символы разного цвета. И где можно почитать о работе Паскаля с Асемблером?...
Вопрос № 79.515
Здраствуйте.
Подскажите, пожалуйста, как в TurboPascal 7 сделать символы разного цвета. И где можно почитать о работе Паскаля с Асемблером?
Отправлен: 23.03.2007, 15:24
Вопрос задал: Alxx (статус: Посетитель)
Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 3)
Отвечает: Gh0stik
Здравствуйте, Alxx!
Расцветку можно поменять так:
Меню OptinonsEnvironmentColors... в окне в колонке Groups ищем строку Syntax и соответственно в колонке Item настраиваем устанавливаем нужный цвет для цифр и т.д.
Good Luck!!!
--------- Господь Бог - это всего лишь сверхмощный генератор случайных чисел, в соответствии с которыми сочетаются события на Земле. Генератор случайных чисел - и только.
Ответ отправил: Gh0stik (статус: Профессионал) Украина, Славянск Организация: Славянский государственный педагогический университет (Кафедра алгебры) ICQ: 289363162 ---- Ответ отправлен: 23.03.2007, 15:36 Оценка за ответ: 5
Отвечает: Andreev Oleg
Здравствуйте, Alxx!
Для работы с цветом в текстовом режиме используется модуль crt;
в своей программе указываете uses crt;
и затем можете использовать процедуры и функции этого модуля (их описание есть в встроенном хелпе turbo pascal-a)
Вот несколько основных:
procedure TextColor(Color: Byte); установка цвета выводимого текста
procedure TextBackground(Color: Byte); установка цвета фона
procedure ClrScr; очистка экрана
...
Ответ отправил: Andreev Oleg (статус: 3-ий класс)
Ответ отправлен: 23.03.2007, 15:55 Оценка за ответ: 5
Отвечает: Nazar_D
Здоров, Alxx!
Якщо ти маєш на увазі кольори символів при виведенні на екран через оператор writeln, то це робиться оператором
textcolor (color), де може змінна color має бути з набору green, white, red і т.д. (поекспериментуй).
Так само існує оператор textbacground(color) для зміни кольору фону вікна виконання програми
Ответ отправил: Nazar_D (статус: Заблокирован)
Ответ отправлен: 23.03.2007, 22:23 Оценка за ответ: 5