For all Delphi classes that are not Aurelius entities, you can use JsonProperty attribute: JSON Format | TMS XData documentation.
For Aurelius entities - which seems to be the case, you can create a fake property named label, exclude the old one from JSON and include the new one using XDataExcludeProperty and XDataIncludeProperty attributes: JSON Format | TMS XData documentation.