Export / Import JSON

Hello,
I am trying to use the SaveToJSON and LoadFromJSON functions without success.
The stringList is loaded with the data contained in the grid but the resulting file is filled with coordinates without data.
In addition the grid displayed on the screen is filled with these coordinates while I do not ask for import.
If anyone has an idea, see an example!
Greetings

I have retested this here with the code:

var

  sl: TStringList;
  i: integer;

begin
  sl := TStringList.Create;
  for i := 0 to advstringgrid1.ColCount - 1 do
    sl.Add('col'+inttostr(i));

  advstringgrid1.LinearFill(false);
  advstringgrid1.SaveToJSON('e:\tms\temp\grid.json','griddata',sl);
  sl.Free;

end;

and I cannot see a problem with the generated JSON file.

What *exactly* are you doing different?