summaryrefslogtreecommitdiff
path: root/packages/gtk2/src/gtk2x11/include/gxid_proto.inc
diff options
context:
space:
mode:
Diffstat (limited to 'packages/gtk2/src/gtk2x11/include/gxid_proto.inc')
-rw-r--r--packages/gtk2/src/gtk2x11/include/gxid_proto.inc52
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}
+