[fpc-pascal] Bug in FPC 3.0?

LacaK lacak at zoznam.sk
Tue Feb 23 07:47:49 CET 2016


Error: (3059) No member is provided to access property

is because TField.FieldDef is defined like: Property FieldDef : 
TFieldDef Read FFieldDef;
so there is no write method from begining (2 years ago rev. 26776).

Error: (5000) Identifier not found "FieldDefs"

FieldDefs is property of TDataSet, not TField so it can not work in your 
example
(also Delphi has FieldDefs as property of TDataSet)

-Laco.

> Hello,
>
> UniDAC doesn't compile with Lazarus 1.6/FPC 3.0.
> The case may be reproduced on following example.
>
> program Project1;
>
> {$MODE DELPHI}
>
> uses
>    SysUtils, Classes, DB;
>
> var
>    F: TField;
>    FieldDef: TFieldDef;
> begin
>    with F do
>      FieldDef := FieldDefs.AddFieldDef;
>      //      ^^error here
> end.
>
> Free Pascal Compiler version 3.0.0 [2016/02/14] for i386
> Copyright (c) 1993-2015 by Florian Klaempfl and others
> (1002) Target OS: Win32 for i386
> (3104) Compiling C:\Users\serge\AppData\Local\Temp\project1.lpr
> project1.lpr(13,13) Error: (3059) No member is provided to access property
> project1.lpr(13,16) Error: (5000) Identifier not found "FieldDefs"
> project1.lpr(16) Fatal: (10026) There were 2 errors compiling module,
> stopping
> Fatal: (1018) Compilation aborted
> Error: C:\lazarus\fpc\3.0.0\bin\i386-win32\ppc386.exe returned an error
> exitcode
>
>
>
> -----
> --
> Regards,
> Serguei
> --
> View this message in context: http://free-pascal-general.1045716.n5.nabble.com/Bug-in-FPC-3-0-tp5724260.html
> Sent from the Free Pascal - General mailing list archive at Nabble.com.
> _______________________________________________
> fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org
> http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
>



More information about the fpc-pascal mailing list