Einzelnen Beitrag anzeigen

handson

Registriert seit: 18. Jan 2007
Ort: Delmenhorst
113 Beiträge
 
Delphi 2007 Professional
 
#11

AW: QuickReport Fehler beim PDF Export

  Alt 23. Jul 2020, 10:44
Moin!

Das Problem konnte gelöst werden. Ein ungarischer Programmierer konnte es lösen.

Der Fehler liegt in der QuickReport Datei qrpdffilt.pas:

Code:
function cvtDWord(var Buf: array of byte; P: Integer) : DWORD;
begin
  Result:=(256*256*256*Buf[P])+(256*256*Buf[P+1])+(256*Buf[P+2])+Buf[P+3];
end;

function cvtInt(var Buf: array of byte; P: Integer) : Integer;
begin
  Result:=(256*Buf[P])+(Buf[P+1]);
end;
In den beiden Funktionen muss vor dem Buf das Schlüsselword var stehen. Dann geht's.
Problen tritt aber, wie schon gesagt, nur unter Windows 10 auf.

Gruß,
Stephan
Stephan Faust
  Mit Zitat antworten Zitat