David Keith

<span style=”font-size: xx-small;”><span style=”font-family: Arial;”>Thanks Kim! I look forward to the new capabilities!</span></span>

and the reason is…. the JSON /Date(1234567891012)/ is in milliseconds, not seconds. So the result that is returned from calling System.DateUtils.UnixToDateTime should be divided by 1000.

Okay it looks like this is a Unix time epoch. I used System.DateUtils.UnixToDateTime to convert it. Unfortunately the conversion produces the wrong date with a year of 52166… probably an issue at the source.

Thanks for the response Kim.

Just out of curiosity, does your JSON processor know anything about this date format?:

“Expired”:”/Date(1584031516248)/”

Is this a “native” JSON date time type that you know how to process?

Thanks again.

Never mind, I think I have this figured out. Very verbose code requirements.

json := TkbmMWJSONObject(stream.LoadFromUTF16String(ajsontemplatestring)

jsonBase := TkbmMWJSONObject(json.PropertyValue[0]);

TkbmMWJSONNative(jsonBase.PropertyValueByName[‘origin’]).AsString := origin;

jsonProcesses :=…[Read more]

I tried to clean this up a bit but it didn’t post for some reason.

Among other things, please remove the line that reads

‘contrast”‘ +’

from the JSON packet.

Okay so I changed my streamFormat assignment from PersistentFormat to the AllDataFormat; turned off persistence/set Persistent := False;

In saving with my streamFormat each time a transaction occurs, I get an entire new copy of the table structure AND data appended to the end of the storage file.

Should I use… two streamFormats? One for…[Read more]

Thank you!

Can someone please approve my license request for kbmMemTable? I can’t compile kbmMW without it and I forgot to request that license approval when I requested the license approval for kbmMW.

Thanks.

Thank you! I’ll take a look at this and see if this will fit the bill.

Thanks again!

I tried this with the objectNotation demo. I pasted in the JSON packet. I hit the ‘Parse’ button. I get an access violation.

Delphi 10.3 Enterprise

kbmMW 5.06.20