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

alfred en arsistemes.com alfred en arsistemes.com
Sab Jul 6 22:48:32 CEST 2013


Alegro-me... a seguir profundizando...

> 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
>
>
> --
>
> 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/
>
>
>
> _______________________________________________
> Lazarus-es mailing list
> Lazarus-es en lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
>






More information about the Lazarus-es mailing list