Hi,

I tried to access the FScanner field from the TJSONParser, but without sucess. x(

My test:

[code]
{ TJSONParserHelper }

  TJSONParserHelper = class helper for TJSONParser
  private
    function GetScanner: TJSONParser;
  public
    property Scanner: TJSONParser read GetScanner;
  end;
implementation

{ TJSONParserHelper }

function TJSONParserHelper.GetScanner: TJSONParser;
begin
  Result := Self.FScanner;
end;
[/code]

The error:

Error: identifier idents no member "FScanner".

So, FPC 2.7.1 support this sintaxe?:
http://stackoverflow.com/questions/8330003/access-a-strict-protected-property-of-a-delphi-class

In FPC 2.4.4 I use only:

  TJSONParserHelper = class(TJSONParser)
  public
    property Scanner: TJSONParser read FScanner;
  end;

Thanks.

[snip]

Your code is principially correct, but your assumption is not: you can not access (strict) private fields using a class helper. Only (strict) protected, public and published are supported (this is the same in Delphi btw.).

Regards,
Sven

silvioprog wrote

Hi, I tried to access the FScanner field from the TJSONParser, but without sucess. x(

You can't. It is a private field, this is not supported.

I committed a patch, it is now a protected property, rev. 19885.

Michael.

2011/12/23 :

Wow, I'll update my FPC copy now! :)

Thank you, guys!