diff options
Diffstat (limited to 'packages/gtk2/src/gtk2x11/include/gxid_proto.inc')
-rw-r--r-- | packages/gtk2/src/gtk2x11/include/gxid_proto.inc | 52 |
1 files changed, 52 insertions, 0 deletions
diff --git a/packages/gtk2/src/gtk2x11/include/gxid_proto.inc b/packages/gtk2/src/gtk2x11/include/gxid_proto.inc new file mode 100644 index 0000000000..13179d2e54 --- /dev/null +++ b/packages/gtk2/src/gtk2x11/include/gxid_proto.inc @@ -0,0 +1,52 @@ +{%MainUnit ../gdk2x.pas} + +{$IFDEF read_interface_rest} + +const + GXID_CLAIM_DEVICE = 1; + GXID_RELEASE_DEVICE = 2; + GXID_RETURN_OK = 0; + GXID_RETURN_ERROR = -(1); + +type + PGxidMessage = ^TGxidMessage; + + PGxidU32 = ^TGxidU32; + TGxidU32 = dword; + + PGxidI32 = ^TGxidI32; + TGxidI32 = longint; + TGxidClaimDevice = record + _type : TGxidU32; + length : TGxidU32; + device : TGxidU32; + window : TGxidU32; + exclusive : TGxidU32; + end; + + TGxidReleaseDevice = record + _type : TGxidU32; + length : TGxidU32; + device : TGxidU32; + window : TGxidU32; + end; + + TGxidMessageAny = record + _type : TGxidU32; + length : TGxidU32; + end; + + TGxidMessage = record + case longint of + 0 : ( any : TGxidMessageAny ); + 1 : ( claim : TGxidClaimDevice ); + 2 : ( release : TGxidReleaseDevice ); + end; + +{$ENDIF read_interface_rest} + +//------------------------------------------------------------------------------ + +{$IFDEF read_implementation} +{$ENDIF read_implementation} + |