TIdentitySnakeCaseNamingStrategy Class
Naming strategy that produces snake_case JSON names without field prefix removal.
Remarks
Converts the raw member name from PascalCase to snake_case without stripping the F prefix. For example, field FFirstName becomes f_first_name, and property FirstName becomes first_name.
Syntax
Unit: Bcl.Json.NamingStrategies
TIdentitySnakeCaseNamingStrategy = class(TJsonNamingStrategy);