浏览代码

+ added type PXEventClass (pointer to TXEventClass)

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

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

@@ -348,6 +348,7 @@ type
 {$ELSE}
 {$ELSE}
         XEventClass = culong;
         XEventClass = culong;
 {$ENDIF}
 {$ENDIF}
+        PXEventClass = ^TXEventClass;
         TXEventClass = XEventClass;
         TXEventClass = XEventClass;
 
 
 (*******************************************************************
 (*******************************************************************