Update README.md

Author: JensBorrisholt

README.md

@@ -20,7 +20,7 @@ Delphi-JsonToDelphiClass
   Delphi doesn't support Nullable types, so use this attribute to strip TDateTime property where value is 0.
 
 A Small example:
-```  
+``` pascal 
 type
   TDateTimeDTO = class(TJsonDTO)
   private
@@ -34,7 +34,7 @@ type
 ```
 The above class will generate the following JSON, if both properties is 0 
 
-```
+```json
   {
     "suppressDate":"",
     "noSuppressDate":"1899-12-30T00:00:00.000Z"
@@ -61,7 +61,7 @@ NOTE: You can turn off this feature in the settings form
 
 E.g this JSON generated faulty code:
 
-```
+```json
 {
     "/": {
         "readonly": true
@@ -122,7 +122,7 @@ E.g this JSON generated faulty code:
 * Support for objects with diffrents properties in an Array
 
 Eg this JSON 
-```
+```json
 {
    "ArrayTest":[
       {
@@ -136,7 +136,7 @@ Eg this JSON
 ```
 
 Generates the following DTO:
-```
+```pascal
   TArrayTestDTO = class
   private
     FS1: string;