Gestão de tela em 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.
Este documento, intitulado 'Gestão de tela em Pascal', está disponível sob a licença Creative Commons. Você pode copiar e/ou modificar o conteúdo desta página com base nas condições estipuladas pela licença. Não se esqueça de creditar o CCM (br.ccm.net) ao utilizar este artigo.
Assine nossa newsletter!
