Write/es

From Lazarus wiki
Revision as of 00:24, 12 March 2009 by Jma sp (talk | contribs)
Jump to navigationJump to search

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.

<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

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