Foros Club Delphi

reportes dinamicos.....

oscarac — Sun, 31 May 2026 19:27:43 GMT

estoy probando delphi MVC sin librerias y tengo un problema con un reporte
genero el query de manera dinamica y en el reporte "seteo" los campos

C�digo Delphi [-]procedure TrepListadoMensualCuentaNormal.MapearCamposReporte(ADataSet: TDataSet);
begin
  if ADataSet = nil then Exit;

  
  qrepListadoMensualCuentaNormal.DataSet := ADataSet;
  qrb_GrupoCuenta.Master                 := qrepListadoMensualCuentaNormal;
  qrb_GrupoCuenta.Expression             := 'Cuenta'; // Limpio, sin prefijos


  qrdbtxtLibro.DataSet            := ADataSet;
  qrdbtxtLibro.DataField          := 'Libro';

  qrdbtxtVoucher.DataSet          := ADataSet;
  qrdbtxtVoucher.DataField        := 'Voucher';

  qrdbtxtRgt.DataSet              := ADataSet;
  qrdbtxtRgt.DataField            := 'RGT';

  qrdbtxtDocumento.DataSet        := ADataSet;
  qrdbtxtDocumento.DataField      := 'Documento';

  qrdbtxtFechaDoc.DataSet         := ADataSet;
  qrdbtxtFechaDoc.DataField       := 'FechaDocumento';

  qrdbtxtFechaVencimiento.DataSet := ADataSet;
  qrdbtxtFechaVencimiento.DataField := 'FechaVencimiento';

  qrdbtxtRazonSocial.DataSet      := ADataSet;
  qrdbtxtRazonSocial.DataField    := 'RazonSocial';

  qrdbtxtGlosa.DataSet            := ADataSet;
  qrdbtxtGlosa.DataField          := 'glosa';

  qrdbtxtmnd.DataSet              := ADataSet;
  qrdbtxtmnd.DataField            := 'Mnd';

  qrdbtxtCCosto.DataSet           := ADataSet;
  qrdbtxtCCosto.DataField         := 'CCosto';

  // Asignaci�n de importes con limpieza de propiedad previa
  qrdbtxtDEBE.DataSet             := ADataSet;
  qrdbtxtDEBE.DataField           := 'DEBE';
  qrdbtxtDEBE.Mask                := '#,##0.00;-#,##0.00;0.00';

  qrdbtxthaber.DataSet            := ADataSet;
  qrdbtxthaber.DataField          := 'HABER';
  qrdbtxthaber.Mask               := '#,##0.00;-#,##0.00;0.00';


  qrexSumaDebe.Master  := qrepListadoMensualCuentaNormal;
  qrexSumaHaber.Master := qrepListadoMensualCuentaNormal;
  QRExpr6.Master       := qrepListadoMensualCuentaNormal;

  qrexSumaDebe.ResetAfterPrint  := False;
  qrexSumaHaber.ResetAfterPrint := False;
  QRExpr6.ResetAfterPrint       := False;

  qrexSumaDebe.Expression  := 'SUM(DEBE)';
  qrexSumaHaber.Expression := 'SUM(HABER)';
  QRExpr6.Expression       := 'SUM(DEBE) - SUM(HABER)';


  qrexSumaDebe.Mask  := '#,##0.00;-#,##0.00;0.00';
  qrexSumaHaber.Mask := '#,##0.00;-#,##0.00;0.00';
  QRExpr6.Mask       := '#,##0.00;-#,##0.00;0.00';
end;

me muestra el detalle, perfecto, pero los totales no es decir SUM(DEBE) o SUM(HABER) o la diferencia entre ellos no las muestra, no se si me estoy haciendo entender

RestApi delphi 2005

victor03 — Mon, 25 May 2026 07:38:37 GMT

Hola

Tenemos una web donde se conectan varias empresas para consultar y administrar cierta informaci�n.
La cosa es que nos han empezado a pedir aplicaciones de escritorio para poder gestionar esa informaci�n y el problema es que no se muy bien como hacer que delphi 2005 trabaje con una Api.

Esto ya lo intente con la APi de un tercero usando indy (que ya tenia instalado en delphi no se si es nativo) y no termine de hacer que funcionase, sobre todo la parte del Post

Agradecer�a cualquier ayuda o consejo

Un saludo

Para los que dudan si Delphi sigue siendo buena idea para desarrollos

elrayo76 — Mon, 18 May 2026 01:42:56 GMT

Buenas, les comparto esto y pueden dejar sus comentarios al respecto.

Delphi sigue teniendo fortalezas t�cnicas muy reales, especialmente en aplicaciones desktop nativas, tooling empresarial legado y software donde el rendimiento percibido importa mucho.
Algunas ventajas objetivas que todav�a destacan:

compilaci�n a c�digo nativo
binarios autocontenidos
startup muy r�pido
bajo consumo de RAM comparado con runtimes administrados
excelente interoperabilidad con WinAPI
tooling RAD muy productivo para desktop
backward compatibility hist�rica bastante fuerte
debugging nativo muy s�lido
despliegue simple (sin depender de runtime externo en muchos casos)

En aplicaciones tipo:

ERP
POS
software industrial
tooling interno
instrumentaci�n
desktop financiero
software m�dico
CAD/utilidades
clientes pesados Windows

Delphi sigue siendo extremadamente competitivo.
Y s�, muchas apps hechas en Delphi arrancan pr�cticamente instant�neo comparadas con:

.NET/WPF
Electron
Java/Swing
apps web empaquetadas

porque evit�s:

JIT
CLR startup
VM warmup
Chromium embebido
GC pesado inicial

Eso se nota much�simo en UX real.

Delphi actualmente s� tiene muchas cosas que a veces se le siguen negando por inercia o por desconocimiento:

compiladores modernos Win64/macOS/Linux/iOS/Android
generics
RTTI avanzada
attributes
anonymous methods
parallel library
package manager externo (Boss)
frameworks maduros como Spring4D
ORM (TMS Aurelius, mORMot)
web (RAD Server, DMVCFramework)
REST tooling
JSON moderno
interfaces multiplataforma (FMX)
integraci�n CI/CD posible
soporte Docker/Linux v�a PAServer o compilaci�n Linux
interoperabilidad C/C++
profiling/debugging serio
backward compatibility much�simo mejor que otros ecosistemas

Hacer una app empresarial compleja en Delphi muchas veces sigue siendo:

m�s r�pido,
m�s estable,
m�s mantenible a largo plazo,

que hacerlo en stacks �modernos� hiperdependientes de npm/NuGet/Electron.

Tambi�n hay un sesgo cultural fuerte en la industria:

si algo no domina web/cloud/startups → se lo considera �viejo�
desktop nativo perdi� prestigio frente a SaaS
muchos nunca trabajaron en sistemas grandes escritos en Delphi
se confunde popularidad con capacidad t�cnica

Y adem�s Delphi qued� atrapado en una narrativa injusta:
�si no est� de moda entonces est� muerto�.

Saludos a toda la comunidad.

Usar CAPICOM para saber el Alias de un Cerificado

adebonis — Thu, 14 May 2026 08:42:34 GMT

Buenos d�as.

Pues eso, no encuentro la forma de mostrar el Alias de un Certificado digital del almac�n de Windows mediante CAPICOM.

�Alguien que lo haya logrado? Estoy utilizando Delphi 2007.

Saludos.
Adolfo de Bonis

Error en INSERT masivo

Angel.Matilla — Sat, 09 May 2026 08:23:57 GMT

Buenos d�as. Estoy tratando de ejecutar un INSERT masivo en una tabla. La definici�n de la tabla es esta:

C�digo SQL [-]CREATE TABLE Cierre (Fecha DATE NOT NULL, GruFac INTEGER NOT NULL, Bruto FLOAT, Iva FLOAT)
ALTER TABLE Cierre ADD CONSTRAINT PK_Cierre PRIMARY KEY (Fecha, GruFac)

y el INSERT que quiero ejecutar es este:

C�digo SQL [-]INSERT INTO Cierre (Fecha, 
                    GruFac, 
                    Bruto, 
                    Iva) 
VALUES ((SELECT A.Fecha, 
                C.Facturacion, 
                SUM(A.Cantidad * A.Bruto - A.ImpDto), 
                SUM((A.Cantidad * A.Bruto - A.ImpDto) * A.TipoIva / 100)
           FROM DetFactura A, Articulo B, Familia C
          WHERE A.TipoDoc||'$'||A.NumFactura IN ('1$1','1$2','2$1','2$2')
            AND A.Codigo = B.Codigo AND B.Familia = C.Codigo
          GROUP BY Fecha, Facturacion))

El resultado del SELECT que hay en el query es este:

Cuando intento ejecutarlo en SQL Manager, para probarlo, me da este error:

Cita:

Invalid token.
Dynamic SQL Error.
SQL error code = -104.
Invalid command.
Count of column list and variable list do not match.

y hasta donde veo hay el mismo n�mero de columnas que de variables. No soy capaz de ver que estoy haciendo mal.

RAD Studio Iberian Tour 2026!

Neftali [Germ�n.Est�vez] — Fri, 08 May 2026 09:55:05 GMT

Pues como cada a�o y para no faltar a la cita, ya hay fecha para el "RAD Studio Iberian Tour 2026" que organiza Danysoft.
Para los que teng�is oportunidad de asistir, siempre es una gran ocasi�n de ver novedades, conocer a otros programadores y gente de la comunidad.
https://www.clubdelphi.com/foros/att...1&d=1780048183

Este a�o las ciudades escogidas son Bilbao (Link) y Barcelona (link).

Im�genes Adjuntas

miniatura-iberian-barcelona-495x400.jpg (232,6 KB)

Update de Version

pruz — Wed, 06 May 2026 18:33:43 GMT

Hola Amigos:

Una consulta: Tengo un componente (Grilla Berg) en delphi 6, pero ahora necesita actualizarla para Delphi 10, ya que no encontre una para esta version.

Que debo tener (*.pas, *.dcu, etc) para poder compilar y actualizarla a delphi 10. O que pasos debo hacer para actualizarlo?

En realidad necesito orientacion o si es factible hacer esto.

Gracias