Env�e los mensajes para la lista Lazarus-es a lazarus-es en lists.lazarus.freepascal.org Para subscribirse o anular su subscripci�n a trav�s de la WEB http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es O por correo electr�nico, enviando un mensaje con el texto "help" en el asunto (subject) o en el cuerpo a: lazarus-es-request en lists.lazarus.freepascal.org Puede contactar con el responsable de la lista escribiendo a: lazarus-es-owner en lists.lazarus.freepascal.org Si responde a alg�n contenido de este mensaje, por favor, edite la linea del asunto (subject) para que el texto sea mas especifico que: "Re: Contents of Lazarus-es digest...". Adem�s, por favor, incluya en la respuesta s�lo aquellas partes del mensaje a las que est� respondiendo. Asuntos del d�a: 1. ot: sistema admin de propiedades (Paola Bruccoleri) 2. actualizar grid autom�ticamente (Paola Bruccoleri) 3. Re: actualizar grid autom�ticamente (Jose Daboin) 4. Re: actualizar grid autom�ticamente (Paola Bruccoleri) 5. Re: actualizar grid autom�ticamente (Maikel Enrique Pern�a Matos) 6. Re: actualizar grid autom�ticamente (Hilde Hansz) 7. Problemas con strings (Victor Garcia Tascon) ---------------------------------------------------------------------- Message: 1 Date: Wed, 26 Sep 2012 11:38:21 -0300 From: Paola Bruccoleri <pbruccoleri en adinet.com.uy> Subject: [Lazarus-es] ot: sistema admin de propiedades To: Lista Lazarus <lazarus-es en lists.lazarus.freepascal.org> Message-ID: <5063135D.6070702 en adinet.com.uy> Content-Type: text/plain; charset=ISO-8859-1; format=flowed Hola todos.. alguien tiene alg�n sistema (y un demo) para administraci�n de propiedades? o sea m�s bien gesti�n de alquileres... El que sea, que me contacte a mi privado muchas gracias chauuuuuuuu ------------------------------ Message: 2 Date: Wed, 26 Sep 2012 16:33:13 -0300 From: Paola Bruccoleri <pbruccoleri en adinet.com.uy> Subject: [Lazarus-es] actualizar grid autom�ticamente To: Lista Lazarus <lazarus-es en lists.lazarus.freepascal.org> Message-ID: <50635879.3090008 en adinet.com.uy> Content-Type: text/plain; charset=ISO-8859-1; format=flowed Hola todos.. tengo una aplicaci�n (programa1) siempre abierta, donde en un form hay un grid con datos de una tabla de firebird (es una tabla q se maneiene con muy pocos registros x eso no us� una consulta) A su vez hay otro programa (programa2) que carga items en esa misma tabla. Necesito que el gris del programa1 siempre est� mostrando los agregados q hace el programa2 �La �nica forma que tengo de que ese grid vea reflejado constantemente esos agregados, es poniendo un timer que haga el refresh de la tabla? o de qu� otra manera puede ser? tengo a la tabla, propiedad updateMode = umUpdateChanged Lo mismo me pasa en otro grid q est� en ese form... Ahora he probado ejecutando los 2 programas en la misma m�quina y el grid no se me actualiza si no salgo del programa1 y vuelvo a entrar. (uso componentes zeos 7, y Lazarus 0.9.31 r30432 FPC 2.5.1 i386-win32-win32/win64... si, se que est� desactualizado pero no he podido hacerlo) Agradezco cualquier pista muchas gracias ------------------------------ Message: 3 Date: Wed, 26 Sep 2012 15:35:25 -0430 From: Jose Daboin <metalbox9000 en gmail.com> Subject: Re: [Lazarus-es] actualizar grid autom�ticamente To: Spanish version of Lazarus List <lazarus-es en lists.lazarus.freepascal.org> Message-ID: <CAAvkSmBV5=Qffz4sgGEZDj6w9_OjhVtxyUjhkO5BMDWgDpjmzA en mail.gmail.com> Content-Type: text/plain; charset="iso-8859-1" Te iba a decir que con un timer pero ya lo estas haciendo [?] El 26 de septiembre de 2012 15:03, Paola Bruccoleri < pbruccoleri en adinet.com.uy> escribi�: > Hola todos.. > > tengo una aplicaci�n (programa1) siempre abierta, donde en un form hay un > grid con datos de una tabla de firebird (es una tabla q se maneiene con muy > pocos registros x eso no us� una consulta) > A su vez hay otro programa (programa2) que carga items en esa misma tabla. > > Necesito que el gris del programa1 siempre est� mostrando los agregados q > hace el programa2 > �La �nica forma que tengo de que ese grid vea reflejado constantemente > esos agregados, es poniendo un timer que haga el refresh de la tabla? o de > qu� otra manera puede ser? > tengo a la tabla, propiedad updateMode = umUpdateChanged > > Lo mismo me pasa en otro grid q est� en ese form... > > Ahora he probado ejecutando los 2 programas en la misma m�quina y el grid > no se me actualiza si no salgo del programa1 y vuelvo a entrar. > > (uso componentes zeos 7, y Lazarus 0.9.31 r30432 FPC 2.5.1 > i386-win32-win32/win64... si, se que est� desactualizado pero no he podido > hacerlo) > > Agradezco cualquier pista > muchas gracias > > > ______________________________**_________________ > Lazarus-es mailing list > Lazarus-es en lists.lazarus.**freepascal.org<Lazarus-es en lists.lazarus.freepascal.org> > http://lists.lazarus.**freepascal.org/mailman/**listinfo/lazarus-es<http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es> > ------------ pr�xima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20120926/ada76f15/attachment-0001.html> ------------ pr�xima parte ------------ A non-text attachment was scrubbed... Name: no disponible Type: image/gif Size: 453 bytes Desc: no disponible URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20120926/ada76f15/attachment-0001.gif> ------------------------------ Message: 4 Date: Wed, 26 Sep 2012 17:15:35 -0300 From: Paola Bruccoleri <pbruccoleri en adinet.com.uy> Subject: Re: [Lazarus-es] actualizar grid autom�ticamente To: Spanish version of Lazarus List <lazarus-es en lists.lazarus.freepascal.org> Message-ID: <50636267.7000905 en adinet.com.uy> Content-Type: text/plain; charset="iso-8859-1"; Format="flowed" El 26/09/2012 05:05 p.m., Jose Daboin escribi�: > Te iba a decir que con un timer pero ya lo estas haciendo Hola Jos�.. no, a�n no he probado con el timer!.. quiz�s con alguna propiedad de la conexi�n o la tabla se pueda, por eso pregunt�! muchas gracias! ------------ pr�xima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20120926/803843bd/attachment-0001.html> ------------ pr�xima parte ------------ A non-text attachment was scrubbed... Name: no disponible Type: image/gif Size: 453 bytes Desc: no disponible URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20120926/803843bd/attachment-0001.gif> ------------------------------ Message: 5 Date: Wed, 26 Sep 2012 16:27:03 -0400 From: Maikel Enrique Pern�a Matos <reprepoli2mz en infomed.sld.cu> Subject: Re: [Lazarus-es] actualizar grid autom�ticamente To: Spanish version of Lazarus List <lazarus-es en lists.lazarus.freepascal.org> Message-ID: <1348691223.3209.2.camel en trastos> Content-Type: text/plain; charset="UTF-8" has pensado en utilizar un socket o tuberia para comunicar ambas aplicaciones, en esencia tendr�as una siempre en escucha, y de la otra la mandar�as a actualizar cada vez que hagas un cambio en la base de datos. El problema creo que se resolver�a con uso de memoria compartida, b�sicamente por ah� anda la cosa. Saludos Maikel El mi�, 26-09-2012 a las 16:33 -0300, Paola Bruccoleri escribi�: > Hola todos.. > > tengo una aplicaci�n (programa1) siempre abierta, donde en un form hay > un grid con datos de una tabla de firebird (es una tabla q se maneiene > con muy pocos registros x eso no us� una consulta) > A su vez hay otro programa (programa2) que carga items en esa misma tabla. > > Necesito que el gris del programa1 siempre est� mostrando los agregados > q hace el programa2 > �La �nica forma que tengo de que ese grid vea reflejado constantemente > esos agregados, es poniendo un timer que haga el refresh de la tabla? o > de qu� otra manera puede ser? > tengo a la tabla, propiedad updateMode = umUpdateChanged > > Lo mismo me pasa en otro grid q est� en ese form... > > Ahora he probado ejecutando los 2 programas en la misma m�quina y el > grid no se me actualiza si no salgo del programa1 y vuelvo a entrar. > > (uso componentes zeos 7, y Lazarus 0.9.31 r30432 FPC 2.5.1 > i386-win32-win32/win64... si, se que est� desactualizado pero no he > podido hacerlo) > > Agradezco cualquier pista > muchas gracias > > > _______________________________________________ > 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/ ------------------------------ Message: 6 Date: Wed, 26 Sep 2012 17:33:37 -0300 From: "Hilde Hansz" <hhansz en adinet.com.uy> Subject: Re: [Lazarus-es] actualizar grid autom�ticamente To: "'Spanish version of Lazarus List'" <lazarus-es en lists.lazarus.freepascal.org> Message-ID: Content-Type: text/plain; charset="iso-8859-1" Hola Paola, yo no he encontrado otra forma, que en el timer, colocar: tabla.Close, tabla.Open. Hace poco, vi una implementaci�n para actualizar, pero esto funciona. Si la encuentro te lo paso. hh De: Paola Bruccoleri [mailto:pbruccoleri en adinet.com.uy] Enviado el: mi�rcoles, 26 de septiembre de 2012 05:16 p.m. Para: Spanish version of Lazarus List Asunto: Re: [Lazarus-es] actualizar grid autom�ticamente El 26/09/2012 05:05 p.m., Jose Daboin escribi�: Te iba a decir que con un timer pero ya lo estas haciendo Hola Jos�.. no, a�n no he probado con el timer!.. quiz�s con alguna propiedad de la conexi�n o la tabla se pueda, por eso pregunt�! muchas gracias! ------------ pr�xima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20120926/eaa5475d/attachment-0001.html> ------------ pr�xima parte ------------ A non-text attachment was scrubbed... Name: no disponible Type: image/gif Size: 453 bytes Desc: no disponible URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20120926/eaa5475d/attachment-0001.gif> ------------------------------ Message: 7 Date: Wed, 26 Sep 2012 23:20:09 +0200 From: Victor Garcia Tascon <public en insidecat.biz> Subject: [Lazarus-es] Problemas con strings To: lazarus-es en lists.lazarus.freepascal.org Message-ID: <1698942507.20120926232009 en insidecat.biz> Content-Type: text/plain; charset=ISO-8859-15 Estimados compa�eros del foro: Llevo un par de a�os apuntado a "nuestra" lista, leyendo y aprendiendo de vuestros mensajes. Este es mi primer mensaje. Un saludo a todos. Llevo unos cuantos meses probando CodeTyphon 2.70 bajo Windows XP SP3, todo 32 bits. En todos los .pas pongo {$mode delphi} para evitarme problemas... Las pruebas van bien, y empieza a gustarme Lazarus... Pero me ha surgido un problema con unas rutinas, que uso desde hace a�os en Delphi 6. Las rutinas los que hacen es transformar (comprimir) numeros enteros, a strings de la mitad de su tama�o. Un ejemplo: el integer 9876543210 se convierte a 'ABCDE' El codigo de las rutinas os lo pongo al final del mensaje. El problema que me he encontrado al usarlas en Lazarus, es que en MUY POCAS ocasiones, devuelven una cadena con un char menos de tama�o. Es decir, le paso 123456, me deberia dar algo como XXX, pero me da solo XX. Lo unico que se me ocurre, es que debido al uso de UTF-8 (o sabe dios que), alguna pareja de chars que devuelve la funcion, se interprete como uno. Las funciones funcionan perfectamente en Delphi 6, que creo que usa ANSI para los strings... La verdad es que el rollo del utf-8 "para todo" en lazarus me esta dando muchos problemas. Espero que las ventajas de usar utf-8 merezcan la pena. Si a alguien se le ocurren ideas, las probare. Tambien podeis comentar optimizaciones a las rutinas. Las uso a menudo en Delphi. Estas son las funciones (que son open source para todos): function TFPrincipal.EncodeTextInteger64(const num: int64):string; // NECESITA: un numero entero positivo o negativo // DEVUELVE: una cadena, de longitud par, con el numero codificado segun el siguiente esquema // - si el numero es negativo, se le quita el signo // - si el numero de cifras es impar, se a�ade un cero a la izquierda // - cada bloque de dos cifras, se sustituye por su c�digo ASCII // desplazado 32 posiciones hacia adelante // - con el primero de ellos, distinguimos si es negativo o positivo: // si es positivo, se desplaza 32 como siempre (es decir, estara entre 32 y 131) // si es negativo, no estara desplazado 32, sino 32+100 (es decir, estara entre 132 y 231) // EJEMPLOS: 1056-> 42 88 -> *X 90860599->122 118 37 131->zv%� // -1056-> 42+100 88 -> �X -11231 ->133 44 63 ->�,? // NOTAS: esta pensada para guardar numeros enteros grandes en ficheros de texto // se consigue un ahorro del 50% respecto a texto puro, y solo se pierde // un 25% respecto al formato binario (el mas eficiente) var auxs, cacho: string; auxi: integer; neg: boolean; begin result:=''; neg:=false; if num>=0 then auxs:=inttostr(num) else begin auxs:=inttostr(-num); neg:=True; end; if length(auxs) mod 2 =1 then auxs:=' '+auxs; for auxi:=1 to length(auxs) do begin if (auxi mod 2)=0 then continue; cacho:=copy(auxs,auxi,2); result:=result+chr(strtoint(cacho)+32); end; if neg then result[1]:=chr(ord(result[1])+100); end; function TFPrincipal.DecodeTextInteger64(const numtext: string):int64; // NECESITA: una cadena que sea un entero codificado segun EncodeTextInteger() // DEVUELVE: el numero entero "decodificado", segun este esquema // - cada caracter, se pasa a numero ASCII u se le resta 32 // - se compone el numero concatenado los ASCII // - en funcion del 1� sabemos si es negativo o no // EJEMPLOS: *X->42 88->1056 zv%�->122 118 37 131->90860599 // NOTAS: es la complementaria de EncodeTextInteger() var i: integer; auxs: string; begin if numtext[1]>=#132 then auxs:='-'+format('%2.2d',[ord(numtext[1])-132]) else auxs:=format('%2.2d',[ord(numtext[1])-32]); for i:=2 to length(numtext) do auxs:=auxs+format('%2.2d',[ord(numtext[i])-32]); result:=strtoint64(auxs); end;