[ Acima ]

[ Voltar ] [ Avançar ]
Unit CRT: TextBackground

Objetivo:
Seleciona a cor de fundo.

Sintaxe:
TextBackground(cor_de_fundo);
Onde: cor_de_fundo é um número entre 0 e 8 que corresponde à cor de fundo desejada.
Você pode utilizar uma das seguintes constantes pré-definidas ao invés do número:

Número

 Constante Cor
0 BLACK Preto
1 BLUE Azul
2 GREEN Verde
3 CYAN Azul-marinho
4 RED Vermelho
5 MAGENTA Laranja
6 BROWN Marrom
7 LIGHTGRAY Cinza-claro
8 DARKGRAY Cinza-escuro

Veja também:

TextColor; HighVideo; NormVideo; LowVideo

Exemplo:

 
Uses CRT;
 
Begin
 
   { Caracteres verdes sobre fundo preto } 
   TextColor(Green); 
   TextBackground(Black); 
   WriteLn('Ei você!');
 
   { Caracteres vermelho-claro piscantes sobre fundo cinza } 
   TextColor(LightRed+Blink); 
   TextBackground(LightGray); 
   WriteLn('Olá');
   { Caracteres amarelos sobre fundo azul } 
   TextColor(14);           { Amarelo (Yellow) = 14 } 
   TextBackground(Blue); 
   WriteLn('Tudo bem?');
   NormVideo; { Atributos de cor originais } 
   WriteLn('De volta ao normal!');   
   Write('Pressione <Enter> para sair...'); 
   ReadLn; 
End.
[ Acima ]

[ Voltar ] [ Avançar ]