Difference between revisions of "Write/es"
Line 37: | Line 37: | ||
Estos últimos ejemplos imprimen en pantalla lo siguiente: | Estos últimos ejemplos imprimen en pantalla lo siguiente: | ||
− | '''La letra X se puede imprimir como se ve en este ejemplo: X | + | '''La letra X se puede imprimir como se ve en este ejemplo: X''' |
− | ''' | + | |
Además permite el formateado de los datos a imprimir, siendo muy útil a la hora de generar columnas numéricas. | Además permite el formateado de los datos a imprimir, siendo muy útil a la hora de generar columnas numéricas. | ||
Supongamos que tenemos una variable de tipo real con valor 3.14159 llamada numero, entonces si escribimos: | Supongamos que tenemos una variable de tipo real con valor 3.14159 llamada numero, entonces si escribimos: | ||
Line 73: | Line 73: | ||
Se observa por tanto que podemos escoger el número de decimales a imprimir. | Se observa por tanto que podemos escoger el número de decimales a imprimir. | ||
− | Es frecuente combinar el uso de write con otras funciones como writeln, gotoxy, settexcolor, setbkcolor,....... | + | Es frecuente combinar el uso de write con otras funciones como writeln, gotoxy,settexcolor, setbkcolor,....... |
Revision as of 02:00, 12 March 2009
write es un procedimiento que indica que se muestren algún/nos caracteres en la pantalla. Para ello se sitúa lo que queremos mostrar entre los paréntesis, pudiendo ser tanto texto directamente, como texto representado por una variable.
<delphi> PROGRAM Mostrar_Texto_en_Pantalla;
VAR
variable_texto:string;
begin
variable_texto:='Esto es lo que contiene la variable';
write ('El contenido de la variable es: ',variable_texto);
end. </delphi> Imprime lo siguiente:
El contenido de la variable es: Esto es lo que contiene la variable
También podemos imprimir en pantalla un carácter con su código alternativo gráfico (ALTGR+código de carácter), para ello utilizaríamos por ejemplo:
<delphi> write ('La letra X se puede imprimir como se ve en este ejemplo:' , #88); </delphi>
que obtiene el mismo resultado que si utilizamos:
<delphi> write ('La letra X se puede imprimir como se ve en este ejemplo: ',chr(88)); </delphi>
Estos últimos ejemplos imprimen en pantalla lo siguiente:
La letra X se puede imprimir como se ve en este ejemplo: X
Además permite el formateado de los datos a imprimir, siendo muy útil a la hora de generar columnas numéricas. Supongamos que tenemos una variable de tipo real con valor 3.14159 llamada numero, entonces si escribimos:
write (numero);
Obtendríamos la impresión:
3.141520000000000E+000
En cambio si escribimos:
<delphi> write (numero:1:2); </delphi> Obtendríamos esto otro:
3.14
Con: <delphi> write (numero:1:3); </delphi> Obtendríamos:
3.145
En el caso de que la variable hubiese tenido valor 3.1 habría rellenado con ceros dando los resultados:
3.10
3.100
Se observa por tanto que podemos escoger el número de decimales a imprimir.
Es frecuente combinar el uso de write con otras funciones como writeln, gotoxy,settexcolor, setbkcolor,.......