Tecnología de la Información y la Comunicación : CALCULADORA SIMPLE LAZARUS

Proceso de descarga e instalación de Lazarus:

Versión 1.2.6 para Windows (utilizada para el ejemplo en este artículo):

1. Dirigirse al siguiente enlace para descargar la aplicación: http://www.lazarus-ide.org/

2. Presionar el botón “Download Now” (descargar ahora):

3. Descargar el archivo y guardarlo en la ubicación elegida:

4. Una vez descargado, se procede a instalarlo:

a). Seleccionar el idioma de la aplicación:

b). Aparece el asistente de instalación; luego se presiona el botón “Siguiente”:

c). Seleccionar la carpeta de destino donde se instalará la aplicación; luego se presiona el botón “Siguiente”:

d). Seleccionar los componentes a instalar; y luego se presiona el botón “Siguiente”:

e). Seleccionar la carpeta del menú inicio; luego se presiona el botón “Siguiente”:

f). Seleccionar tareas adicionales; y luego presionar el botón “Siguiente”:

g). Se prosigue a presionar el botón “Instalar”:

h). Progreso de la instalación:

i). Fin de la instalación; se presiona el botón “Finalizar”: Lazarus_9

Ejemplo en Lazarus

¿Cómo crear un proyecto?

1). Se inicia la aplicación, y aparece la siguiente pantalla:

2). Luego se muestra el entorno integrado de desarrollo (IDE) de Lazarus. Es importante acotar que en el momento en que inicia Lazarus, ya se carga un proyecto por defecto:

Donde se pueden observar los componentes:

Inspector de Objetos (permite ver y modificar las propiedades de los componentes (incluidos los formularios):

Formularios (componente principal del desarrollo de aplicaciones Windows en Delphi):

Editar el código fuente (como su nombre lo indica, sirve para editar el código fuente de programas informáticos):

3). Pero en caso de crear un nuevo proyecto, se debe dirigir a la barra de menú y seleccionar en Proyecto la opción Nuevo Proyecto:

Se selecciona la opción “Aplicación” y posteriormente se presiona “Aceptar”, y posteriormente aparecerán las ventanas de formulario y editor de código fuente.

4). Se puede observar en la barra de herramientas, cada una de las opciones que se podrán utilizar para crear una aplicación:

5). En este caso particular, planteo como ejemplo de proyecto, crear una especie de calculador mediante el cual se puedan realizar las operaciones aritméticas básicas (suma, resta, multiplicación y división) entre dos números enteros introducidos por el usuario.

6). Comenzando a diseñar el formulario, se procede a colocar una etiqueta de texto (TLabel) que servirá de título a la aplicación. Dicha etiqueta se selecciona de la barra de herramientas haciendo doble clic sobre él, y automáticamente aparece en el formulario:

La posición del campo es a gusto del usuario.
7). En el componente Inspector de Objetos se le puede cambiar el nombre a la etiqueta:

En este caso el nombre asignado es “Calculando”.

8). Igualmente se puede cambiar el tipo de letra y el tamaño:

9). Así mismo se procede a agregar tres etiquetas de texto más, representando la descripción de los campos donde se introducirán los números (NUMERO_ENTERO_1, NUMERO_ENTERO_2) y donde se obtendrá el resultado (RESULTADO). Igualmente se le cambia el nombre a la etiqueta en el componente Inspector de Objetos (tal como se mostró en el paso 7):

10). Luego se procede a agregar los campos de texto (TEdit) correspondientes, igualmente se selecciona de la barra de herramientas y se presiona doble clic sobre él para anexarlo al formulario:

De igual forma se le cambia el nombre (en la opción Name de las Propiedades del componente Inspector de Objetos) que trae por defecto (Edit1, Edit2, Edit3…..); en este caso los nombres que se le dan a los campos son: num1 (NUMERO_ENTERO_1), num2 (NUMERO_ENTERO_2), num3 (RESULTADO).

Y la opción de “Text” de cada TEdit se dejará en blanco:

11). Posteriormente se colocan los botones que representarán cada una de las operaciones aritméticas, seleccionando de la barra de herramientas la opción “TButton”, presionando doble clic sobre él para anexarlo al formulario:

Y cambiándole el nombre a cada botón:

12). Ahora se procede a agregar en el Editor de código fuente la declaración de las variables y las instrucciones a utilizar:

En el caso de SUMAR:

– Se declaran las variables de tipo entero:
var
numero1, numero2, suma : integer;
– Luego en begin:

Se utiliza la función “val”, que permite convertir un string (como el texto del Edit) en valor numérico. Su formato es el siguiente:

val( variable_string, variable_numérica(que almacenará el string) ):

De manera que al tener un Edit1 y en él se coloca un número, para convertir ese número que se encuentra en el Edit como un texto o string, será necesario escribir en el código del programa lo siguiente:

val(num1.Text, numero1);
val(num2.Text, numero2);

La función entonces cambiará el valor que se encuentra en el num1.Text y num2.Text (respectivamente) a un valor numérico y lo almacenará en la variable numero1 y numero2 (respectivamente).

Se procede a especificar la operación de la sumatoria de los dos números:

suma:= numero1 + numero2;

Por último se coloca específica donde se mostrará el resultado de la suma (num3 (RESULTADO)). Por lo tanto, para poder almacenar el resultado en num3 que es de tipo string, se debe convertir de número a string por medio de la función IntToStr. Especificando entonces que el nombre del campo contendrá el resultado de la suma convertido de número a string:

num3.Text:= IntToStr(suma);

Ejemplo de la funcionalidad SUMAR:

Para probar esta funcionalidad de la aplicación es necesario pulsar el botón de Ejecutar en la barra de herramientas:

Y posteriormente aparecerá en la Ventana de Mensajes si el proyecto se ha ejecutado correctamente (en caso de no tener errores):

Hecho esto, entonces si se procede a hacer la prueba:
– El usuario ingresa dos números enteros y pulsa SUMAR

En el caso de RESTAR: Se aplica el mismo procedimiento de SUMAR:

– Se declaran las variables de tipo entero:
var
numero1, numero2, resta : integer;
– Luego en begin:

Se utiliza la función “val”, que permite convertir un string (como el texto del Edit) en valor numérico. Su formato es el siguiente:

val( variable_string, variable_numérica(que almacenará el string) ):

val(num1.Text, numero1);
val(num2.Text, numero2);

La función entonces cambiará el valor que se encuentra en el num1.Text y num2.Text (respectivamente) a un valor numérico y lo almacenará en la variable numero1 y numero2 (respectivamente).

Se procede a especificar la operación de la resta de los dos números:

resta:= numero1 – numero2;

Por último se coloca específica donde se mostrará el resultado de la resta (num3 (RESULTADO)). Por lo tanto, para poder almacenar el resultado en num3 que es de tipo string, se debe convertir de número a string por medio de la función IntToStr. Especificando entonces que el nombre del campo contendrá el resultado de la resta convertido de número a string:

num3.Text:= IntToStr(resta); Ejemplo_15_resta

Ejemplos de la funcionalidad RESTAR:

Para probar esta funcionalidad de la aplicación es necesario pulsar el botón de Ejecutar en la barra de herramientas:

Y posteriormente aparecerá en la Ventana de Mensajes si el proyecto se ha ejecutado correctamente (en caso de no tener errores):

Hecho esto, entonces si se procede a hacer la prueba:
– El usuario ingresa dos números enteros y pulsa RESTAR

En el caso de MULTIPLICAR: Se aplica el mismo procedimiento de las anteriores:

– Se declaran las variables de tipo entero:
var
numero1, numero2, multiplicacion: integer;
– Luego en begin:

Se utiliza la función “val”, que permite convertir un string (como el texto del Edit) en valor numérico. Su formato es el siguiente:

val( variable_string, variable_numérica(que almacenará el string) ):

val(num1.Text, numero1);
val(num2.Text, numero2);

La función entonces cambiará el valor que se encuentra en el num1.Text y num2.Text (respectivamente) a un valor numérico y lo almacenará en la variable numero1 y numero2 (respectivamente).

Se procede a especificar la operación de la multiplicación de los dos números:

multiplicacion:= numero1 * numero2;

Por último se coloca específica donde se mostrará el resultado de la multiplicación (num3 (RESULTADO)). Por lo tanto, para poder almacenar el resultado en num3 que es de tipo string, se debe convertir de número a string por medio de la función IntToStr. Especificando entonces que el nombre del campo contendrá el resultado de la multiplicación convertido de número a string:

num3.Text:= IntToStr(multiplicacion);

Ejemplos de la funcionalidad MULTIPLICAR:

Para probar esta funcionalidad de la aplicación es necesario pulsar el botón de Ejecutar en la barra de herramientas:

Y posteriormente aparecerá en la Ventana de Mensajes si el proyecto se ha ejecutado correctamente (en caso de no tener errores):

Hecho esto, entonces si se procede a hacer la prueba:
– El usuario ingresa dos números enteros y pulsa MULTIPLICAR

En el caso de DIVIDIR: Se aplica el mismo procedimiento de las anteriores:

– Se declaran las variables de tipo entero:
var
numero1, numero2, division: integer;
– Luego en begin:

Se utiliza la función “val”, que permite convertir un string (como el texto del Edit) en valor numérico. Su formato es el siguiente:

val( variable_string, variable_numérica(que almacenará el string) ):

val(num1.Text, numero1);
val(num2.Text, numero2);

La función entonces cambiará el valor que se encuentra en el num1.Text y num2.Text (respectivamente) a un valor numérico y lo almacenará en la variable numero1 y numero2 (respectivamente).

Se procede a especificar la operación de la división de los dos números; en este caso el operador aritmético a utilizar es Div:

division:= numero1 Div numero2;

Por último se coloca específica donde se mostrará el resultado de la división (num3 (RESULTADO)). Por lo tanto, para poder almacenar el resultado en num3 que es de tipo string, se debe convertir de número a string por medio de la función IntToStr. Especificando entonces que el nombre del campo contendrá el resultado de la división convertido de número a string:

num3.Text:= IntToStr(division);