#1 2014-04-18 11:28:29

RalfS
Member
Registered: 2011-07-11
Posts: 57

PDF fails on Delphi 6

PDF Engine does not work under D6. SysCommon causes a run time error during initialisation. Moreover ifdef Variants make problems.

Offline

#2 2014-04-18 12:28:17

ab
Administrator
From: France
Registered: 2010-06-21
Posts: 14,659
Website

Re: PDF fails on Delphi 6

Indeed...

We just fixed several Delphi 6 compilation issues.
See http://synopse.info/fossil/info/8e4840ca83

Thanks for the feedback!

Offline

#3 2014-04-19 16:50:33

RalfS
Member
Registered: 2011-07-11
Posts: 57

Re: PDF fails on Delphi 6

Still having problem with SysCommon and D6. Runtime errors. ? Don't know whats wrong.

Offline

#4 2014-04-19 16:57:39

ab
Administrator
From: France
Registered: 2010-06-21
Posts: 14,659
Website

Re: PDF fails on Delphi 6

All regression tests are OK on our side with Delphi 6...

Offline

#5 2014-04-20 15:02:27

RalfS
Member
Registered: 2011-07-11
Posts: 57

Re: PDF fails on Delphi 6

TsysAnsiConvert.Engine causes an floating point error in TSynAnsiFixedWidth.Create(1252) -> Move procedure.

Offline

#6 2014-04-20 15:14:33

ab
Administrator
From: France
Registered: 2010-06-21
Posts: 14,659
Website

Re: PDF fails on Delphi 6

What is your system code page?
What is the call stack (enable logs)?

Offline

#7 2014-04-20 20:00:57

RalfS
Member
Registered: 2011-07-11
Posts: 57

Re: PDF fails on Delphi 6

1252

Offline

#8 2014-04-20 22:32:13

ab
Administrator
From: France
Registered: 2010-06-21
Posts: 14,659
Website

Re: PDF fails on Delphi 6

I also use 1252 system, with no problem when running Delphi 6..

What is the stack trace of the issue?
Do you have code to reproduce the issue?

Offline

#9 2014-05-29 15:02:49

RalfS
Member
Registered: 2011-07-11
Posts: 57

Re: PDF fails on Delphi 6

One more Delphi 6 compilation issue:

function TJSONCustomParserCustomRecord.CustomReader(P: PUTF8Char;
  var aValue; out EndOfObject: AnsiChar): PUTF8Char;
var valid: boolean;
begin
  result := GetJSONCustomParserRegistration.Reader(P,aValue,valid); //<---------------------------D6: Internal error: C3890
  if not valid then
    result := nil;
  if result=nil then
    exit;
  EndOfObject := result^;
  if result^ in [',','}',']'] then
    inc(result);
end;

[Fatal Error] SynCommons.pas(25431): Internal error: C3890

Offline

#10 2014-06-05 08:31:20

ab
Administrator
From: France
Registered: 2010-06-21
Posts: 14,659
Website

Re: PDF fails on Delphi 6

We have just circumvent Delphi 6 "Internal error: C3890" compiler limitation.
See http://synopse.info/fossil/info/ed06417866

Thanks RalfS for pointing out the faulty line!
smile

Offline

Board footer

Powered by FluxBB