mORMot Open Source

I am currently upgrading some projects to mORMot2 and have come across something that stopped working.  I can't really say why it was done this way and I have since made a workaround using just the TSQLJsonTable to read the data on the client side.  Any ideas as to why this doesn't work or if I maybe missed something?

  TSQLOrders = class(TOrmVirtualTableAutoID)

    aTable := TSQLTableJSON.Create('', JsonRecordSet);
    try
      newOrders := TSQLOrders.Create;
      try
        newOrders.FillPrepare(aTable);
        Result := ObjectToJSON(newOrders.FillTable);
      finally
        newOrders.Free;
      end;
    finally
      aTable.Free;
    end;
...
    Result = '{}'

I have been looking into updating our existing application to mORMot 2 and have a question about turning off the auto ID on a certain table.

I created a test application which is connecting to my SQL server fine using a TSQLRestServerDB.  My question is about accessing the TRestStorageExternal.Instance.

I came up with this and it doesn't throw any errors but am wondering if this is the correct way of coding this.  In my existing application I would just pass in the TSQLRestServerDB, but now it is needing a TRestOrmServer.

  MyServer := TSQLRestServerDB.Create(Model,':memory:');

  MyServer.CreateMissingTables;
  MyServer.AcquireExecutionMode[execORMGet] := amBackgroundORMSharedThread;
  MyServer.AcquireExecutionMode[execORMWrite] := amBackgroundORMSharedThread;
  MyServer.DB.UseCache := false;

  VStorage := TRestStorageExternal.Instance(TSQLUser, TRestOrmServer(MyServer.Server));

  if Assigned(VStorage) then
  begin
    VStorage.EngineAddForcedID := -1;
  end;

Thanks for any help