----- Original Message -----
> From: Leonardo M. Ramé <martinr...@yahoo.com>
> To: FPC-Pascal users discussions <fpc-pascal@lists.freepascal.org>
> Cc:
> Sent: Saturday, December 17, 2011 10:00 AM
> Subject: Re: [fpc-pascal] JSON Dataset in FCL-DB.
>
> ----- Original Message -----
>
>> From: Michael Van Canneyt <mich...@freepascal.org>
>> To: FPC-Pascal users discussions <fpc-pascal@lists.freepascal.org>
>> Cc: Lazarus mailing list <laza...@lazarus.freepascal.org>
>> Sent: Friday, December 16, 2011 5:52 PM
>> Subject: Re: [fpc-pascal] JSON Dataset in FCL-DB.
>>
>>
>>
>> On Fri, 16 Dec 2011, Leonardo M. Ramé wrote:
>>
>>>> What is missing currently is the delta to update data on the
> server,
>> but that
>>>> should be easily added.
>>>>
>>>> Michael.
>>>
>>>
>>> Thanks.
>>>
>>> Btw. I've found this dependency related error when I tried to
> compile.
>>>
>>
>> Fixed in revision 19858.
>>
>> Michael.
>
>
>
> Michael, could you apply this? Without it fpjsondataset unit is not found:
>
> Index: fpmake.pp
>
> ===================================================================
> --- fpmake.pp (revision 19860)
> +++ fpmake.pp (working copy)
> @@ -37,6 +37,7 @@
> P.SourcePath.Add('src/sqldb/examples');
> P.SourcePath.Add('src/sqldb/oracle');
> P.SourcePath.Add('src/sdf');
> + P.SourcePath.Add('src/json');
> P.SourcePath.Add('src/datadict');
> P.SourcePath.Add('src/memds');
> P.SourcePath.Add('src/codegen');
> @@ -661,6 +662,9 @@
> end;
> T.ResourceStrings := True;
>
> + // JSON
> + T:=P.Targets.AddUnit('fpjsondataset.pp');
> +
> P.ExamplePath.Add('tests');
> T:=P.Targets.AddExampleProgram('dbftoolsunit.pas');
> T:=P.Targets.AddExampleProgram('dbtestframework.pas');
>
>
Also this on tests directory:
Index: testjsondataset.pp
===================================================================
--- testjsondataset.pp (revision 19860)
+++ testjsondataset.pp (working copy)
@@ -3,9 +3,8 @@
{$mode objfpc}{$H+}
uses
- Classes, sysutils, DB, jsondataset, fpjson, jsonparser;
+ Classes, sysutils, DB, fpjsondataset, fpjson, jsonparser;
-{$R *.res}
Function ExtractData(Const AFileName : string) : TJSONObject;
--
Leonardo M. Ramé
http://leonardorame.blogspot.com
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
