+ added type TXEventClass (alias for XEventClass)

git-svn-id: trunk@33615 -

packages/x11/src/xi.pp

@@ -345,6 +345,7 @@ type
 {$ELSE}
         XEventClass = Longword;
 {$ENDIF}
+        TXEventClass = XEventClass;
 
 (*******************************************************************
  *