Difference between revisions of "Write/es"

From Lazarus wiki
Jump to navigationJump to search
Line 1: Line 1:
Write
+
[http://www.freepascal.org/docs-html/rtl/system/write.html write]
  
write es una palabra 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.
+
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>
 
<delphi>
Line 14: Line 14:
 
   variable_texto:='Esto es lo que contiene la variable';
 
   variable_texto:='Esto es lo que contiene la variable';
  
   Write ('El contenido de la variable es: ',variable_texto);
+
   write ('El contenido de la variable es: ',variable_texto);
  
 
end.
 
end.
Line 26: Line 26:
  
 
<delphi>
 
<delphi>
Write ('La letra X se puede imprimir como se ve en este ejemplo:' , #88);
+
write ('La letra X se puede imprimir como se ve en este ejemplo:' , #88);
 
</delphi>
 
</delphi>
  
Line 32: Line 32:
  
 
<delphi>
 
<delphi>
Write ('La letra X se puede imprimir como se ve en este ejemplo: ',chr(88));
+
write ('La letra X se puede imprimir como se ve en este ejemplo: ',chr(88));
 
</delphi>
 
</delphi>
  
Line 39: Line 39:
 
'''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.
 +
Supongamos que tenemos una variable de tipo real con valor 3.14159 llamada numero, entonces si escribimos:
  
Es frecuente combinar su uso con otras funciones como writeln, gotoxy, settexcolor, setbkcolor,.......
+
write (numero);
 +
 
 +
Obtendríamos la impresión:
 +
 
 +
3.141520000000000E+000
 +
 
 +
En cambio si escribimos:
 +
 
 +
write (numero:1:2);
 +
 
 +
Obtendríamos esto otro:
 +
 
 +
'''3.14'''
 +
 
 +
Con write (numero:1:3);
 +
 
 +
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,.......

Revision as of 01:56, 12 March 2009

write

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:

write (numero:1:2);

Obtendríamos esto otro:

3.14

Con write (numero:1:3);

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,.......