Mapeamento de json para objeto

empresa.json

{
    "data": {
        "id": 1,
        "nome": "Dolly",
        "data_hora_criacao": "2018-04-10 11:22:22",
    }
}

Empresa.pas

type
    TEmpresa = Class
        private
            FId : Integer;
            FNome : String;
            FDataCriacao : TDateTime;

            function GetId() : Integer;

            function GetNome(): String;
            procedure SetNome(const Value: String);

            function GetDataCriacao(): TDateTime;
        public
            property Id : Integer
                read GetId;
            property Nome : String
                read GetNome
                write SetNome;
            property DataCriacao : TDateTime
                read GetDataCriacao;

            constructor Create(
                const AId : Integer;
                const ANome : String;
                const ADataCriacao : TDateTime;
            );
    End;