Missing 2 caracters at the end while parsing shortStrings

What steps will reproduce the problem?

When SuperObject parses the shortString it removes the two last characters.

Expected result would be abc, while result is a\u0000\u0000, same result I f 
you set String[80] for characters 78,79. Is there any workaround for this?

Uses SuperObject;
Type
  TString3  = String[3];

Function RecordToJson: String;
Var
  ctx: TSuperRttiContext;
  t3 : TString3;
  obj: ISuperObject;
begin
  t3 := 'abc';
  ctx := TSuperRttiContext.Create;
  obj := ctx.AsJson<TString3>(t3);
  Result: obj.AsJSon;
end;

What is the expected output? What do you see instead?

Expected output is 'abc' I get a\u0000\u0000

What version of the product are you using? On what operating system?
Latest Git.main per 09.may 2014
XE5
win32

Please provide any additional information below.

As this is the workaround for RTTi parsing of ShortStrings I hope to get it to 
work.

Original issue reported on code.google.com by eskil.sa...@gmail.com on 9 May 2014 at 12:27

cxflag203 / superobject

Missing 2 caracters at the end while parsing shortStrings #56