浏览代码

+ added type TXEventClass (alias for XEventClass)

git-svn-id: trunk@33615 -
nickysn 9 年之前
父节点
当前提交
69bb6f5ffa
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      packages/x11/src/xi.pp

+ 1 - 0
packages/x11/src/xi.pp

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