Ver Mensaje Individual
  #130  
Antiguo 31-10-2006
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 27
Caral Va por buen camino
Hola Delphitest
Paso a paso:
1-Coloca un query en el form y lo llamas ADOQAlbaran, en el string del query pones esto tal y como esta, copialo y pegalo:
Código SQL [-]
SELECT DISTINCTROW Sum([Desglose_Albaran].[Importe]) AS [Importe]
FROM Desglose_Albaran
Dale dobleclick al query y dale add
en la pantallita que te sale, saldra un nombre Importe, traetelo con el mouse y colocalo en el form, te aparecera un datasource, el dbedit seguro que es 25como se ve en mi programa.
2-En el boton que tienes pones esto:
Código Delphi [-]
 ADOQAlbaran.Close;
   ADOQAlbaran.SQL.Add('WHERE Desglose_Albaran.Num_Albaran = '+DBEdit22.Text+'');
   ADOQAlbaran.Open;
   Button2.Visible:= False;
   DBEdit24.Text:= DBEdit25.Text;
En el dbedit que pusiste antes te saldra el resultado de la suma.
Con esto ya tienes el resultado del importe, osea sumara lo que este en el dbgrid, dependiendo del albaran.
Si tienes alguna duda me dices.
Saludos
Responder Con Cita