Ver Mensaje Individual
  #1  
Antiguo 11-11-2005
Avatar de dmagui
dmagui dmagui is offline
Miembro
 
Registrado: may 2005
Posts: 168
Reputación: 20
dmagui Va por buen camino
Exclamation distinct para registros de Crystal Reports

Buenos dias:

estoy haciendo reportes en Crystal Reports 8.0, una base de datos en Interbase 6 y usando delphi 6.

mediante codigo estoy haciendo filtros de los datos dentro de un reporte llamado Report1.RPT pero no se como hacer un distinct para los datos es decir, tengo:

10 1 sony dvd
10 2 sony tv
10 3 sony lcd

y para lo cual uso el siguiente codigo:

Código:
procedure TForm1.Button1Click(Sender: TObject);
begin
 crpe1.ReportName := 'D:\Report1.RPT';
 crpe1.Selection.Formula.Clear;
 crpe1.Selection.Formula.Add('{subcomp.codigo_comp}=10');
 crpe1.Execute;
end;
pero deseo que me liste asi:

10 sony

lo he intentado hacer asi:

Código:
 Crpe1.ReportName := 'D:\Report1.rpt'; 
Crpe1.GroupSelection.Formula.Clear;
Crpe1.GroupSelection.Formula.add('{subcomp.codigo_comp}=10');
 crpe1.Execute;
end;
pero me genera el mismo resultado:

10 1 sony dvd
10 2 sony tv
10 3 sony lcd

Gracias
__________________
El espiritu humano no se acaba cuando es derrotado se termina cuando se rinde.
Responder Con Cita