[mORMot] MongoDB의 Document에서 Array 가져오기

mORMot의 SynCommons를 추가합니다.

uses
  SynCommons;

MongoDB의 Document를 가져옵니다.

procedure ConvertVariantToArray;
var
  Coll : TMongoCollection;
  Docs : TVariantDynArray;
  JsonArr : string;
  DocArr : TVariantDynArray;
begin
  Coll := DB.CollectionOrCreate['myCollection'];
  Coll.FindDocs(Docs, null);

  JsonArr := Docs[I].Array; //Array를 Json 형식으로 가져옵니다.
  DocArr := JSONToVariantDynArray(JsonArr ); //Json을 다시 Array로 변경

  for I := 0 to High(DocArr) do
  begin
    ShowMessage(DocArr[I].Name); 
  end;
end;