Dbgrid en Lazarus Veamos ahora como asignar el valor de una variable a un dbgrid en lazarus, realmente lo que haré será actualizar el DataSource que hace de puente entre el dbgrid y el dataset, en este caso una conexión con Zeos ZConnection. var vfrmCuadre: TfrmCuadre; vEstadillo: String; vFecha: String; implementation {$R […]
Asignar valor a columna dbgrid en Lazarus Leer más »
Uso config.ini en Lazarus. Veamos la configuración del fichero config.ini para la carga de los datos iniciales de la aplicación realizada en lazarus. fichero config.ini [Configuracion] Usuario=SYSDBA Clave=masterkey Servidor=localhost BasedeDatos=F:\Lazarus\Cuadre\CUADRE.FDB Libreria=F:\Lazarus\Cuadre\fbclient.dll RutaConta=F:\Lazarus\Cuadre\dbf\ var ini: TINIFile; begin try ini := TINIFile.Create(‘config.ini’); ZConnection1.User:=ini.ReadString (‘Configuracion’, ‘Usuario’, »); ZConnection1.Password:=ini.ReadString (‘Configuracion’, ‘Clave’, »); ZConnection1.HostName:=ini.ReadString (‘Configuracion’, ‘Servidor’, »); ZConnection1.Database:=ini.ReadString (‘Configuracion’, ‘BasedeDatos’,
Archivo config.ini en Lazarus Leer más »
Si al actualizar sudo apt-get udpate, cuando finaliza aparece este error: W: Error de GPG: http://www.hu.freepascal.org lazarus-stable Release: Las firmas siguientes no se pudieron verificar porque su clave pública no está disponible: NO_PUBKEY 670C48C26A88800F Lo solución pasa por: desde el terminal ctrl+alt+t. gpg –keyserver keyserver.ubuntu.com –recv 670C48C26A88800F gpg –armor –export 670C48C26A88800F
Error en firma clave pública Leer más »
Pequeño tutorial en el que explico como importar los servicios al programa de gestión. Ver el vídeo tutorial En el menú principal accedemos a la opción «N Todos los clientes» Ordenamos los clientes por código pulsando sobre la cabecera de la columna y apuntamos el último código de cliente. Realizamos este proceso porque la importación
¿Cómo importar servicios al programa de gestión? Leer más »
Aquí tenéis el código fuente del script realizado en python que convierte el fichero txt a xml de una remesa sepa del cuaderno 19. import sys,os, os.path, shutil, time from lxml import etree #—————————————————— # # Función que devuelve el importe sin separación decimal. # #—————————————————— def conviertenumero(numero,decimales): if str.isnumeric(str(decimales)) == ‘False’: decimales = 0
Convertir ficheros de txt a xml sepa Leer más »
Bueno os voy a dejar el código fuente de un procedimiento almacenado que se encarga de grabar los accesos de los usuarios a la aplicación. Le pasamos tres campos de entrada y con estos datos inserta un registro en la tabla usu_accesos. Los datos de entrada son USUARIO, CLAVE y ERROR. Realiza un insert con
Procedimiento almacenado en firebird Leer más »
