El control de la pantalla en Pascal se hace mediante las funciones y procedimientos definidos en la unidad WinCrt. Es por esto que en cada programa es utilizada la unidad WinCrt (Crt en Free Pascal).
Ejemplo:
- Por defecto, el titulo de una ventana es el nombre del archivo comenzando por su ruta de acceso, para modificarlo ponemos en la variable predefinida (Tabla de 80 caracteres) de la unidad WinCrt: WindowTitle utilizando el procedimiento de la unidad Strings: StrCopy.
- Y para cerrar la ventana al finalizar la ejecución del programa recurrimos al procedimiento DoneWinCrt.
Para desplazar el cursor utilizamos el procedimiento GotoXY
Veamos un ejemplo
Program Gestión;
Uses WinCrt, Strings;
Begin
StrCopy(WindowTitle, 'GESTION DE STOCK');
GotoXY (20, 10); (* Linea 10 columna 20 *)
Write ('*');
Readln;
DoneWinCrt;
End.
PD: El
artículo original fue escrito por ZOUARI, contribuidor de
CommentCaMarche
? controladores de pantalla