Conectar Crystal Report (TCrpe) con un Ttable o TQuery

[andres1569]

Hola:

La propiedad DataPointer no la conozco (tengo el componente TCrpe para Delphi 4), parece ser, por lo que comentas, que debe apuntar a un DataSet de tu aplicación para que Crystal Reports tome de ahí los datos. Si es así, es un avance importante en la filosofía de CR, al permitir tomar datos directamente desde Delphi. De todas formas, si la finalidad es esa, me extraña que se llamara DataPointer y no DataSource.

¿Es esto así? Si no es eso y lo que quieres es acceder a las tablas físicas, como venía haciendo Crystal Reports anteriormente (te hablo de la versión 6.0), la forma en que tengo esto implementado, para indicarle la ruta donde están las tablas es así:

procedure TDATAIMP.InicializaInformeCrystal (NomInforme, NomClave: String;
  Preview: Boolean);
var
  DirDatos : String;
begin
  With CReport1 do 
  begin
    ReportName := DirInformes + '\' + NomInforme;
    DirDatos := GetPathFromAlias(':DATOS_ESCUELA:');
    Connect.Password := NomClave;
    DiscardSavedData := TRUE;
    SendDiscardSavedData;
    If Preview then Output := toWindow
    Else Output := toPrinter;
    Tables.Retrieve;
    Tables[0].Path := DirDatos;
    Tables.Path := DirDatos;
    Tables.Propagate := TRUE;
    With ParamFields do 
    begin
      ShowDialog := FALSE;
      Retrieve;
    end;
    PrintOptions.Copies := 1;
  end;
end;