Difference between revisions of "Write/es"

From Free Pascal wiki
Jump to navigationJump to search
Line 8: Line 8:
 
<delphi>
 
<delphi>
 
PROGRAM Mostrar_Texto_en_Pantalla;
 
PROGRAM Mostrar_Texto_en_Pantalla;
USES CRT;
+
 
 
VAR
 
VAR
 +
 
variable_texto:string;
 
variable_texto:string;
  
Line 17: Line 18:
  
 
   Write ('El contenido de la variable es: ',variable_texto);
 
   Write ('El contenido de la variable es: ',variable_texto);
 
  
 
end.
 
end.
Line 30: Line 30:
 
<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>
 +
 
 
que obtiene el mismo resultado que si utilizamos
 
que obtiene el mismo resultado que si utilizamos
 +
 
<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>
  
  
 
Es frecuente combinar su uso con otras funciones como writeln, gotoxy, settexcolor, setbkcolor, chr....
 
Es frecuente combinar su uso con otras funciones como writeln, gotoxy, settexcolor, setbkcolor, chr....

Revision as of 01:17, 12 March 2009

Write De Lazarus-ccr Saltar a navegación, búsqueda

write is a keyword wich indicates some characters to put on the screen for example 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.

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


Es frecuente combinar su uso con otras funciones como writeln, gotoxy, settexcolor, setbkcolor, chr....