Include constants

Author: vmolero

syntaxes/delphi.tmLanguage.json

@@ -13,6 +13,9 @@
 		},
 		{
 			"include": "#strings"
+		},
+		{
+			"include": "#constants"
 		}
 	],
 	"repository": {
@@ -23,15 +26,23 @@
 			}]
 		},
 		"strings": {
-			"name": "string.quoted.double.delphi",
-			"begin": "\"",
-			"end": "\"",
+			"name": "string.quoted.single.dfm",
+			"begin": "'",
+			"end": "'",
 			"patterns": [
-				{
-					"name": "constant.character.escape.delphi",
-					"match": "\\\\."
-				}
+				
 			]
+		},
+		"constants": {
+			"patterns": [{
+				"name": "constant.numeric.dfm",
+				"match": "\\W\\d+"
+			},
+			{
+				"name": "constant.language.dfm",
+				"match": "([Tt]rue|[Ff]alse)"
+			}
+		]
 		}
 	},
 	"scopeName": "source.dfm"