[Lazarus-es] acceder a una database en una unit

Héctor F. Fiandor Rosario hfiandor en infomed.sld.cu
Sab Jul 6 09:49:58 CEST 2013


Amigo Ulises:

en proximos correos te estoy enviando un winrar multivolumen de 300,000 bytes, para por si acaso el servidor los rechaza.

este es una prueba de un programa que lee una tabla sqlite3 (te envio dll) y que esta hecho por el metodo antiguo, no con el DataModulo.

compilalo, accionalo y te debe salir la tabla como le saldria a cualquier otro usuario.

Despues voy a introducir el DataModulo y espero que no trabaje. Te lo envio y me lo destrozas.

saludos,

Ing. Héctor F. Fiandor Rosario
hfiandor en infomed.sld.cu

  ----- Original Message ----- 
  From: Ulises Díaz 
  To: Spanish version of Lazarus List 
  Sent: Friday, July 05, 2013 2:29 AM
  Subject: Re: [Lazarus-es] acceder a una database en una unit


  Hola Héctor, no es ninguna molestia.
  hay alguna forma de que envíes el código o las unidades para hacer pruebas acá?, sinceramente no se que pueda estar pasando tal vez ejecutándolo nos demos cuenta o cualquier miembro de la comunidad ayude.


  Ulises Díaz
  Ingeniero de Sistemas
  ingulisesdiaz en hotmail.com



------------------------------------------------------------------------------
  From: hfiandor en infomed.sld.cu
  To: lazarus-es en lists.lazarus.freepascal.org
  Date: Fri, 5 Jul 2013 06:11:35 -1200
  Subject: Re: [Lazarus-es] acceder a una database en una unit


  Ulises, te molesto de nuevo, pero el programa no me funciona.

  hize todos los cambios en todas las units donde se llamaba a las tablas y les puse dm.t......

  termine, compile bien y al ejecutarlo, en la unit donde se supone que se creen las tablas, me da un error y tengo que cancelar.

  si tienes alguna idea del asunto, te la voy a agradecer, o dime si necesitas mas información para enviartela.

  saludos, y perdona tanta molestia,

  Ing. Héctor F. Fiandor Rosario
  hfiandor en infomed.sld.cu



    ----- Original Message ----- 
    From: Ulises Díaz 
    To: Spanish version of Lazarus List 
    Sent: Thursday, July 04, 2013 3:19 PM
    Subject: Re: [Lazarus-es] acceder a una database en una unit


    Hola si me di cuenta, solo faltaba eso, que bien, que pena no responder pero tuve que ausentarme. 






----------------------------------------------------------------------------
    From: hfiandor en infomed.sld.cu
    To: lazarus-es en lists.lazarus.freepascal.org
    Date: Thu, 4 Jul 2013 21:25:38 -1200
    Subject: Re: [Lazarus-es] acceder a una database en una unit


    Estimado Ulises y Rivera:

    efectivamente, hize lo que aparece mas abajo, y compilo completo.

      with dm.tCuentas do
      begin
        FileName := camino_actual + '\Tablas.db';
        PrimaryKey := 'IdCuentas';
        if not TableExists('Cuentas') then
        begin
          FieldDefs.Clear;

    mañana voy a profundizar en los cambios y correrlo de nuevo a ver que pasa.

    saludos,

    Ing. Héctor F. Fiandor Rosario
    hfiandor en infomed.sld.cu




      ----- Original Message ----- 
      From: Ulises Díaz 
      To: Spanish version of Lazarus List 
      Sent: Thursday, July 04, 2013 12:21 PM
      Subject: Re: [Lazarus-es] acceder a una database en una unit


      Héctor, cordial saludo: 


      en la clausula uses del datamodule debes colocar la unidad zdataset si estas usando Zeos, o agregar las unidades que correspondan a los componentes que estés usando.


      Ulises Díaz
      Ingeniero de Sistemas
      ingulisesdiaz en hotmail.com



--------------------------------------------------------------------------
      From: hfiandor en infomed.sld.cu
      To: lazarus-es en lists.lazarus.freepascal.org
      Date: Thu, 4 Jul 2013 20:09:11 -1200
      Subject: Re: [Lazarus-es] acceder a una database en una unit


      Estimados colegas:

      en una copia de la carpeta que contiene los ficheros de un programa, incorporé una unit DataModule, la salve como uDM y en las propiedades como nombre le puse DM.

      tengo otra unit donde se crean las tablas. En su Form aparecian los iconos de los DataSets y los DataSources.

      marque algunos de ellos, oprimi Ctrol_X y los peque en el form de la uDM.

      Volvi a la unit original y en uses escribi uDM.

      Salve y di Ctrol_F9. Comenzo a compilar hasta que dio error. En la rutina donde se crea la tabla del error, dice que no encuentra el identificador "tcuentas" que el nombre de la tabla "Cuentas".

      agracezco cualquier ayuda y que me digan que hize mal, para aprender.

      saludos,

      Ing. Héctor F. Fiandor Rosario
      hfiandor en infomed.sld.cu


        ----- Original Message ----- 
        From: Alfred Rivera 
        To: Spanish version of Lazarus List 
        Sent: Thursday, July 04, 2013 6:21 AM
        Subject: Re: [Lazarus-es] acceder a una database en una unit


        Saludos, 

        No lo he probado pero imagino que se añade un Datamodule al proyecto, puedes colocar los componentes Zconnection,  Querys, DataSources en él. 

        Posteriormente sólo tendrías que incluir el nombre del Data module en el 'Uses' de la Unit.  ( uses  DataModule )
        Para recurrir a los mismos simplemente ....

        with dades.Datamodule do begin
            Zconnection.DataBase:='Dbgeneral';
            Zconnection.HostName:='192.168.1.10";
            Zconnection.User:='Usuario';
            Zconnection.Password:='password';
            Zconnection.Connected:=True;
        end;


        El 05/07/2013 2:02, Héctor F. Fiandor Rosario escribió:

          muchas gracias al colega Bigegain. voy a experimentar.

          saludos,

          Ing. Héctor F. Fiandor Rosario
          hfiandor en infomed.sld.cu
            ----- Original Message ----- 
            From: Rafael Bidegain 
            To: Spanish version of Lazarus List 
            Sent: Thursday, July 04, 2013 2:03 AM
            Subject: Re: [Lazarus-es] acceder a una database en una unit


            Hola Hector.



            El 4 de julio de 2013 17:46, Héctor F. Fiandor Rosario <hfiandor en infomed.sld.cu> escribió:

              Estimado Martín Gómez y otros colegas:

              Me alegro mucho su respuesta, que no la conocia, pero que desde tp3 hace casi 30 años la uso sin saber.

              Acostumbro a declarar una unit como uVariables y otra como uVarios, donde en la primera declaro todas las variables publicas y en la segunda tengo una serie de rutinas que puedo o no aplicar en cada caso y que son muy generales. Simplemente las "copio" de una aplicacion a otra y me parece que me ahora un buen trabajo.

              No se si algo parecido a esto es lo que me sugiere, lo que no se es como crear un DataModule, donde pudiera poner los iconos de las distintas tablas (datasets)  y sus correspondientes datasource, una sola vez, e incluir dicha unit (uDM) en cada nueva unit que diseñe (como hago con el uVariables y el uVarios).
              [..]


              Espero que me pueda ayudar a crear una uDM como me sugiere para modificar la ultima aplicacion que hize.




            para crear un DM tenés que hacer lo siguiente:

            clic en menu Archivo,

            clic en nuevo ...

            clic en módulo

            clic en módulo de datos

            clic en aceptar.



            saludos

            -- 
            Rafael Bidegain

            Ya que los cuerdos no hablan, hablará el loco.
            (The Fool, Padraic Pearse)

            # yo quiero educación libre. ¡YA!




--------------------------------------------------------------------
            _______________________________________________
            Lazarus-es mailing list
            Lazarus-es en lists.lazarus.freepascal.org
            http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es


           

_______________________________________________
Lazarus-es mailing list
Lazarus-es en lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es



------------------------------------------------------------------------

        _______________________________________________
        Lazarus-es mailing list
        Lazarus-es en lists.lazarus.freepascal.org
        http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es


      _______________________________________________ Lazarus-es mailing list Lazarus-es en lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es


--------------------------------------------------------------------------

      _______________________________________________
      Lazarus-es mailing list
      Lazarus-es en lists.lazarus.freepascal.org
      http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es


    _______________________________________________ Lazarus-es mailing list Lazarus-es en lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es


----------------------------------------------------------------------------

    _______________________________________________
    Lazarus-es mailing list
    Lazarus-es en lists.lazarus.freepascal.org
    http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es


  _______________________________________________ Lazarus-es mailing list Lazarus-es en lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es


------------------------------------------------------------------------------


  _______________________________________________
  Lazarus-es mailing list
  Lazarus-es en lists.lazarus.freepascal.org
  http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es


--

Este mensaje le ha llegado mediante el servicio de correo electronico que ofrece Infomed para respaldar el cumplimiento de las misiones del Sistema Nacional de Salud. La persona que envia este correo asume el compromiso de usar el servicio a tales fines y cumplir con las regulaciones establecidas

Infomed: http://www.sld.cu/



------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus-es/attachments/20130705/b02b1c19/attachment-0002.html>


More information about the Lazarus-es mailing list