Pascal/Turbo Pascal - leer variables desde la graph

Pues eso.Si sabeis como se hace para leer variables desde el teclado en entorno gráfico GRAPH

Pues ni mas ni menos que de la misma manera que en modo texto, claro que no es muy elegante y el cursor aparece invisible, tendrias que escribir una funcion que lo haga.

Mira, lo que tienes que hacer es construir una función que utilice ciclo REPEAT y usar la instrucción READKEY para leer caracter por caracter, los cuales deberás ir concatenando en una variable STRING a fín de obtener el texto completo, esta es la cadena que mostrarás cada vez que agregas un nuevo caracter usando

OUTTEXTXY(X,Y,<variable_string>);

donde X y Y maracan la posición de tu texto, estas no deben modificarse o te encimará mal el texto.

Espero que te sirva

Por cierto, el ciclo lo detienes utilizando el caracter #13 (ENTER) o #27 (ESC) para aceptar o cancelar, por lo tanto, justo después de leer el caracter, debes comparar si es alguno de estos caracteres, si no lo es, entonces concatenas y vuelves a leer, de lo contrario, no lo agregas y sales del ciclo, si es #13, devuelves la cadena, si es #27, devuelves una cadena vacía ( '' ).

Suerte.