Introducción a la programación en Gambas

Gambas es un lenguaje de programación libre derivado de BASIC (de ahí que Gambas quiera decir Gambas Almost Means Basic). Es distribuido con licencia GNU GPL. Cabe destacar que presenta ciertas similitudes con Java ya que en la ejecución de cualquier aplicación, se requiere un conjunto de librerías interprete previamente instaladas (Gambas Runtime) que entiendan el bytecode de las aplicaciones desarrolladas y lo conviertan en código ejecutable por el computador. Por otro lado, a diferencia de Java, no se experimentan ralentizaciones y es posible desarrollar grandes aplicaciones en poco tiempo. Permite crear formularios con botones de comandos, cuadros de texto y muchos otros controles y enlazarlos a bases de datos como MySQL, PostgreSQL o SQLite además de facilitar la creación de aplicaciones muy diversas como videojuegos (utilizando OpenGL), aplicaciones para dispositivos móviles (en desarrollo pero muy avanzado), aplicaciones de red (con manejo avanzado de protocolos HTTP, FTP, SMTP, DNS), entre otras. Diferencias con Visual Basic (6.0) La principal diferencia con respecto a Visual Basic 6.0 es el soporte para orientación a objetos. En Gambas, no existen los arreglos de controles -muy populares en Visual Basic- pero dispone de un elemento similar llamado group, que utilizado conjuntamente con arrays de objetos ofrecen resultados análogos. Gambas añade algunas propiedades nuevas en algunos de sus controles, como la alineación vertical/horizontal en etiquetas, o algunas propiedades gráficas en el elemento Button (Equivalente a CommandButton de Visual Basic). El acceso a bases de datos es sumamente sencillo. Gambas incluye, al igual que Visual Basic, su propio empaquetador para la distribución de aplicaciones, que permite crear incluso paquetes Deb. Los componentes suministrados en Gambas 2.0 son realmente potentes, desde una biblioteca para el manejo de documentos PDF, hasta componentes para imágenes, sockets e informes (equivalentes a Crystal reports) y otras herramientas gratuitas alternativas. Es importante señalar que prácticamente todos los proyectos desarrollados en este entorno son compatibles con versiones nuevas de Gambas, no así los hechos por Microsoft Visual Basic, es decir, por ejemplo un proyecto hecho en Microsoft Visual Basic 5.0 difícilmente funcionará en la última versión, ya que no es orientado a objetos, por lo tanto carece de herencia. Gambas es una alternativa a la programación visual ofrecida en Visual Basic para entornos GNU/Linux. Su talón de Aquiles actualmente es la imposibilidad de crear aplicaciones para Windows y Mac OS X. Aunque muchos critican la escasa documentación, existen libros completos (en español e inglés) que tratan a profundidad todos los componentes de este lenguaje de programación. Portabilidad Gambas ha sido portado a casi cualquier distribución de GNU/Linux, a excepción de Linspire en la cual hay problemas con las bibliotecas Qt. Además, ha sido portada a OpenBSD y es mantenido como un port oficial. Mientras que para sistemas operativos como Microsoft Windows o Mac, según informa la página oficial de Gambas, es posible en el primero compilar a través de Cygwin, pero muchos componentes principales como aquellos que conforman las GUI no podrán ser compiladas, y para el segundo es posible compilar sin problemas, aunque lo más probable es que al momento de la ejecución el resultante sea una falla crítica. En la página oficial se muestra el estado de la portabilidad de Microsoft Windows y Mac, y en ambos su estado tiene una calificación de «mala». Primer Programa en Gambas Vamos a iniciar gambas 2.2 en este caso: Crearemos un nuevo proyecto. Seleccionaremos un directorio donde guardar los datos de nuestro programa: Seleccionaremos un nombre para nuestro programa y un titulo, en este caso para los dos "PrimerProyecto": Cuando se iniciar gambas, este nos da los consejos del dia, nos orienta de alguna manera con algunas comparaciones con Visual Basic 6, si has programado anteriormente en Visual Basic, la programación en Gambas no sera problema para ti. Ahora veremos el entorno de programación: 1 Archivos internos del proyecto, formularios, imágenes, etc. 2 Entorno de trabajo gráfico. 3 Lista de Propiedades de cada objeto (Formulario, TextBox, Label, etc.) 4 Componentes. 5 Prueba del programa (iniciar, parar, verificar, etc.) Como este es nuestro primer programa, veremos algo simple, tomaremos dos botones y un TextLabel: Bien, nuestro primer programa consta de dos botones con un textlabel, el textlabel, es una forma de mostrar texto pero que este no puede ser ingresado, osea que el usuario lo ve pero no puede hacer nada con él. A cada Botón lo renombraremos, seleccionamos uno y vamos a la lista de propiedades de este y en Text colocaremos por ejemplo "Botón Nº1": Bien, ahora para agregar códigos, solamente debemos darle doble click sobre uno de estos botones. Lo que nuestro primer programa hará es que al clickear sobre el Botón Nº1 vamos a ver un texto en el textlabel y al hacer lo mismo con el Botón Nº2 cambiara el texto por otro. Entonces escribiremos TextLabel1. y agregaremos la propiedad que queremos utilizar, en este caso, no hay propiedad Text, tenemos que usar la propiedad Caption y esta la igualaremos a un texto: Esto mismo vamos a hacer con el otro botón. Nos quedaría así el código: ' Gambas class file PUBLIC SUB Button1_Click() TextLabel1.Caption = "Bienvenido, este es nuestro primer programa en Gambas 2.2" END PUBLIC SUB Button2_Click() TextLabel1.Caption = "Creado por NochesDeCode.com.ar" END Bien, ahora ya podemos pre visualizar nuestro proyecto dándole a play: Como podemos ver, el textlabel esta como oculto, ya que utiliza el mismo fondo que el formulario, ahora hacemos click en el primer botón: y al clickear en el Boton Nº2: Bien, ya hemos aprendido a utilizar y darle propiedades a elementos y trabajar con estos. Segundo Programa en Gambas (uso de IF y Select Case) Bien, para nuestro segundo programa, vamos a utilizar un TextBox, en español Caja de Texto, en este el usuario puede ingresar letras, números, símbolos, etc. y un botón. Al botón le daremos la propiedad de Text: "¿Que Numero es?": Y vamos a hacer un IF, simplemente preguntamos si el texto del textbox es igual a "1" por ejemplo: y vamos a usar el comando Message, este nos creara como un mensaje de información o el típico mensaje de error, por ejemplo: Message.Info("Hola este es el texto", "este es el boton" Entonces vamos a hacer un IF preguntando de si es "1", en el caso que no utilizaremos un Message.Error para dar un error y decir que no es un uno. Bien ahora ya tenemos nuestra primer condición, ahora vamos a ver como quedo; iniciamos el programa y colocamos un "1": Clickeamos sobre el Botón: Y nos encontramos con un mensaje de información "es el numero 1", ahora ponemos cualquier cosa y nos dirá: Bien pero existe una manera mas cómoda a parte del IF, vamos a comentar todo el código anterior: Podemos usar un SELECT CASE, una gran alternativa al IF, es mas simple y muy adaptable; el siguiente código es idéntico al del IF pero con SELECT CASES: Lo bueno es que en Select Case, no hase falta cerrar muchas veces como pasa con el IF, cada ves que usamos un IF, hay que cerrar un ENDIF, en cambio ahora podemos usar muchos CASE y solamente serraremos con END SELECT al final y listo. Ahora probamos de nuevo: bien, sigue funcionando igual que antes ahora vamos a agregar hasta el numero "9": también agregaremos una condición de seguridad, al momento de programar, debemos pensar todo lo que el usuario podría ingresar no ingresar y que cosas puede hacer. En el caso de que el usuario no ingrese nada "" entonces le diremos que "No hay nada...". Ahora probamos con el "6": Dejamos sin nada el TextBox: y en el caso que no este en la lista CASE ELSE, diremos que no es un numero: y con esto nos quedaria asi nuestro codigo: ' Gambas class file PUBLIC SUB Button1_Click() SELECT CASE TextBox1.Text CASE "1" Message.Info("Es el numero 1", "Aceptar") TextBox1.Text = "" CASE "2" Message.Info("Es el numero 2", "Aceptar") TextBox1.Text = "" CASE "3" Message.Info("Es el numero 3", "Aceptar") TextBox1.Text = "" CASE "4" Message.Info("Es el numero 4", "Aceptar") TextBox1.Text = "" CASE "5" Message.Info("Es el numero 5", "Aceptar") TextBox1.Text = "" CASE "6" Message.Info("Es el numero 6", "Aceptar") TextBox1.Text = "" CASE "7" Message.Info("Es el numero 7", "Aceptar") TextBox1.Text = "" CASE "8" Message.Info("Es el numero 8", "Aceptar") TextBox1.Text = "" CASE "9" Message.Info("Es el numero 9", "Aceptar") TextBox1.Text = "" CASE "" Message.Error("No hay nada..", "Aceptar") TextBox1.Text = "" CASE ELSE Message.Error("No es un numero") END SELECT ' IF TextBox1.Text = "1" ' Message.Info("Es el numero 1", "Aceptar") ' TextBox1.Text = "" ' ELSE ' Message.Error("No es un numero") ' ENDIF END bien, esta ves aprendimos a usar el comando Messaje y los condicionales IF y SELECT CASE. Tercer Programa en Gambas (Uso básico de ComboBox) Para nuestro tercer programa utilizaremos un TextBox, un Boton y un ComboBox: Lo que hará nuestro programa es simple, al cargar un texto, en el TextBox y presionar el botón, se agregara un ítem al ComboBox, Utilizaremos la propiedad ADD: y nos quedaría así: Bien, con esto ya bastaría, también podríamos agregar un SELECT CASE en el caso que quisiéramos que no se ingrese "nada" al ComboBox o que solo se ingrese lo que nosotros queremos. Aremos la primer prueba con el "1er Item": Presionamos el botón y verificamos el ComboBox: Y si seguimos agregando mas items, estos no se sobresbriran, simplemente quedara uno debajo del otro: y veremos en el ComboBox: Bien, esta opción podemos agregarla al incio del programa osea en el Form_Load, y agregar items a un ComboBox, de manera tal de usarlo como opciones, entonces el usuario seleccionara una opción, verificamos si cambio y ComboBox y realizaremos una opción. ' Gambas class file PUBLIC SUB Button1_Click() ComboBox1.Add(TextBox1.Text) 'agregamos al combobox. TextBox1.Text = "" 'limpiamos el textbox. END