Ver Mensaje Individual
  #1  
Antiguo 21-06-2017
DavidSG4 DavidSG4 is offline
Miembro
 
Registrado: oct 2007
Posts: 92
Reputación: 17
DavidSG4 Va por buen camino
Crystal reports en 64 bits

Muy buenas y gracias de antemano.
tengo una aplicación recién migrada de delphi 5 a XE 10 Berlin. tengo un problema con crpe32.

He instalado crystal reports 2008 runtime no encuentro una version posterior.

1 cuando ejecuto la aplicacion en modo 32 bits todo funciona bien hasta que cierro el listado he intento acceder a cualquier otro menú de la aplicación (me salta ese error tan feo que es la ventana de CPU)
2 Cuando ejecuto la aplicacion en modo 64 ni siquiera carga la dll crpe32.dll. en el código de abajo me lanza el error en la linea CREEngine:=loadlibrary(pchar(s1)) he instalado un runtime de sap para visutal studio pero nada

Saludos

Código:
function TCrpeEngine.PELoadCrpeDll(const CrpeLocation: string) : Bool;
var
  s1,s2 : string;
begin
  Result := False;
  s1 := Trim(CrpeLocation);
  CRDEngine :=LoadLibrary(PChar(s1));
  {If an error occured, set the flag}
  if (CRDEngine < HINSTANCE_ERROR) then
  begin
    CRDEngine := 0;
    s2 := SysErrorMessage(GetLastError);
    if Trim(s2) = '' then
      s1 := CRD_ERROR_LOADING + Chr(10) + 'Windows Error Number: ' + IntToStr(GetLastError)
    else
      s1 := CRD_ERROR_LOADING + Chr(10) +
        'Windows Error Number: ' + IntToStr(GetLastError) + ' - ' + Trim(s2);
    CRDEngineError(s1);
  end
  else
    Result := True;
end;
Responder Con Cita