[ Voltar ] [ Avançar ]

Objetivo:
Apaga a janela ativa (utilizando a cor de fundo atual) e coloca o cursor no canto superior esquerdo.

Veja também:

ClrEol; Window

Exemplo:

Uses CRT;

Begin

   TextBackGround(LightGray); { Muda cor de fundo para cinza-claro }
   TextColor(Black);          { Muda cor da letra para preto }

   { A próxima linha apaga a tela utilizando a cor de fundo especificada. 

     A cor da letra passa a ser preto sobre o fundo cinza claro } 

   ClrScr;   

   ReadLn;

End.

[ Voltar ] [ Avançar ]