Jump to content


Photo

Miniaplicación con acceso a base de datos migrada a Lazarus (windows / linux)


  • Please log in to reply
4 replies to this topic

#1 tmsanchez

tmsanchez

    Advanced Member

  • Miembros
  • PipPipPip
  • 85 posts

Posted 06 September 2012 - 09:45 PM

Hola compañeros.


Después del lanzamiento de la versión 1.0 de Lazarus me di a la tarea de migrar la aplicación tmsgTracking que había publicado hace tiempo en mi blog http://tmsanchezdev....ienta-para.html que estaba desarrollada en Delphi.

La aplicación en delphi utilizaba ClientDatasets para almacenar la información.

Para la migración de tmsgTracking a Lazarus utilicé como base de datos Firebird.

Imagen Enviada

Éste es script para crear la base de datos:

CREATE GENERATOR GFOLIOSEGUIMIENTO;
SET GENERATOR GFOLIOSEGUIMIENTO TO 1;

CREATE TABLE SEGUIMIENTO
(
  FOLIO                      INTEGER        NOT NULL,
  FECHA                        DATE        NOT NULL,
  TIPO                          CHAR(    1) NOT NULL COLLATE NONE,
  MODULO                    VARCHAR(    50) NOT NULL COLLATE NONE,
  DESCRIPCION                VARCHAR(  255)  COLLATE NONE,
  OBSERVACIONES              VARCHAR(  255)  COLLATE NONE,
  ESTADO                        CHAR(    1) NOT NULL COLLATE NONE,
PRIMARY KEY (FOLIO)
);


La aplicación la pude migrar utilizando un 97% de código existente.

Les comento algunos de mis hallazgos:

1. Para instalar firebird en ubuntu me hay que ejecutar

  $ sudo su
  # apt-get install firebird2.1-super


para más información http://www.firebirds...l/ubusetup.html

2. Después de instalar firebird será necesario instalar el cliente de firebird en Ubuntu

a) abrir el "Centro de Software" de ubuntu (adjunto la imagen)
b) Buscar "Firebird client library" (en la imagen está seleccionado el embedded pero debe ser el "Firebird client library"
c) Dar clic en el botón "Instalar"

3. Va a ser necesario crear un enlace simbólico a la biblioteca del cliente porque Lazarus busca el archivo "libfbembed.so" (vaya que le estuve buscando jejeejej)

ln -s /usr/lib/libfbembed.so.2.1 /usr/lib/libfbembed.so

Pueden consultar este link:
https://bugs.launchp...2.0/ bug/234475 y buscar "in my case i use firebird2.1 for example"

Algunos links interesantes:

1. Para el manejo de gráficas
http://wiki.freepasc...Getting_started
http://vgdata.dk/wordpress/?p=473


2. Para utilizar SQLdb
http://wiki.freepasc...SQLdb_Tutorial1
http://wiki.freepascal.org/SqlDBHowto
http://www.clublazarus.com/?p=98

Lo unico que no pude dejar igual son los iconos en dbgrid, el texto aparece encimado, espero tener tiempo el fin para revisarlo.

Pues creo que eso es todo.

Les dejo el código fuente del proyecto para que lo prueben.

Saludos

Attached Files


  • 0

#2 ELKurgan

ELKurgan

    Advanced Member

  • Miembro Platino
  • PipPipPip
  • 566 posts
  • LocationEspaña

Posted 07 September 2012 - 12:23 AM

Muchas gracias por el aporte  (y)

Saludos
  • 0

#3 joseme

joseme

    Advanced Member

  • Miembro Platino
  • PipPipPip
  • 62 posts
  • LocationCosta Rica

Posted 12 September 2012 - 03:02 PM

Muchas gracias! además por las instrucciones para instalar Firebird en Ubuntu, me vienen muy bien (me estaba rompiendo la cabeza, je je)
  • 0

#4 danygonza

danygonza

    Newbie

  • Miembros
  • Pip
  • 8 posts
  • LocationConcepcion - Paraguay

Posted 14 November 2012 - 08:26 AM

Gracias x el ejemplo. Ahora tambien estoy en un proyecto Lazarus con Db PostgreSQL, con windows 7 o XP. Para conectar a la DB debo utilizar el ZEOS (ZEOS dbo 6.6.0) o a través de ODBC (PSQLodbc, pqw32cli-1001)... Gracias..
  • 0

#5 danygonza

danygonza

    Newbie

  • Miembros
  • Pip
  • 8 posts
  • LocationConcepcion - Paraguay

Posted 15 November 2012 - 07:23 AM

Buen Dia ! Estoy queriendo mirar el ejemplo pero no aparece para bajar... sera? q podrias enviarme al correo dgonza63@gmail.com ... o si tienen otro mas complejo, con menus, ABM de parametros, consultas, gcias.
  • 0




IP.Board spam blocked by CleanTalk.