miércoles, 5 de mayo de 2010

Como Generar Gráficas Con El Componente Gb.Chart

Como usar el componente Gb.Chart
Este componente fue creado por Fabien Bodard actualmente se encuentra en versión beta, es utilizado para crear gráficas de diferentes tipos..!! Le dejo un ejemplo de como se utiliza y otro ejemplo para descargarlo.

Se debe crear un formulario con una dimensión de
Height = 532
Width = 539

Con un DrawingArea1 con estas dimensiones
Height = 511
Width = 511

En el evento Open del Formulario “Click derecho en el DrawingArea1 / Eventos / Open” se debe escribir este código

PUBLIC SUB Form_Open()
'Texto de la leyenda
Chart.Headers.Values = ["Tic", "Tac", "Toes"]
'Valores de las Gráfica tipo Float
Chart[0].Values = [1.0, 2.0, 3.0]
'Titulo de la Gráfica
Chart.Title.Text = "My Chart"
'Leyenda
Chart.Legend.Visible = TRUE
Chart.Legend.Title = "My Legend"
'Tipo de Gráfica
Chart.Type = ChartType.Lines
DrawingArea1.Refresh
END

Y en el evento Draw del DrawingArea1 se debe escribir el siguiente código
PUBLIC SUB DrawingArea1_Draw()
Chart.Width = DrawingArea1.Height
Chart.Height = DrawingArea1.Width
Chart.Draw 'Muestra la Grafica
END

Al ejecutar el proyecto debes tener una gráfica como muestra la imagen

Free Image Hosting at www.ImageShack.us

Aquí les dejo otro Ejemplo para crear gráficas

Free Image Hosting at www.ImageShack.us

Descargar Ejemplo 2

Saludos..!!

lunes, 3 de mayo de 2010

Utilizar Gb.Report

Como generar Reportes en Gambas2 “gb.report”
gb.report es un componente para generar reportes creado por Fabien Bodard en la version 2 de gambas que se encuentra en versión beta. La documentación de este componente es muy poca solamente existía el ejemplo que el mismo creador del componente hizo. Pero buscando y ensayando y ensayando encontré la forma de generar reportes con este componente. Para ello se debe crear nuevo proyecto y agregar el componente
- gb.qt
- gb.qt.ext
- gb.report

Para generar una reporte sencillo se debe crear un button y en el evento click del button se debe escribir este código.

PUBLIC SUB Button1_Click()
DIM cabezera AS ReportLabel
DIM texto AS ReportLabel
DIM cadena AS String
cadena = "\n\nGambas es un lenguaje de programación libre derivado de BASIC. Es distribuido con licencia GNU GPL.\nCabe destacar que presenta ciertas similitudes con Java ya que en la ejecución de cualquier aplicación,\nse requiere un conjunto de librerías interprete previamente instaladas (Gambas Runtime) que entiendan\nel bytecode de las aplicaciones desarrolladas y lo conviertan en código ejecutable por el computador.\nPor otro lado, a diferencia de Java, no se experimentan ralentizaciones y es posible desarrollar\ngrandes aplicaciones en poco tiempo.\n\n Permite crear formularios con botones de comandos, cuadros de texto y muchos otros controles y\nenlazarlos a bases de datos como MySQL, PostgreSQL o SQLite además de facilitar la creación de\naplicaciones muy diversas como videojuegos (utilizando OpenGL), aplicaciones para dispositivos móviles\n(en desarrollo pero muy avanzado), aplicaciones de red (con manejo avanzado de protocolos HTTP, FTP\n, SMTP, DNS), entre otras.\n"
Report.Padding = "2 cm" 'Margenes
cabezera = NEW ReportLabel(Report)
cabezera.Font = Font["Arial,+12"] ' Tipo de Letra
cabezera.Alignment = Align.Center 'Alineacion del Texto
cabezera.Text = "Componentes de Gambas" 'Texto a Mostrar
texto = NEW ReportLabel(Report)
texto.Alignment = Align.Justify
texto.Text = cadena
texto.Text &= "\nDefinición sacada de Wikipedia.org"
Report.Preview

END

El reporte quedara de este manera



Existen Tipos de reporte ReportTextLabel a estos se le puede agregar código html pero no lo recomiendo ya que al imprimir el reporte sale todo en un mismo renglón y no se ve el documento.



Aquí les dejo las imágenes del nuevo Gb.Report para gambas 3







Aquí les dejo un proyecto ya creado en gambas2-2.20.2 con diferentes tipos de reportes, Estos ejemplos se probaron con una Impresora Pixma MP190.

Descargar ejemplos

Esperemos que en la nueva versión “gambas 3” ya este componente este terminado..!



Saludos