-
```
I am using Delphi XE
I have a record
tmyrec=packed record
myname:string ;
mysurname:string ;
myage:integer;
mydate:tdatetime;
end;
Using superobject I c…
-
```
I am using Delphi XE
I have a record
tmyrec=packed record
myname:string ;
mysurname:string ;
myage:integer;
mydate:tdatetime;
end;
Using superobject I c…
-
```
Hello!
You have the following code in your function:
...
var
ret: TValue;
begin
if FromJson(TypeInfo(T), obj, ret) then
Result := ret.AsType
else
raise Exception.Create('Marshalling…
-
I can't unmarshal JSON
``` JSON
{
"data": {
"1": "value one",
"2": "value two"
}
}
```
into class:
``` pascal
TDictionaryDataObject = class
data: TDictionary;
end;
```
…
Frees updated
6 years ago
-
```
Hello!
You have the following code in your function:
...
var
ret: TValue;
begin
if FromJson(TypeInfo(T), obj, ret) then
Result := ret.AsType
else
raise Exception.Create('Marshalling…
-
```
What steps will reproduce the problem?
1. collect data.
2. add data to json.
3. first call is ok. just like before.
4. second call will exception and hung.
What is the expected output? What d…
-
```
I am using Delphi XE
I have a record
tmyrec=packed record
myname:string ;
mysurname:string ;
myage:integer;
mydate:tdatetime;
end;
Using superobject I c…
-
```
I am using Delphi XE
I have a record
tmyrec=packed record
myname:string ;
mysurname:string ;
myage:integer;
mydate:tdatetime;
end;
Using superobject I c…
-
```
I am using Delphi XE
I have a record
tmyrec=packed record
myname:string ;
mysurname:string ;
myage:integer;
mydate:tdatetime;
end;
Using superobject I c…
-
```
I am using Delphi XE
I have a record
tmyrec=packed record
myname:string ;
mysurname:string ;
myage:integer;
mydate:tdatetime;
end;
Using superobject I c…