* Add TTouchTracking for Delphi compatibility

packages/rtl-objpas/src/inc/system.uitypes.pp

@@ -660,7 +660,9 @@ const
 
 Type
   TEditCharCase = (ecNormal, ecUpperCase, ecLowerCase);
-
+  
+  TTouchTracking = set of (ttVertical, ttHorizontal);
+  
   // Forms
   
   TWindowState = (wsNormal, wsMinimized, wsMaximized, wsFullScreen);