
A gestão de tela é feita pelas funções e procedimentos pré-definidos da unidade
WinCrt . É por isso que, em cada programa utilizamos a unidade WinCrt (Crt em Free Pascal)
Exemplo:
- Por padrão, o título de uma janela é o nome do arquivo fonte começando pelo seu caminho de acesso, para modificá-lo colocamos na variável predefinida (Tabela com 80 caracteres) da unidade WinCrt: WindowTitle utilizando o procedimento da unidade Strings: StrCopy.
- E para fechar a janela após o término da execução do programa chamamos o procedimento DoneWinCrt.
Mas, para mover o cursor usamos o procedimento GotoXY.
Veja um exemplo ilustrativo:
Program Gestão;
Uses WinCrt, Strings;
Begin
StrCopy(WindowTitle, "GESTÃO DE ESTOQUE");
GotoXY (20, 10); (* Linha 10 coluna 20 *)
Write ('*');
Readln;
DoneWinCrt;
End.