![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
![]() |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
|
|
#1
|
||||
|
||||
|
Cita:
2.- Pincha dos veces en el objeto Query1 que tienes, si te aparece algún campo, debe de aparecer el 'BuenoPor', sino añadeselo. Cita:
O bien accediendo directamente: Query1.FieldByName('BuenoPor').AsInteger; No sé si me explicado bien..... ![]() |
|
#2
|
||||
|
||||
|
gracias Nuria, por contestar y molestarte en responder a mi pregunta, son muy amables, pero meti el codigo que me dijo catedill que es el siguiente y me da el error que te mencione anteriormente, lo que necesito es que me sume los registros del campo 'BuenoPor', es para saber la suma del estado de cuenta de un alumno de los pagos que ha hecho.
y la pregunta mas importante, en donde coloco la sumatoria del campo 'Bueno Por' para que se muestre en un componente edit. Aqui esta el codigo que tengo ahorita, que fue el que me dio catedill, ah y el campo bueno por si lo tengo en el query. query1.Close; Query1.SQL.Clear; Query1.SQL.Add('select Folio, Matricula, UltSem, Semana, CantidadDe,'); Query1.SQL.Add(' Concepto, Fecha, Horario, Debe, Nombre, sum(BuenoPor)'); Query1.SQL.Add('from Cobranza.db'); Query1.SQL.Add('Where upper(matricula) like :mat'); Query1.SQL.Add('group by Folio, Matricula, UltSem, Semana, CantidadDe,'); Query1.SQL.Add(' Concepto, Fecha, Horario, Debe, Nombre'); Query1.ParamByName('mat').AsString:='%'+uppercase(edit1.text)+'%'; Query1.Open; gracias nuria una vez mas. |
|
#3
|
|||
|
|||
|
Bueno, es normal que te de ese error, falta por poner en la consulta el nombre que se le quiere dar a la columna de suma (que no es, por defecto, ni mucho menos ese
)Quedaría algo así: Código:
query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('select Folio, Matricula, UltSem, Semana, CantidadDe,');
Query1.SQL.Add(' Concepto, Fecha, Horario, Debe, Nombre, sum(BuenoPor) as BuenoPor');
Query1.SQL.Add('from Cobranza.db');
Query1.SQL.Add('Where upper(matricula) like :mat');
Query1.SQL.Add('group by Folio, Matricula, UltSem, Semana, CantidadDe,');
Query1.SQL.Add(' Concepto, Fecha, Horario, Debe, Nombre');
Query1.ParamByName('mat').AsString:='%'+uppercase(edit1.text)+'%';
Query1.Open;
|
|
#4
|
||||
|
||||
|
Gracias cadetill, pero en donde se muestra la suma del campo, es decir en que campo o en que componente lo podria poner, por ejemplo si un alumno realizo un pago de 200, y en otro registro un pago de 300, la suma da 500 en donde se mostrara esa suma.
repito el codigo que me diste. query1.Close; Query1.SQL.Clear; Query1.SQL.Add('select Folio, Matricula, UltSem, Semana, CantidadDe,'); Query1.SQL.Add(' Concepto, Fecha, Horario, Debe, Nombre, sum(BuenoPor) as BuenoPor'); Query1.SQL.Add('from Cobranza.db'); Query1.SQL.Add('Where upper(matricula) like :mat'); Query1.SQL.Add('group by Folio, Matricula, UltSem, Semana, CantidadDe,'); Query1.SQL.Add(' Concepto, Fecha, Horario, Debe, Nombre'); Query1.ParamByName('mat').AsString:='%'+uppercase(edit1.text)+'%'; Query1.Open; gracias cadetill |
|
#5
|
|||
|
|||
|
Bueno, pues puedes mostrarlo donde más te plazca/convenga como te ha comentado Nuria. Puedes untilizar un DBGrid, un DbText, mostrar simplemente un mensaje,...... La pregunta más bien sería: ¿qué es lo que quieres hacer con el dato? A partir de ahí, discutimos la jugada
![]() |
|
#6
|
||||
|
||||
|
la verdad esta linea no le entiendo nada porque as BuenoPor
sum(BuenoPor) as BuenoPor y como muestras el resultado de la suma de la consulta en un componente. haber si me explique mejor gracias. |
|
#7
|
||||
|
||||
|
la verdad esta linea no le entiendo nada porque as BuenoPor
sum(BuenoPor) as BuenoPor y como muestras el resultado de la suma de la consulta en un componente. haber si me explique mejor gracias y disculpa. |
|
#8
|
|||
|
|||
|
Veamos
Cita:
Cita:
Ejemplo 1: Visualizar el resultado de la sentencia SQL en componentes DataAware. ¿Cómo hacerlo? Sencillo. Enganchamos al formulario el componente TQuery (en que se lanza la consulta), un componente TDataSource y, por ejemplo, un TDBGrid. Los unimos de la siguiente manera: TDBGrid (propiedad DataSource) --> TDataSource (propiedad DataSet) --> TQuery. Ejemplo 2: Visualizar el resultado en un TLabel y/o mostrarlo mediante un ShowMessage. ¿Cómo hacerlo? Sencillo también. Mira el código que te pongo a continuación: Código:
var
i: string;
begin
.....
Query1.Open;
i := FormatFloat('#,##0.00', Query.FieldByName('BuenoPor').AsFloat);
Label1.Caption := i;
ShowMessage('La suma es ' + i);
|
|
#9
|
||||
|
||||
|
la verdad esta linea no le entiendo nada porque as BuenoPor
sum(BuenoPor) as BuenoPor y como muestras el resultado de la suma de la consulta en un componente edit. haber si me explique mejor gracias y disculpa. |
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|