La Web del Programador: Comunidad de Programadores
 
    Pregunta:  15332 - COMO ESCRIBIR VARIABLES EN MODO GRáFICO(TURBO PASCAL 7 )
Autor:  Erick gordón
deseo saber como puedo escribir variables enteras, reales en modo gráfico en turbo pascal 7.0 de borland.
que función debo usar, pues cuando trabajo en ms-dos yo escribo las variables con write( variable) pero en modo gráfico no puedo utilizar
write cual es la funcion que debo usar.

  Respuesta:  Dabiz Spuch Calvar
La instrucción write envía datos a un fichero, si no indicas ninguno toma por defecto la consola de salida. Para dibujar texto en modo gráfico debes usar la instrucción OutTextXY (CoordenadaX, Coordenada Y, Texto). Para escribir números debes transformarlos a string antes de usar OutTextXY.

El siguiente procedimiento dibuja texto centrado en las coordenadas XY en una fuente y tamaño seleccionados:

procedure TextoCentroXY (Texto:String; x, y:word);
begin
SetTextStyle (8, HorizDir, 0);
SetUserCharSize (1,3,1,2);
SetTextJustify (CenterText, CenterText);
SetColor (Color);
OutTextXY (x,y,Texto);
end;

Un saludo.