código fuente

Ajustar DBSpinEdit a la derecha (Importes)

Alinear importes a la derecha en un campo DBSpinEdit Este post es relámpago, ya que he buscado información por la web y no la he encontrado. Veamos como podemos solucionar la alineación de los campos DBSpinEdit a la derecha, como debe ser en los campos numéricos. Aquí el código… procedure Tmiformulario.AjustarDerechaImportes(); var inxs:integer; begin for […]

Ajustar DBSpinEdit a la derecha (Importes) Leer más »

Campo calculado en Lazarus

Campo calculado en lazarus     Vamos a crear una columna “Total” para que realice un cálculo simple en un dbgrid “Importe”*”Apunte”       zquery1 botón derecho editar campos Crear un nuevo campo y añadirlo en la posición actual (Insert) Calculados             procedure TDataModule1.ZQuery1CalcFields(DataSet: TDataSet); begin DATASET.FieldByName(‘Total’).Value := dataset.fieldbyname(‘IMPORTE’).Value

Campo calculado en Lazarus Leer más »

Archivo config.ini en Lazarus

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 »

Convertir ficheros de txt a xml sepa

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 »

Scroll al inicio