fpc/packages/extra/x11/xlib.pp
2005-01-30 13:37:14 +00:00

2095 lines
82 KiB
ObjectPascal

unit xlib;
interface
{$mode objfpc}
uses
x;
{$define MACROS}
{$ifndef os2}
{$LinkLib c}
{$LinkLib X11}
const
libX11='X11';
{$else}
const
libX11='X11';
{$endif}
type
culong = dword;
cuchar = byte;
clong = longint;
cint = longint;
cuint = dword;
cshort = smallint;
cushort = word;
cunsigned = cuint;
cchar = shortint;
Pcint = ^cint;
Pcuint = ^cuint;
Pculong = ^culong;
Pcuchar = ^cuchar;
PPcint = ^Pcint;
PPcuchar = ^Pcuchar;
{
Automatically converted by H2Pas 0.99.15 from xlib.h
The following command line parameters were used:
-p
-T
-S
-d
-c
xlib.h
}
{$PACKRECORDS C}
const
XlibSpecificationRelease = 6;
type
PXPointer = ^TXPointer;
TXPointer = ^char;
PBool = ^TBool;
TBool = longbool; {cint?}
PStatus = ^TStatus;
TStatus = cint;
const
QueuedAlready = 0;
QueuedAfterReading = 1;
QueuedAfterFlush = 2;
type
PPXExtData = ^PXExtData;
PXExtData = ^TXExtData;
TXExtData = record
number : cint;
next : PXExtData;
free_private : function (extension:PXExtData):cint;cdecl;
private_data : TXPointer;
end;
PXExtCodes = ^TXExtCodes;
TXExtCodes = record
extension : cint;
major_opcode : cint;
first_event : cint;
first_error : cint;
end;
PXPixmapFormatValues = ^TXPixmapFormatValues;
TXPixmapFormatValues = record
depth : cint;
bits_per_pixel : cint;
scanline_pad : cint;
end;
PXGCValues = ^TXGCValues;
TXGCValues = record
_function : cint;
plane_mask : culong;
foreground : culong;
background : culong;
line_width : cint;
line_style : cint;
cap_style : cint;
join_style : cint;
fill_style : cint;
fill_rule : cint;
arc_mode : cint;
tile : TPixmap;
stipple : TPixmap;
ts_x_origin : cint;
ts_y_origin : cint;
font : TFont;
subwindow_mode : cint;
graphics_exposures : TBool;
clip_x_origin : cint;
clip_y_origin : cint;
clip_mask : TPixmap;
dash_offset : cint;
dashes : cchar;
end;
PXGC = ^TXGC;
TXGC = record
end;
TGC = PXGC;
PGC = ^TGC;
PVisual = ^TVisual;
TVisual = record
ext_data : PXExtData;
visualid : TVisualID;
c_class : cint;
red_mask, green_mask, blue_mask : culong;
bits_per_rgb : cint;
map_entries : cint;
end;
PDepth = ^TDepth;
TDepth = record
depth : cint;
nvisuals : cint;
visuals : PVisual;
end;
PXDisplay = ^TXDisplay;
TXDisplay = record
end;
PScreen = ^TScreen;
TScreen = record
ext_data : PXExtData;
display : PXDisplay;
root : TWindow;
width, height : cint;
mwidth, mheight : cint;
ndepths : cint;
depths : PDepth;
root_depth : cint;
root_visual : PVisual;
default_gc : TGC;
cmap : TColormap;
white_pixel : culong;
black_pixel : culong;
max_maps, min_maps : cint;
backing_store : cint;
save_unders : TBool;
root_input_mask : clong;
end;
PScreenFormat = ^TScreenFormat;
TScreenFormat = record
ext_data : PXExtData;
depth : cint;
bits_per_pixel : cint;
scanline_pad : cint;
end;
PXSetWindowAttributes = ^TXSetWindowAttributes;
TXSetWindowAttributes = record
background_pixmap : TPixmap;
background_pixel : culong;
border_pixmap : TPixmap;
border_pixel : culong;
bit_gravity : cint;
win_gravity : cint;
backing_store : cint;
backing_planes : culong;
backing_pixel : culong;
save_under : TBool;
event_mask : clong;
do_not_propagate_mask : clong;
override_redirect : TBool;
colormap : TColormap;
cursor : TCursor;
end;
PXWindowAttributes = ^TXWindowAttributes;
TXWindowAttributes = record
x, y : cint;
width, height : cint;
border_width : cint;
depth : cint;
visual : PVisual;
root : TWindow;
c_class : cint;
bit_gravity : cint;
win_gravity : cint;
backing_store : cint;
backing_planes : culong;
backing_pixel : culong;
save_under : TBool;
colormap : TColormap;
map_installed : TBool;
map_state : cint;
all_event_masks : clong;
your_event_mask : clong;
do_not_propagate_mask : clong;
override_redirect : TBool;
screen : PScreen;
end;
PXHostAddress = ^TXHostAddress;
TXHostAddress = record
family : cint;
length : cint;
address : Pchar;
end;
PXServerInterpretedAddress = ^TXServerInterpretedAddress;
TXServerInterpretedAddress = record
typelength : cint;
valuelength : cint;
_type : Pchar;
value : Pchar;
end;
PXImage = ^TXImage;
TXImage = record
width, height : cint;
xoffset : cint;
format : cint;
data : Pchar;
byte_order : cint;
bitmap_unit : cint;
bitmap_bit_order : cint;
bitmap_pad : cint;
depth : cint;
bytes_per_line : cint;
bits_per_pixel : cint;
red_mask : culong;
green_mask : culong;
blue_mask : culong;
obdata : TXPointer;
f : record
create_image : function (para1:PXDisplay; para2:PVisual; para3:cuint; para4:cint; para5:cint;
para6:Pchar; para7:cuint; para8:cuint; para9:cint; para10:cint):PXImage;cdecl;
destroy_image : function (para1:PXImage):cint;cdecl;
get_pixel : function (para1:PXImage; para2:cint; para3:cint):culong;cdecl;
put_pixel : function (para1:PXImage; para2:cint; para3:cint; para4:culong):cint;cdecl;
sub_image : function (para1:PXImage; para2:cint; para3:cint; para4:cuint; para5:cuint):PXImage;cdecl;
add_pixel : function (para1:PXImage; para2:clong):cint;cdecl;
end;
end;
PXWindowChanges = ^TXWindowChanges;
TXWindowChanges = record
x, y : cint;
width, height : cint;
border_width : cint;
sibling : TWindow;
stack_mode : cint;
end;
PXColor = ^TXColor;
TXColor = record
pixel : culong;
red, green, blue : cushort;
flags : cchar;
pad : cchar;
end;
PXSegment = ^TXSegment;
TXSegment = record
x1, y1, x2, y2 : cshort;
end;
PXPoint = ^TXPoint;
TXPoint = record
x, y : cshort;
end;
PXRectangle = ^TXRectangle;
TXRectangle = record
x, y : cshort;
width, height : cushort;
end;
PXArc = ^TXArc;
TXArc = record
x, y : cshort;
width, height : cushort;
angle1, angle2 : cshort;
end;
PXKeyboardControl = ^TXKeyboardControl;
TXKeyboardControl = record
key_click_percent : cint;
bell_percent : cint;
bell_pitch : cint;
bell_duration : cint;
led : cint;
led_mode : cint;
key : cint;
auto_repeat_mode : cint;
end;
PXKeyboardState = ^TXKeyboardState;
TXKeyboardState = record
key_click_percent : cint;
bell_percent : cint;
bell_pitch, bell_duration : cuint;
led_mask : culong;
global_auto_repeat : cint;
auto_repeats : array[0..31] of cchar;
end;
PXTimeCoord = ^TXTimeCoord;
TXTimeCoord = record
time : TTime;
x, y : cshort;
end;
PXModifierKeymap = ^TXModifierKeymap;
TXModifierKeymap = record
max_keypermod : cint;
modifiermap : PKeyCode;
end;
PDisplay = ^TDisplay;
TDisplay = TXDisplay;
PXPrivate = ^TXPrivate;
TXPrivate = record
end;
PXrmHashBucketRec = ^TXrmHashBucketRec;
TXrmHashBucketRec = record
end;
PXPrivDisplay = ^TXPrivDisplay;
TXPrivDisplay = record
ext_data : PXExtData;
private1 : PXPrivate;
fd : cint;
private2 : cint;
proto_major_version : cint;
proto_minor_version : cint;
vendor : Pchar;
private3 : TXID;
private4 : TXID;
private5 : TXID;
private6 : cint;
resource_alloc : function (para1:PXDisplay):TXID;cdecl;
byte_order : cint;
bitmap_unit : cint;
bitmap_pad : cint;
bitmap_bit_order : cint;
nformats : cint;
pixmap_format : PScreenFormat;
private8 : cint;
release : cint;
private9, private10 : PXPrivate;
qlen : cint;
last_request_read : culong;
request : culong;
private11 : TXPointer;
private12 : TXPointer;
private13 : TXPointer;
private14 : TXPointer;
max_request_size : cunsigned;
db : PXrmHashBucketRec;
private15 : function (para1:PXDisplay):cint;cdecl;
display_name : Pchar;
default_screen : cint;
nscreens : cint;
screens : PScreen;
motion_buffer : culong;
private16 : culong;
min_keycode : cint;
max_keycode : cint;
private17 : TXPointer;
private18 : TXPointer;
private19 : cint;
xdefaults : Pchar;
end;
PXKeyEvent = ^TXKeyEvent;
TXKeyEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
root : TWindow;
subwindow : TWindow;
time : TTime;
x, y : cint;
x_root, y_root : cint;
state : cuint;
keycode : cuint;
same_screen : TBool;
end;
PXKeyPressedEvent = ^TXKeyPressedEvent;
TXKeyPressedEvent = TXKeyEvent;
PXKeyReleasedEvent = ^TXKeyReleasedEvent;
TXKeyReleasedEvent = TXKeyEvent;
PXButtonEvent = ^TXButtonEvent;
TXButtonEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
root : TWindow;
subwindow : TWindow;
time : TTime;
x, y : cint;
x_root, y_root : cint;
state : cuint;
button : cuint;
same_screen : TBool;
end;
PXButtonPressedEvent = ^TXButtonPressedEvent;
TXButtonPressedEvent = TXButtonEvent;
PXButtonReleasedEvent = ^TXButtonReleasedEvent;
TXButtonReleasedEvent = TXButtonEvent;
PXMotionEvent = ^TXMotionEvent;
TXMotionEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
root : TWindow;
subwindow : TWindow;
time : TTime;
x, y : cint;
x_root, y_root : cint;
state : cuint;
is_hint : cchar;
same_screen : TBool;
end;
PXPointerMovedEvent = ^TXPointerMovedEvent;
TXPointerMovedEvent = TXMotionEvent;
PXCrossingEvent = ^TXCrossingEvent;
TXCrossingEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
root : TWindow;
subwindow : TWindow;
time : TTime;
x, y : cint;
x_root, y_root : cint;
mode : cint;
detail : cint;
same_screen : TBool;
focus : TBool;
state : cuint;
end;
PXEnterWindowEvent = ^TXEnterWindowEvent;
TXEnterWindowEvent = TXCrossingEvent;
PXLeaveWindowEvent = ^TXLeaveWindowEvent;
TXLeaveWindowEvent = TXCrossingEvent;
PXFocusChangeEvent = ^TXFocusChangeEvent;
TXFocusChangeEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
mode : cint;
detail : cint;
end;
PXFocusInEvent = ^TXFocusInEvent;
TXFocusInEvent = TXFocusChangeEvent;
PXFocusOutEvent = ^TXFocusOutEvent;
TXFocusOutEvent = TXFocusChangeEvent;
PXKeymapEvent = ^TXKeymapEvent;
TXKeymapEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
key_vector : array[0..31] of cchar;
end;
PXExposeEvent = ^TXExposeEvent;
TXExposeEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
x, y : cint;
width, height : cint;
count : cint;
end;
PXGraphicsExposeEvent = ^TXGraphicsExposeEvent;
TXGraphicsExposeEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
drawable : TDrawable;
x, y : cint;
width, height : cint;
count : cint;
major_code : cint;
minor_code : cint;
end;
PXNoExposeEvent = ^TXNoExposeEvent;
TXNoExposeEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
drawable : TDrawable;
major_code : cint;
minor_code : cint;
end;
PXVisibilityEvent = ^TXVisibilityEvent;
TXVisibilityEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
state : cint;
end;
PXCreateWindowEvent = ^TXCreateWindowEvent;
TXCreateWindowEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
parent : TWindow;
window : TWindow;
x, y : cint;
width, height : cint;
border_width : cint;
override_redirect : TBool;
end;
PXDestroyWindowEvent = ^TXDestroyWindowEvent;
TXDestroyWindowEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
event : TWindow;
window : TWindow;
end;
PXUnmapEvent = ^TXUnmapEvent;
TXUnmapEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
event : TWindow;
window : TWindow;
from_configure : TBool;
end;
PXMapEvent = ^TXMapEvent;
TXMapEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
event : TWindow;
window : TWindow;
override_redirect : TBool;
end;
PXMapRequestEvent = ^TXMapRequestEvent;
TXMapRequestEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
parent : TWindow;
window : TWindow;
end;
PXReparentEvent = ^TXReparentEvent;
TXReparentEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
event : TWindow;
window : TWindow;
parent : TWindow;
x, y : cint;
override_redirect : TBool;
end;
PXConfigureEvent = ^TXConfigureEvent;
TXConfigureEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
event : TWindow;
window : TWindow;
x, y : cint;
width, height : cint;
border_width : cint;
above : TWindow;
override_redirect : TBool;
end;
PXGravityEvent = ^TXGravityEvent;
TXGravityEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
event : TWindow;
window : TWindow;
x, y : cint;
end;
PXResizeRequestEvent = ^TXResizeRequestEvent;
TXResizeRequestEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
width, height : cint;
end;
PXConfigureRequestEvent = ^TXConfigureRequestEvent;
TXConfigureRequestEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
parent : TWindow;
window : TWindow;
x, y : cint;
width, height : cint;
border_width : cint;
above : TWindow;
detail : cint;
value_mask : culong;
end;
PXCirculateEvent = ^TXCirculateEvent;
TXCirculateEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
event : TWindow;
window : TWindow;
place : cint;
end;
PXCirculateRequestEvent = ^TXCirculateRequestEvent;
TXCirculateRequestEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
parent : TWindow;
window : TWindow;
place : cint;
end;
PXPropertyEvent = ^TXPropertyEvent;
TXPropertyEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
atom : TAtom;
time : TTime;
state : cint;
end;
PXSelectionClearEvent = ^TXSelectionClearEvent;
TXSelectionClearEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
selection : TAtom;
time : TTime;
end;
PXSelectionRequestEvent = ^TXSelectionRequestEvent;
TXSelectionRequestEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
owner : TWindow;
requestor : TWindow;
selection : TAtom;
target : TAtom;
_property : TAtom;
time : TTime;
end;
PXSelectionEvent = ^TXSelectionEvent;
TXSelectionEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
requestor : TWindow;
selection : TAtom;
target : TAtom;
_property : TAtom;
time : TTime;
end;
PXColormapEvent = ^TXColormapEvent;
TXColormapEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
colormap : TColormap;
c_new : TBool;
state : cint;
end;
PXClientMessageEvent = ^TXClientMessageEvent;
TXClientMessageEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
message_type : TAtom;
format : cint;
data : record
case longint of
0 : ( b : array[0..19] of cchar );
1 : ( s : array[0..9] of cshort );
2 : ( l : array[0..4] of clong );
end;
end;
PXMappingEvent = ^TXMappingEvent;
TXMappingEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
request : cint;
first_keycode : cint;
count : cint;
end;
PXErrorEvent = ^TXErrorEvent;
TXErrorEvent = record
_type : cint;
display : PDisplay;
resourceid : TXID;
serial : culong;
error_code : cuchar;
request_code : cuchar;
minor_code : cuchar;
end;
PXAnyEvent = ^TXAnyEvent;
TXAnyEvent = record
_type : cint;
serial : culong;
send_event : TBool;
display : PDisplay;
window : TWindow;
end;
PXEvent = ^TXEvent;
TXEvent = record
case longint of
0 : ( _type : cint );
1 : ( xany : TXAnyEvent );
2 : ( xkey : TXKeyEvent );
3 : ( xbutton : TXButtonEvent );
4 : ( xmotion : TXMotionEvent );
5 : ( xcrossing : TXCrossingEvent );
6 : ( xfocus : TXFocusChangeEvent );
7 : ( xexpose : TXExposeEvent );
8 : ( xgraphicsexpose : TXGraphicsExposeEvent );
9 : ( xnoexpose : TXNoExposeEvent );
10 : ( xvisibility : TXVisibilityEvent );
11 : ( xcreatewindow : TXCreateWindowEvent );
12 : ( xdestroywindow : TXDestroyWindowEvent );
13 : ( xunmap : TXUnmapEvent );
14 : ( xmap : TXMapEvent );
15 : ( xmaprequest : TXMapRequestEvent );
16 : ( xreparent : TXReparentEvent );
17 : ( xconfigure : TXConfigureEvent );
18 : ( xgravity : TXGravityEvent );
19 : ( xresizerequest : TXResizeRequestEvent );
20 : ( xconfigurerequest : TXConfigureRequestEvent );
21 : ( xcirculate : TXCirculateEvent );
22 : ( xcirculaterequest : TXCirculateRequestEvent );
23 : ( xproperty : TXPropertyEvent );
24 : ( xselectionclear : TXSelectionClearEvent );
25 : ( xselectionrequest : TXSelectionRequestEvent );
26 : ( xselection : TXSelectionEvent );
27 : ( xcolormap : TXColormapEvent );
28 : ( xclient : TXClientMessageEvent );
29 : ( xmapping : TXMappingEvent );
30 : ( xerror : TXErrorEvent );
31 : ( xkeymap : TXKeymapEvent );
32 : ( pad : array[0..23] of clong );
end;
type
PXCharStruct = ^TXCharStruct;
TXCharStruct = record
lbearing : cshort;
rbearing : cshort;
width : cshort;
ascent : cshort;
descent : cshort;
attributes : cushort;
end;
PXFontProp = ^TXFontProp;
TXFontProp = record
name : TAtom;
card32 : culong;
end;
PPPXFontStruct = ^PPXFontStruct;
PPXFontStruct = ^PXFontStruct;
PXFontStruct = ^TXFontStruct;
TXFontStruct = record
ext_data : PXExtData;
fid : TFont;
direction : cunsigned;
min_char_or_byte2 : cunsigned;
max_char_or_byte2 : cunsigned;
min_byte1 : cunsigned;
max_byte1 : cunsigned;
all_chars_exist : TBool;
default_char : cunsigned;
n_properties : cint;
properties : PXFontProp;
min_bounds : TXCharStruct;
max_bounds : TXCharStruct;
per_char : PXCharStruct;
ascent : cint;
descent : cint;
end;
PXTextItem = ^TXTextItem;
TXTextItem = record
chars : Pchar;
nchars : cint;
delta : cint;
font : TFont;
end;
PXChar2b = ^TXChar2b;
TXChar2b = record
byte1 : cuchar;
byte2 : cuchar;
end;
PXTextItem16 = ^TXTextItem16;
TXTextItem16 = record
chars : PXChar2b;
nchars : cint;
delta : cint;
font : TFont;
end;
PXEDataObject = ^TXEDataObject;
TXEDataObject = record
case longint of
0 : ( display : PDisplay );
1 : ( gc : TGC );
2 : ( visual : PVisual );
3 : ( screen : PScreen );
4 : ( pixmap_format : PScreenFormat );
5 : ( font : PXFontStruct );
end;
PXFontSetExtents = ^TXFontSetExtents;
TXFontSetExtents = record
max_ink_extent : TXRectangle;
max_logical_extent : TXRectangle;
end;
PXOM = ^TXOM;
TXOM = record
end;
PXOC = ^TXOC;
TXOC = record
end;
TXFontSet = PXOC;
PXFontSet = ^TXFontSet;
PXmbTextItem = ^TXmbTextItem;
TXmbTextItem = record
chars : Pchar;
nchars : cint;
delta : cint;
font_set : TXFontSet;
end;
PXwcTextItem = ^TXwcTextItem;
TXwcTextItem = record
chars : PWideChar; {wchar_t*}
nchars : cint;
delta : cint;
font_set : TXFontSet;
end;
const
XNRequiredCharSet = 'requiredCharSet';
XNQueryOrientation = 'queryOrientation';
XNBaseFontName = 'baseFontName';
XNOMAutomatic = 'omAutomatic';
XNMissingCharSet = 'missingCharSet';
XNDefaultString = 'defaultString';
XNOrientation = 'orientation';
XNDirectionalDependentDrawing = 'directionalDependentDrawing';
XNContextualDrawing = 'contextualDrawing';
XNFontInfo = 'fontInfo';
type
PXOMCharSetList = ^TXOMCharSetList;
TXOMCharSetList = record
charset_count : cint;
charset_list : PPChar;
end;
PXOrientation = ^TXOrientation;
TXOrientation = (XOMOrientation_LTR_TTB,XOMOrientation_RTL_TTB,
XOMOrientation_TTB_LTR,XOMOrientation_TTB_RTL,
XOMOrientation_Context);
PXOMOrientation = ^TXOMOrientation;
TXOMOrientation = record
num_orientation : cint;
orientation : PXOrientation;
end;
PXOMFontInfo = ^TXOMFontInfo;
TXOMFontInfo = record
num_font : cint;
font_struct_list : ^PXFontStruct;
font_name_list : PPChar;
end;
PXIM = ^TXIM;
TXIM = record
end;
PXIC = ^TXIC;
TXIC = record
end;
TXIMProc = procedure (para1:TXIM; para2:TXPointer; para3:TXPointer);cdecl;
TXICProc = function (para1:TXIC; para2:TXPointer; para3:TXPointer):TBool;cdecl;
TXIDProc = procedure (para1:PDisplay; para2:TXPointer; para3:TXPointer);cdecl;
PXIMStyle = ^TXIMStyle;
TXIMStyle = culong;
PXIMStyles = ^TXIMStyles;
TXIMStyles = record
count_styles : cushort;
supported_styles : PXIMStyle;
end;
const
XIMPreeditArea = $0001;
XIMPreeditCallbacks = $0002;
XIMPreeditPosition = $0004;
XIMPreeditNothing = $0008;
XIMPreeditNone = $0010;
XIMStatusArea = $0100;
XIMStatusCallbacks = $0200;
XIMStatusNothing = $0400;
XIMStatusNone = $0800;
XNVaNestedList = 'XNVaNestedList';
XNQueryInputStyle = 'queryInputStyle';
XNClientWindow = 'clientWindow';
XNInputStyle = 'inputStyle';
XNFocusWindow = 'focusWindow';
XNResourceName = 'resourceName';
XNResourceClass = 'resourceClass';
XNGeometryCallback = 'geometryCallback';
XNDestroyCallback = 'destroyCallback';
XNFilterEvents = 'filterEvents';
XNPreeditStartCallback = 'preeditStartCallback';
XNPreeditDoneCallback = 'preeditDoneCallback';
XNPreeditDrawCallback = 'preeditDrawCallback';
XNPreeditCaretCallback = 'preeditCaretCallback';
XNPreeditStateNotifyCallback = 'preeditStateNotifyCallback';
XNPreeditAttributes = 'preeditAttributes';
XNStatusStartCallback = 'statusStartCallback';
XNStatusDoneCallback = 'statusDoneCallback';
XNStatusDrawCallback = 'statusDrawCallback';
XNStatusAttributes = 'statusAttributes';
XNArea = 'area';
XNAreaNeeded = 'areaNeeded';
XNSpotLocation = 'spotLocation';
XNColormap = 'colorMap';
XNStdColormap = 'stdColorMap';
XNForeground = 'foreground';
XNBackground = 'background';
XNBackgroundPixmap = 'backgroundPixmap';
XNFontSet = 'fontSet';
XNLineSpace = 'lineSpace';
XNCursor = 'cursor';
XNQueryIMValuesList = 'queryIMValuesList';
XNQueryICValuesList = 'queryICValuesList';
XNVisiblePosition = 'visiblePosition';
XNR6PreeditCallback = 'r6PreeditCallback';
XNStringConversionCallback = 'stringConversionCallback';
XNStringConversion = 'stringConversion';
XNResetState = 'resetState';
XNHotKey = 'hotKey';
XNHotKeyState = 'hotKeyState';
XNPreeditState = 'preeditState';
XNSeparatorofNestedList = 'separatorofNestedList';
XBufferOverflow = -(1);
XLookupNone = 1;
XLookupChars = 2;
XLookupKeySymVal = 3;
XLookupBoth = 4;
type
PXVaNestedList = ^TXVaNestedList;
TXVaNestedList = pointer;
PXIMCallback = ^TXIMCallback;
TXIMCallback = record
client_data : TXPointer;
callback : TXIMProc;
end;
PXICCallback = ^TXICCallback;
TXICCallback = record
client_data : TXPointer;
callback : TXICProc;
end;
PXIMFeedback = ^TXIMFeedback;
TXIMFeedback = culong;
const
XIMReverse = 1;
XIMUnderline = 1 shl 1;
XIMHighlight = 1 shl 2;
XIMPrimary = 1 shl 5;
XIMSecondary = 1 shl 6;
XIMTertiary = 1 shl 7;
XIMVisibleToForward = 1 shl 8;
XIMVisibleToBackword = 1 shl 9;
XIMVisibleToCenter = 1 shl 10;
type
PXIMText = ^TXIMText;
TXIMText = record
length : cushort;
feedback : PXIMFeedback;
encoding_is_wchar : TBool;
_string : record
case longint of
0 : ( multi_byte : Pchar );
1 : ( wide_char : PWideChar ); {wchar_t*}
end;
end;
PXIMPreeditState = ^TXIMPreeditState;
TXIMPreeditState = culong;
const
XIMPreeditUnKnown = 0;
XIMPreeditEnable = 1;
XIMPreeditDisable = 1 shl 1;
type
PXIMPreeditStateNotifyCallbackStruct = ^TXIMPreeditStateNotifyCallbackStruct;
TXIMPreeditStateNotifyCallbackStruct = record
state : TXIMPreeditState;
end;
PXIMResetState = ^TXIMResetState;
TXIMResetState = culong;
const
XIMInitialState = 1;
XIMPreserveState = 1 shl 1;
type
PXIMStringConversionFeedback = ^TXIMStringConversionFeedback;
TXIMStringConversionFeedback = culong;
const
XIMStringConversionLeftEdge = $00000001;
XIMStringConversionRightEdge = $00000002;
XIMStringConversionTopEdge = $00000004;
XIMStringConversionBottomEdge = $00000008;
XIMStringConversionConcealed = $00000010;
XIMStringConversionWrapped = $00000020;
type
PXIMStringConversionText = ^TXIMStringConversionText;
TXIMStringConversionText = record
length : cushort;
feedback : PXIMStringConversionFeedback;
encoding_is_wchar : TBool;
_string : record
case longint of
0 : ( mbs : Pchar );
1 : ( wcs : PWideChar ); {wchar_t*}
end;
end;
PXIMStringConversionPosition = ^TXIMStringConversionPosition;
TXIMStringConversionPosition = cushort;
PXIMStringConversionType = ^TXIMStringConversionType;
TXIMStringConversionType = cushort;
const
XIMStringConversionBuffer = $0001;
XIMStringConversionLine = $0002;
XIMStringConversionWord = $0003;
XIMStringConversionChar = $0004;
type
PXIMStringConversionOperation = ^TXIMStringConversionOperation;
TXIMStringConversionOperation = cushort;
const
XIMStringConversionSubstitution = $0001;
XIMStringConversionRetrieval = $0002;
type
PXIMCaretDirection = ^TXIMCaretDirection;
TXIMCaretDirection = (XIMForwardChar,XIMBackwardChar,XIMForwardWord,
XIMBackwardWord,XIMCaretUp,XIMCaretDown,
XIMNextLine,XIMPreviousLine,XIMLineStart,
XIMLineEnd,XIMAbsolutePosition,XIMDontChange
);
PXIMStringConversionCallbackStruct = ^TXIMStringConversionCallbackStruct;
TXIMStringConversionCallbackStruct = record
position : TXIMStringConversionPosition;
direction : TXIMCaretDirection;
operation : TXIMStringConversionOperation;
factor : cushort;
text : PXIMStringConversionText;
end;
PXIMPreeditDrawCallbackStruct = ^TXIMPreeditDrawCallbackStruct;
TXIMPreeditDrawCallbackStruct = record
caret : cint;
chg_first : cint;
chg_length : cint;
text : PXIMText;
end;
PXIMCaretStyle = ^TXIMCaretStyle;
TXIMCaretStyle = (XIMIsInvisible,XIMIsPrimary,XIMIsSecondary
);
PXIMPreeditCaretCallbackStruct = ^TXIMPreeditCaretCallbackStruct;
TXIMPreeditCaretCallbackStruct = record
position : cint;
direction : TXIMCaretDirection;
style : TXIMCaretStyle;
end;
PXIMStatusDataType = ^TXIMStatusDataType;
TXIMStatusDataType = (XIMTextType,XIMBitmapType);
PXIMStatusDrawCallbackStruct = ^TXIMStatusDrawCallbackStruct;
TXIMStatusDrawCallbackStruct = record
_type : TXIMStatusDataType;
data : record
case longint of
0 : ( text : PXIMText );
1 : ( bitmap : TPixmap );
end;
end;
PXIMHotKeyTrigger = ^TXIMHotKeyTrigger;
TXIMHotKeyTrigger = record
keysym : TKeySym;
modifier : cint;
modifier_mask : cint;
end;
PXIMHotKeyTriggers = ^TXIMHotKeyTriggers;
TXIMHotKeyTriggers = record
num_hot_key : cint;
key : PXIMHotKeyTrigger;
end;
PXIMHotKeyState = ^TXIMHotKeyState;
TXIMHotKeyState = culong;
const
XIMHotKeyStateON = $0001;
XIMHotKeyStateOFF = $0002;
type
PXIMValuesList = ^TXIMValuesList;
TXIMValuesList = record
count_values : cushort;
supported_values : PPChar;
end;
{$ifndef os2}
var
_Xdebug : cint;cvar;external;
{$endif}
type
funcdisp = function(display:PDisplay):cint;cdecl;
funcifevent = function(display:PDisplay; event:PXEvent; p : TXPointer):TBool;cdecl;
chararr32 = array[0..31] of char;
const
AllPlanes : culong = culong(not 0);
function XLoadQueryFont(para1:PDisplay; para2:Pchar):PXFontStruct;cdecl;external libX11;
function XQueryFont(para1:PDisplay; para2:TXID):PXFontStruct;cdecl;external libX11;
function XGetMotionEvents(para1:PDisplay; para2:TWindow; para3:TTime; para4:TTime; para5:Pcint):PXTimeCoord;cdecl;external libX11;
function XDeleteModifiermapEntry(para1:PXModifierKeymap; para2:TKeyCode; para3:cint):PXModifierKeymap;cdecl;external libX11;
function XGetModifierMapping(para1:PDisplay):PXModifierKeymap;cdecl;external libX11;
function XInsertModifiermapEntry(para1:PXModifierKeymap; para2:TKeyCode; para3:cint):PXModifierKeymap;cdecl;external libX11;
function XNewModifiermap(para1:cint):PXModifierKeymap;cdecl;external libX11;
function XCreateImage(para1:PDisplay; para2:PVisual; para3:cuint; para4:cint; para5:cint;
para6:Pchar; para7:cuint; para8:cuint; para9:cint; para10:cint):PXImage;cdecl;external libX11;
function XInitImage(para1:PXImage):TStatus;cdecl;external libX11;
function XGetImage(para1:PDisplay; para2:TDrawable; para3:cint; para4:cint; para5:cuint;
para6:cuint; para7:culong; para8:cint):PXImage;cdecl;external libX11;
function XGetSubImage(para1:PDisplay; para2:TDrawable; para3:cint; para4:cint; para5:cuint;
para6:cuint; para7:culong; para8:cint; para9:PXImage; para10:cint;
para11:cint):PXImage;cdecl;external libX11;
function XOpenDisplay(para1:Pchar):PDisplay;cdecl;external libX11;
procedure XrmInitialize;cdecl;external libX11;
function XFetchBytes(para1:PDisplay; para2:Pcint):Pchar;cdecl;external libX11;
function XFetchBuffer(para1:PDisplay; para2:Pcint; para3:cint):Pchar;cdecl;external libX11;
function XGetAtomName(para1:PDisplay; para2:TAtom):Pchar;cdecl;external libX11;
function XGetAtomNames(para1:PDisplay; para2:PAtom; para3:cint; para4:PPchar):TStatus;cdecl;external libX11;
function XGetDefault(para1:PDisplay; para2:Pchar; para3:Pchar):Pchar;cdecl;external libX11;
function XDisplayName(para1:Pchar):Pchar;cdecl;external libX11;
function XKeysymToString(para1:TKeySym):Pchar;cdecl;external libX11;
function XSynchronize(para1:PDisplay; para2:TBool):funcdisp;cdecl;external libX11;
function XSetAfterFunction(para1:PDisplay; para2:funcdisp):funcdisp;cdecl;external libX11;
function XInternAtom(para1:PDisplay; para2:Pchar; para3:TBool):TAtom;cdecl;external libX11;
function XInternAtoms(para1:PDisplay; para2:PPchar; para3:cint; para4:TBool; para5:PAtom):TStatus;cdecl;external libX11;
function XCopyColormapAndFree(para1:PDisplay; para2:TColormap):TColormap;cdecl;external libX11;
function XCreateColormap(para1:PDisplay; para2:TWindow; para3:PVisual; para4:cint):TColormap;cdecl;external libX11;
function XCreatePixmapCursor(para1:PDisplay; para2:TPixmap; para3:TPixmap; para4:PXColor; para5:PXColor;
para6:cuint; para7:cuint):TCursor;cdecl;external libX11;
function XCreateGlyphCursor(para1:PDisplay; para2:TFont; para3:TFont; para4:cuint; para5:cuint;
para6:PXColor; para7:PXColor):TCursor;cdecl;external libX11;
function XCreateFontCursor(para1:PDisplay; para2:cuint):TCursor;cdecl;external libX11;
function XLoadFont(para1:PDisplay; para2:Pchar):TFont;cdecl;external libX11;
function XCreateGC(para1:PDisplay; para2:TDrawable; para3:culong; para4:PXGCValues):TGC;cdecl;external libX11;
function XGContextFromGC(para1:TGC):TGContext;cdecl;external libX11;
procedure XFlushGC(para1:PDisplay; para2:TGC);cdecl;external libX11;
function XCreatePixmap(para1:PDisplay; para2:TDrawable; para3:cuint; para4:cuint; para5:cuint):TPixmap;cdecl;external libX11;
function XCreateBitmapFromData(para1:PDisplay; para2:TDrawable; para3:Pchar; para4:cuint; para5:cuint):TPixmap;cdecl;external libX11;
function XCreatePixmapFromBitmapData(para1:PDisplay; para2:TDrawable; para3:Pchar; para4:cuint; para5:cuint;
para6:culong; para7:culong; para8:cuint):TPixmap;cdecl;external libX11;
function XCreateSimpleWindow(para1:PDisplay; para2:TWindow; para3:cint; para4:cint; para5:cuint;
para6:cuint; para7:cuint; para8:culong; para9:culong):TWindow;cdecl;external libX11;
function XGetSelectionOwner(para1:PDisplay; para2:TAtom):TWindow;cdecl;external libX11;
function XCreateWindow(para1:PDisplay; para2:TWindow; para3:cint; para4:cint; para5:cuint;
para6:cuint; para7:cuint; para8:cint; para9:cuint; para10:PVisual;
para11:culong; para12:PXSetWindowAttributes):TWindow;cdecl;external libX11;
function XListInstalledColormaps(para1:PDisplay; para2:TWindow; para3:Pcint):PColormap;cdecl;external libX11;
function XListFonts(para1:PDisplay; para2:Pchar; para3:cint; para4:Pcint):PPChar;cdecl;external libX11;
function XListFontsWithInfo(para1:PDisplay; para2:Pchar; para3:cint; para4:Pcint; para5:PPXFontStruct):PPChar;cdecl;external libX11;
function XGetFontPath(para1:PDisplay; para2:Pcint):PPChar;cdecl;external libX11;
function XListExtensions(para1:PDisplay; para2:Pcint):PPChar;cdecl;external libX11;
function XListProperties(para1:PDisplay; para2:TWindow; para3:Pcint):PAtom;cdecl;external libX11;
function XListHosts(para1:PDisplay; para2:Pcint; para3:PBool):PXHostAddress;cdecl;external libX11;
function XKeycodeToKeysym(para1:PDisplay; para2:TKeyCode; para3:cint):TKeySym;cdecl;external libX11;
function XLookupKeysym(para1:PXKeyEvent; para2:cint):TKeySym;cdecl;external libX11;
function XGetKeyboardMapping(para1:PDisplay; para2:TKeyCode; para3:cint; para4:Pcint):PKeySym;cdecl;external libX11;
function XStringToKeysym(para1:Pchar):TKeySym;cdecl;external libX11;
function XMaxRequestSize(para1:PDisplay):clong;cdecl;external libX11;
function XExtendedMaxRequestSize(para1:PDisplay):clong;cdecl;external libX11;
function XResourceManagerString(para1:PDisplay):Pchar;cdecl;external libX11;
function XScreenResourceString(para1:PScreen):Pchar;cdecl;external libX11;
function XDisplayMotionBufferSize(para1:PDisplay):culong;cdecl;external libX11;
function XVisualIDFromVisual(para1:PVisual):TVisualID;cdecl;external libX11;
function XInitThreads:TStatus;cdecl;external libX11;
procedure XLockDisplay(para1:PDisplay);cdecl;external libX11;
procedure XUnlockDisplay(para1:PDisplay);cdecl;external libX11;
function XInitExtension(para1:PDisplay; para2:Pchar):PXExtCodes;cdecl;external libX11;
function XAddExtension(para1:PDisplay):PXExtCodes;cdecl;external libX11;
function XFindOnExtensionList(para1:PPXExtData; para2:cint):PXExtData;cdecl;external libX11;
function XEHeadOfExtensionList(para1:TXEDataObject):PPXExtData;cdecl;external libX11;
function XRootWindow(para1:PDisplay; para2:cint):TWindow;cdecl;external libX11;
function XDefaultRootWindow(para1:PDisplay):TWindow;cdecl;external libX11;
function XRootWindowOfScreen(para1:PScreen):TWindow;cdecl;external libX11;
function XDefaultVisual(para1:PDisplay; para2:cint):PVisual;cdecl;external libX11;
function XDefaultVisualOfScreen(para1:PScreen):PVisual;cdecl;external libX11;
function XDefaultGC(para1:PDisplay; para2:cint):TGC;cdecl;external libX11;
function XDefaultGCOfScreen(para1:PScreen):TGC;cdecl;external libX11;
function XBlackPixel(para1:PDisplay; para2:cint):culong;cdecl;external libX11;
function XWhitePixel(para1:PDisplay; para2:cint):culong;cdecl;external libX11;
function XAllPlanes:culong;cdecl;external libX11;
function XBlackPixelOfScreen(para1:PScreen):culong;cdecl;external libX11;
function XWhitePixelOfScreen(para1:PScreen):culong;cdecl;external libX11;
function XNextRequest(para1:PDisplay):culong;cdecl;external libX11;
function XLastKnownRequestProcessed(para1:PDisplay):culong;cdecl;external libX11;
function XServerVendor(para1:PDisplay):Pchar;cdecl;external libX11;
function XDisplayString(para1:PDisplay):Pchar;cdecl;external libX11;
function XDefaultColormap(para1:PDisplay; para2:cint):TColormap;cdecl;external libX11;
function XDefaultColormapOfScreen(para1:PScreen):TColormap;cdecl;external libX11;
function XDisplayOfScreen(para1:PScreen):PDisplay;cdecl;external libX11;
function XScreenOfDisplay(para1:PDisplay; para2:cint):PScreen;cdecl;external libX11;
function XDefaultScreenOfDisplay(para1:PDisplay):PScreen;cdecl;external libX11;
function XEventMaskOfScreen(para1:PScreen):clong;cdecl;external libX11;
function XScreenNumberOfScreen(para1:PScreen):cint;cdecl;external libX11;
type
TXErrorHandler = function (para1:PDisplay; para2:PXErrorEvent):cint;cdecl;
function XSetErrorHandler(para1:TXErrorHandler):TXErrorHandler;cdecl;external libX11;
type
TXIOErrorHandler = function (para1:PDisplay):cint;cdecl;
function XSetIOErrorHandler(para1:TXIOErrorHandler):TXIOErrorHandler;cdecl;external libX11;
function XListPixmapFormats(para1:PDisplay; para2:Pcint):PXPixmapFormatValues;cdecl;external libX11;
function XListDepths(para1:PDisplay; para2:cint; para3:Pcint):Pcint;cdecl;external libX11;
function XReconfigureWMWindow(para1:PDisplay; para2:TWindow; para3:cint; para4:cuint; para5:PXWindowChanges):TStatus;cdecl;external libX11;
function XGetWMProtocols(para1:PDisplay; para2:TWindow; para3:PPAtom; para4:Pcint):TStatus;cdecl;external libX11;
function XSetWMProtocols(para1:PDisplay; para2:TWindow; para3:PAtom; para4:cint):TStatus;cdecl;external libX11;
function XIconifyWindow(para1:PDisplay; para2:TWindow; para3:cint):TStatus;cdecl;external libX11;
function XWithdrawWindow(para1:PDisplay; para2:TWindow; para3:cint):TStatus;cdecl;external libX11;
function XGetCommand(para1:PDisplay; para2:TWindow; para3:PPPchar; para4:Pcint):TStatus;cdecl;external libX11;
function XGetWMColormapWindows(para1:PDisplay; para2:TWindow; para3:PPWindow; para4:Pcint):TStatus;cdecl;external libX11;
function XSetWMColormapWindows(para1:PDisplay; para2:TWindow; para3:PWindow; para4:cint):TStatus;cdecl;external libX11;
procedure XFreeStringList(para1:PPchar);cdecl;external libX11;
function XSetTransientForHint(para1:PDisplay; para2:TWindow; para3:TWindow):cint;cdecl;external libX11;
function XActivateScreenSaver(para1:PDisplay):cint;cdecl;external libX11;
function XAddHost(para1:PDisplay; para2:PXHostAddress):cint;cdecl;external libX11;
function XAddHosts(para1:PDisplay; para2:PXHostAddress; para3:cint):cint;cdecl;external libX11;
function XAddToExtensionList(para1:PPXExtData; para2:PXExtData):cint;cdecl;external libX11;
function XAddToSaveSet(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XAllocColor(para1:PDisplay; para2:TColormap; para3:PXColor):TStatus;cdecl;external libX11;
function XAllocColorCells(para1:PDisplay; para2:TColormap; para3:TBool; para4:Pculong; para5:cuint;
para6:Pculong; para7:cuint):TStatus;cdecl;external libX11;
function XAllocColorPlanes(para1:PDisplay; para2:TColormap; para3:TBool; para4:Pculong; para5:cint;
para6:cint; para7:cint; para8:cint; para9:Pculong; para10:Pculong;
para11:Pculong):TStatus;cdecl;external libX11;
function XAllocNamedColor(para1:PDisplay; para2:TColormap; para3:Pchar; para4:PXColor; para5:PXColor):TStatus;cdecl;external libX11;
function XAllowEvents(para1:PDisplay; para2:cint; para3:TTime):cint;cdecl;external libX11;
function XAutoRepeatOff(para1:PDisplay):cint;cdecl;external libX11;
function XAutoRepeatOn(para1:PDisplay):cint;cdecl;external libX11;
function XBell(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XBitmapBitOrder(para1:PDisplay):cint;cdecl;external libX11;
function XBitmapPad(para1:PDisplay):cint;cdecl;external libX11;
function XBitmapUnit(para1:PDisplay):cint;cdecl;external libX11;
function XCellsOfScreen(para1:PScreen):cint;cdecl;external libX11;
function XChangeActivePointerGrab(para1:PDisplay; para2:cuint; para3:TCursor; para4:TTime):cint;cdecl;external libX11;
function XChangeGC(para1:PDisplay; para2:TGC; para3:culong; para4:PXGCValues):cint;cdecl;external libX11;
function XChangeKeyboardControl(para1:PDisplay; para2:culong; para3:PXKeyboardControl):cint;cdecl;external libX11;
function XChangeKeyboardMapping(para1:PDisplay; para2:cint; para3:cint; para4:PKeySym; para5:cint):cint;cdecl;external libX11;
function XChangePointerControl(para1:PDisplay; para2:TBool; para3:TBool; para4:cint; para5:cint;
para6:cint):cint;cdecl;external libX11;
function XChangeProperty(para1:PDisplay; para2:TWindow; para3:TAtom; para4:TAtom; para5:cint;
para6:cint; para7:Pcuchar; para8:cint):cint;cdecl;external libX11;
function XChangeSaveSet(para1:PDisplay; para2:TWindow; para3:cint):cint;cdecl;external libX11;
function XChangeWindowAttributes(para1:PDisplay; para2:TWindow; para3:culong; para4:PXSetWindowAttributes):cint;cdecl;external libX11;
function XCheckIfEvent(para1:PDisplay; para2:PXEvent; para3:funcifevent; para4:TXPointer):TBool;cdecl;external libX11;
function XCheckMaskEvent(para1:PDisplay; para2:clong; para3:PXEvent):TBool;cdecl;external libX11;
function XCheckTypedEvent(para1:PDisplay; para2:cint; para3:PXEvent):TBool;cdecl;external libX11;
function XCheckTypedWindowEvent(para1:PDisplay; para2:TWindow; para3:cint; para4:PXEvent):TBool;cdecl;external libX11;
function XCheckWindowEvent(para1:PDisplay; para2:TWindow; para3:clong; para4:PXEvent):TBool;cdecl;external libX11;
function XCirculateSubwindows(para1:PDisplay; para2:TWindow; para3:cint):cint;cdecl;external libX11;
function XCirculateSubwindowsDown(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XCirculateSubwindowsUp(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XClearArea(para1:PDisplay; para2:TWindow; para3:cint; para4:cint; para5:cuint;
para6:cuint; para7:TBool):cint;cdecl;external libX11;
function XClearWindow(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XCloseDisplay(para1:PDisplay):cint;cdecl;external libX11;
function XConfigureWindow(para1:PDisplay; para2:TWindow; para3:cuint; para4:PXWindowChanges):cint;cdecl;external libX11;
function XConnectionNumber(para1:PDisplay):cint;cdecl;external libX11;
function XConvertSelection(para1:PDisplay; para2:TAtom; para3:TAtom; para4:TAtom; para5:TWindow;
para6:TTime):cint;cdecl;external libX11;
function XCopyArea(para1:PDisplay; para2:TDrawable; para3:TDrawable; para4:TGC; para5:cint;
para6:cint; para7:cuint; para8:cuint; para9:cint; para10:cint):cint;cdecl;external libX11;
function XCopyGC(para1:PDisplay; para2:TGC; para3:culong; para4:TGC):cint;cdecl;external libX11;
function XCopyPlane(para1:PDisplay; para2:TDrawable; para3:TDrawable; para4:TGC; para5:cint;
para6:cint; para7:cuint; para8:cuint; para9:cint; para10:cint;
para11:culong):cint;cdecl;external libX11;
function XDefaultDepth(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XDefaultDepthOfScreen(para1:PScreen):cint;cdecl;external libX11;
function XDefaultScreen(para1:PDisplay):cint;cdecl;external libX11;
function XDefineCursor(para1:PDisplay; para2:TWindow; para3:TCursor):cint;cdecl;external libX11;
function XDeleteProperty(para1:PDisplay; para2:TWindow; para3:TAtom):cint;cdecl;external libX11;
function XDestroyWindow(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XDestroySubwindows(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XDoesBackingStore(para1:PScreen):cint;cdecl;external libX11;
function XDoesSaveUnders(para1:PScreen):TBool;cdecl;external libX11;
function XDisableAccessControl(para1:PDisplay):cint;cdecl;external libX11;
function XDisplayCells(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XDisplayHeight(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XDisplayHeightMM(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XDisplayKeycodes(para1:PDisplay; para2:Pcint; para3:Pcint):cint;cdecl;external libX11;
function XDisplayPlanes(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XDisplayWidth(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XDisplayWidthMM(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XDrawArc(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:cuint; para7:cuint; para8:cint; para9:cint):cint;cdecl;external libX11;
function XDrawArcs(para1:PDisplay; para2:TDrawable; para3:TGC; para4:PXArc; para5:cint):cint;cdecl;external libX11;
function XDrawImageString(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:Pchar; para7:cint):cint;cdecl;external libX11;
function XDrawImageString16(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:PXChar2b; para7:cint):cint;cdecl;external libX11;
function XDrawLine(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:cint; para7:cint):cint;cdecl;external libX11;
function XDrawLines(para1:PDisplay; para2:TDrawable; para3:TGC; para4:PXPoint; para5:cint;
para6:cint):cint;cdecl;external libX11;
function XDrawPoint(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint):cint;cdecl;external libX11;
function XDrawPoints(para1:PDisplay; para2:TDrawable; para3:TGC; para4:PXPoint; para5:cint;
para6:cint):cint;cdecl;external libX11;
function XDrawRectangle(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:cuint; para7:cuint):cint;cdecl;external libX11;
function XDrawRectangles(para1:PDisplay; para2:TDrawable; para3:TGC; para4:PXRectangle; para5:cint):cint;cdecl;external libX11;
function XDrawSegments(para1:PDisplay; para2:TDrawable; para3:TGC; para4:PXSegment; para5:cint):cint;cdecl;external libX11;
function XDrawString(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:Pchar; para7:cint):cint;cdecl;external libX11;
function XDrawString16(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:PXChar2b; para7:cint):cint;cdecl;external libX11;
function XDrawText(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:PXTextItem; para7:cint):cint;cdecl;external libX11;
function XDrawText16(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:PXTextItem16; para7:cint):cint;cdecl;external libX11;
function XEnableAccessControl(para1:PDisplay):cint;cdecl;external libX11;
function XEventsQueued(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XFetchName(para1:PDisplay; para2:TWindow; para3:PPchar):TStatus;cdecl;external libX11;
function XFillArc(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:cuint; para7:cuint; para8:cint; para9:cint):cint;cdecl;external libX11;
function XFillArcs(para1:PDisplay; para2:TDrawable; para3:TGC; para4:PXArc; para5:cint):cint;cdecl;external libX11;
function XFillPolygon(para1:PDisplay; para2:TDrawable; para3:TGC; para4:PXPoint; para5:cint;
para6:cint; para7:cint):cint;cdecl;external libX11;
function XFillRectangle(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:cuint; para7:cuint):cint;cdecl;external libX11;
function XFillRectangles(para1:PDisplay; para2:TDrawable; para3:TGC; para4:PXRectangle; para5:cint):cint;cdecl;external libX11;
function XFlush(para1:PDisplay):cint;cdecl;external libX11;
function XForceScreenSaver(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XFree(para1:pointer):cint;cdecl;external libX11;
function XFreeColormap(para1:PDisplay; para2:TColormap):cint;cdecl;external libX11;
function XFreeColors(para1:PDisplay; para2:TColormap; para3:Pculong; para4:cint; para5:culong):cint;cdecl;external libX11;
function XFreeCursor(para1:PDisplay; para2:TCursor):cint;cdecl;external libX11;
function XFreeExtensionList(para1:PPchar):cint;cdecl;external libX11;
function XFreeFont(para1:PDisplay; para2:PXFontStruct):cint;cdecl;external libX11;
function XFreeFontInfo(para1:PPchar; para2:PXFontStruct; para3:cint):cint;cdecl;external libX11;
function XFreeFontNames(para1:PPchar):cint;cdecl;external libX11;
function XFreeFontPath(para1:PPchar):cint;cdecl;external libX11;
function XFreeGC(para1:PDisplay; para2:TGC):cint;cdecl;external libX11;
function XFreeModifiermap(para1:PXModifierKeymap):cint;cdecl;external libX11;
function XFreePixmap(para1:PDisplay; para2:TPixmap):cint;cdecl;external libX11;
function XGeometry(para1:PDisplay; para2:cint; para3:Pchar; para4:Pchar; para5:cuint;
para6:cuint; para7:cuint; para8:cint; para9:cint; para10:Pcint;
para11:Pcint; para12:Pcint; para13:Pcint):cint;cdecl;external libX11;
function XGetErrorDatabaseText(para1:PDisplay; para2:Pchar; para3:Pchar; para4:Pchar; para5:Pchar;
para6:cint):cint;cdecl;external libX11;
function XGetErrorText(para1:PDisplay; para2:cint; para3:Pchar; para4:cint):cint;cdecl;external libX11;
function XGetFontProperty(para1:PXFontStruct; para2:TAtom; para3:Pculong):TBool;cdecl;external libX11;
function XGetGCValues(para1:PDisplay; para2:TGC; para3:culong; para4:PXGCValues):TStatus;cdecl;external libX11;
function XGetGeometry(para1:PDisplay; para2:TDrawable; para3:PWindow; para4:Pcint; para5:Pcint;
para6:Pcuint; para7:Pcuint; para8:Pcuint; para9:Pcuint):TStatus;cdecl;external libX11;
function XGetIconName(para1:PDisplay; para2:TWindow; para3:PPchar):TStatus;cdecl;external libX11;
function XGetInputFocus(para1:PDisplay; para2:PWindow; para3:Pcint):cint;cdecl;external libX11;
function XGetKeyboardControl(para1:PDisplay; para2:PXKeyboardState):cint;cdecl;external libX11;
function XGetPointerControl(para1:PDisplay; para2:Pcint; para3:Pcint; para4:Pcint):cint;cdecl;external libX11;
function XGetPointerMapping(para1:PDisplay; para2:Pcuchar; para3:cint):cint;cdecl;external libX11;
function XGetScreenSaver(para1:PDisplay; para2:Pcint; para3:Pcint; para4:Pcint; para5:Pcint):cint;cdecl;external libX11;
function XGetTransientForHint(para1:PDisplay; para2:TWindow; para3:PWindow):TStatus;cdecl;external libX11;
function XGetWindowProperty(para1:PDisplay; para2:TWindow; para3:TAtom; para4:clong; para5:clong;
para6:TBool; para7:TAtom; para8:PAtom; para9:Pcint; para10:Pculong;
para11:Pculong; para12:PPcuchar):cint;cdecl;external libX11;
function XGetWindowAttributes(para1:PDisplay; para2:TWindow; para3:PXWindowAttributes):TStatus;cdecl;external libX11;
function XGrabButton(para1:PDisplay; para2:cuint; para3:cuint; para4:TWindow; para5:TBool;
para6:cuint; para7:cint; para8:cint; para9:TWindow; para10:TCursor):cint;cdecl;external libX11;
function XGrabKey(para1:PDisplay; para2:cint; para3:cuint; para4:TWindow; para5:TBool;
para6:cint; para7:cint):cint;cdecl;external libX11;
function XGrabKeyboard(para1:PDisplay; para2:TWindow; para3:TBool; para4:cint; para5:cint;
para6:TTime):cint;cdecl;external libX11;
function XGrabPointer(para1:PDisplay; para2:TWindow; para3:TBool; para4:cuint; para5:cint;
para6:cint; para7:TWindow; para8:TCursor; para9:TTime):cint;cdecl;external libX11;
function XGrabServer(para1:PDisplay):cint;cdecl;external libX11;
function XHeightMMOfScreen(para1:PScreen):cint;cdecl;external libX11;
function XHeightOfScreen(para1:PScreen):cint;cdecl;external libX11;
function XIfEvent(para1:PDisplay; para2:PXEvent; para3:funcifevent; para4:TXPointer):cint;cdecl;external libX11;
function XImageByteOrder(para1:PDisplay):cint;cdecl;external libX11;
function XInstallColormap(para1:PDisplay; para2:TColormap):cint;cdecl;external libX11;
function XKeysymToKeycode(para1:PDisplay; para2:TKeySym):TKeyCode;cdecl;external libX11;
function XKillClient(para1:PDisplay; para2:TXID):cint;cdecl;external libX11;
function XLookupColor(para1:PDisplay; para2:TColormap; para3:Pchar; para4:PXColor; para5:PXColor):TStatus;cdecl;external libX11;
function XLowerWindow(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XMapRaised(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XMapSubwindows(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XMapWindow(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XMaskEvent(para1:PDisplay; para2:clong; para3:PXEvent):cint;cdecl;external libX11;
function XMaxCmapsOfScreen(para1:PScreen):cint;cdecl;external libX11;
function XMinCmapsOfScreen(para1:PScreen):cint;cdecl;external libX11;
function XMoveResizeWindow(para1:PDisplay; para2:TWindow; para3:cint; para4:cint; para5:cuint;
para6:cuint):cint;cdecl;external libX11;
function XMoveWindow(para1:PDisplay; para2:TWindow; para3:cint; para4:cint):cint;cdecl;external libX11;
function XNextEvent(para1:PDisplay; para2:PXEvent):cint;cdecl;external libX11;
function XNoOp(para1:PDisplay):cint;cdecl;external libX11;
function XParseColor(para1:PDisplay; para2:TColormap; para3:Pchar; para4:PXColor):TStatus;cdecl;external libX11;
function XParseGeometry(para1:Pchar; para2:Pcint; para3:Pcint; para4:Pcuint; para5:Pcuint):cint;cdecl;external libX11;
function XPeekEvent(para1:PDisplay; para2:PXEvent):cint;cdecl;external libX11;
function XPeekIfEvent(para1:PDisplay; para2:PXEvent; para3:funcifevent; para4:TXPointer):cint;cdecl;external libX11;
function XPending(para1:PDisplay):cint;cdecl;external libX11;
function XPlanesOfScreen(para1:PScreen):cint;cdecl;external libX11;
function XProtocolRevision(para1:PDisplay):cint;cdecl;external libX11;
function XProtocolVersion(para1:PDisplay):cint;cdecl;external libX11;
function XPutBackEvent(para1:PDisplay; para2:PXEvent):cint;cdecl;external libX11;
function XPutImage(para1:PDisplay; para2:TDrawable; para3:TGC; para4:PXImage; para5:cint;
para6:cint; para7:cint; para8:cint; para9:cuint; para10:cuint):cint;cdecl;external libX11;
function XQLength(para1:PDisplay):cint;cdecl;external libX11;
function XQueryBestCursor(para1:PDisplay; para2:TDrawable; para3:cuint; para4:cuint; para5:Pcuint;
para6:Pcuint):TStatus;cdecl;external libX11;
function XQueryBestSize(para1:PDisplay; para2:cint; para3:TDrawable; para4:cuint; para5:cuint;
para6:Pcuint; para7:Pcuint):TStatus;cdecl;external libX11;
function XQueryBestStipple(para1:PDisplay; para2:TDrawable; para3:cuint; para4:cuint; para5:Pcuint;
para6:Pcuint):TStatus;cdecl;external libX11;
function XQueryBestTile(para1:PDisplay; para2:TDrawable; para3:cuint; para4:cuint; para5:Pcuint;
para6:Pcuint):TStatus;cdecl;external libX11;
function XQueryColor(para1:PDisplay; para2:TColormap; para3:PXColor):cint;cdecl;external libX11;
function XQueryColors(para1:PDisplay; para2:TColormap; para3:PXColor; para4:cint):cint;cdecl;external libX11;
function XQueryExtension(para1:PDisplay; para2:Pchar; para3:Pcint; para4:Pcint; para5:Pcint):TBool;cdecl;external libX11;
{?}
function XQueryKeymap(para1:PDisplay; para2:chararr32):cint;cdecl;external libX11;
function XQueryPointer(para1:PDisplay; para2:TWindow; para3:PWindow; para4:PWindow; para5:Pcint;
para6:Pcint; para7:Pcint; para8:Pcint; para9:Pcuint):TBool;cdecl;external libX11;
function XQueryTextExtents(para1:PDisplay; para2:TXID; para3:Pchar; para4:cint; para5:Pcint;
para6:Pcint; para7:Pcint; para8:PXCharStruct):cint;cdecl;external libX11;
function XQueryTextExtents16(para1:PDisplay; para2:TXID; para3:PXChar2b; para4:cint; para5:Pcint;
para6:Pcint; para7:Pcint; para8:PXCharStruct):cint;cdecl;external libX11;
function XQueryTree(para1:PDisplay; para2:TWindow; para3:PWindow; para4:PWindow; para5:PPWindow;
para6:Pcuint):TStatus;cdecl;external libX11;
function XRaiseWindow(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XReadBitmapFile(para1:PDisplay; para2:TDrawable; para3:Pchar; para4:Pcuint; para5:Pcuint;
para6:PPixmap; para7:Pcint; para8:Pcint):cint;cdecl;external libX11;
function XReadBitmapFileData(para1:Pchar; para2:Pcuint; para3:Pcuint; para4:PPcuchar; para5:Pcint;
para6:Pcint):cint;cdecl;external libX11;
function XRebindKeysym(para1:PDisplay; para2:TKeySym; para3:PKeySym; para4:cint; para5:Pcuchar;
para6:cint):cint;cdecl;external libX11;
function XRecolorCursor(para1:PDisplay; para2:TCursor; para3:PXColor; para4:PXColor):cint;cdecl;external libX11;
function XRefreshKeyboardMapping(para1:PXMappingEvent):cint;cdecl;external libX11;
function XRemoveFromSaveSet(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XRemoveHost(para1:PDisplay; para2:PXHostAddress):cint;cdecl;external libX11;
function XRemoveHosts(para1:PDisplay; para2:PXHostAddress; para3:cint):cint;cdecl;external libX11;
function XReparentWindow(para1:PDisplay; para2:TWindow; para3:TWindow; para4:cint; para5:cint):cint;cdecl;external libX11;
function XResetScreenSaver(para1:PDisplay):cint;cdecl;external libX11;
function XResizeWindow(para1:PDisplay; para2:TWindow; para3:cuint; para4:cuint):cint;cdecl;external libX11;
function XRestackWindows(para1:PDisplay; para2:PWindow; para3:cint):cint;cdecl;external libX11;
function XRotateBuffers(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XRotateWindowProperties(para1:PDisplay; para2:TWindow; para3:PAtom; para4:cint; para5:cint):cint;cdecl;external libX11;
function XScreenCount(para1:PDisplay):cint;cdecl;external libX11;
function XSelectInput(para1:PDisplay; para2:TWindow; para3:clong):cint;cdecl;external libX11;
function XSendEvent(para1:PDisplay; para2:TWindow; para3:TBool; para4:clong; para5:PXEvent):TStatus;cdecl;external libX11;
function XSetAccessControl(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XSetArcMode(para1:PDisplay; para2:TGC; para3:cint):cint;cdecl;external libX11;
function XSetBackground(para1:PDisplay; para2:TGC; para3:culong):cint;cdecl;external libX11;
function XSetClipMask(para1:PDisplay; para2:TGC; para3:TPixmap):cint;cdecl;external libX11;
function XSetClipOrigin(para1:PDisplay; para2:TGC; para3:cint; para4:cint):cint;cdecl;external libX11;
function XSetClipRectangles(para1:PDisplay; para2:TGC; para3:cint; para4:cint; para5:PXRectangle;
para6:cint; para7:cint):cint;cdecl;external libX11;
function XSetCloseDownMode(para1:PDisplay; para2:cint):cint;cdecl;external libX11;
function XSetCommand(para1:PDisplay; para2:TWindow; para3:PPchar; para4:cint):cint;cdecl;external libX11;
function XSetDashes(para1:PDisplay; para2:TGC; para3:cint; para4:Pchar; para5:cint):cint;cdecl;external libX11;
function XSetFillRule(para1:PDisplay; para2:TGC; para3:cint):cint;cdecl;external libX11;
function XSetFillStyle(para1:PDisplay; para2:TGC; para3:cint):cint;cdecl;external libX11;
function XSetFont(para1:PDisplay; para2:TGC; para3:TFont):cint;cdecl;external libX11;
function XSetFontPath(para1:PDisplay; para2:PPchar; para3:cint):cint;cdecl;external libX11;
function XSetForeground(para1:PDisplay; para2:TGC; para3:culong):cint;cdecl;external libX11;
function XSetFunction(para1:PDisplay; para2:TGC; para3:cint):cint;cdecl;external libX11;
function XSetGraphicsExposures(para1:PDisplay; para2:TGC; para3:TBool):cint;cdecl;external libX11;
function XSetIconName(para1:PDisplay; para2:TWindow; para3:Pchar):cint;cdecl;external libX11;
function XSetInputFocus(para1:PDisplay; para2:TWindow; para3:cint; para4:TTime):cint;cdecl;external libX11;
function XSetLineAttributes(para1:PDisplay; para2:TGC; para3:cuint; para4:cint; para5:cint;
para6:cint):cint;cdecl;external libX11;
function XSetModifierMapping(para1:PDisplay; para2:PXModifierKeymap):cint;cdecl;external libX11;
function XSetPlaneMask(para1:PDisplay; para2:TGC; para3:culong):cint;cdecl;external libX11;
function XSetPointerMapping(para1:PDisplay; para2:Pcuchar; para3:cint):cint;cdecl;external libX11;
function XSetScreenSaver(para1:PDisplay; para2:cint; para3:cint; para4:cint; para5:cint):cint;cdecl;external libX11;
function XSetSelectionOwner(para1:PDisplay; para2:TAtom; para3:TWindow; para4:TTime):cint;cdecl;external libX11;
function XSetState(para1:PDisplay; para2:TGC; para3:culong; para4:culong; para5:cint;
para6:culong):cint;cdecl;external libX11;
function XSetStipple(para1:PDisplay; para2:TGC; para3:TPixmap):cint;cdecl;external libX11;
function XSetSubwindowMode(para1:PDisplay; para2:TGC; para3:cint):cint;cdecl;external libX11;
function XSetTSOrigin(para1:PDisplay; para2:TGC; para3:cint; para4:cint):cint;cdecl;external libX11;
function XSetTile(para1:PDisplay; para2:TGC; para3:TPixmap):cint;cdecl;external libX11;
function XSetWindowBackground(para1:PDisplay; para2:TWindow; para3:culong):cint;cdecl;external libX11;
function XSetWindowBackgroundPixmap(para1:PDisplay; para2:TWindow; para3:TPixmap):cint;cdecl;external libX11;
function XSetWindowBorder(para1:PDisplay; para2:TWindow; para3:culong):cint;cdecl;external libX11;
function XSetWindowBorderPixmap(para1:PDisplay; para2:TWindow; para3:TPixmap):cint;cdecl;external libX11;
function XSetWindowBorderWidth(para1:PDisplay; para2:TWindow; para3:cuint):cint;cdecl;external libX11;
function XSetWindowColormap(para1:PDisplay; para2:TWindow; para3:TColormap):cint;cdecl;external libX11;
function XStoreBuffer(para1:PDisplay; para2:Pchar; para3:cint; para4:cint):cint;cdecl;external libX11;
function XStoreBytes(para1:PDisplay; para2:Pchar; para3:cint):cint;cdecl;external libX11;
function XStoreColor(para1:PDisplay; para2:TColormap; para3:PXColor):cint;cdecl;external libX11;
function XStoreColors(para1:PDisplay; para2:TColormap; para3:PXColor; para4:cint):cint;cdecl;external libX11;
function XStoreName(para1:PDisplay; para2:TWindow; para3:Pchar):cint;cdecl;external libX11;
function XStoreNamedColor(para1:PDisplay; para2:TColormap; para3:Pchar; para4:culong; para5:cint):cint;cdecl;external libX11;
function XSync(para1:PDisplay; para2:TBool):cint;cdecl;external libX11;
function XTextExtents(para1:PXFontStruct; para2:Pchar; para3:cint; para4:Pcint; para5:Pcint;
para6:Pcint; para7:PXCharStruct):cint;cdecl;external libX11;
function XTextExtents16(para1:PXFontStruct; para2:PXChar2b; para3:cint; para4:Pcint; para5:Pcint;
para6:Pcint; para7:PXCharStruct):cint;cdecl;external libX11;
function XTextWidth(para1:PXFontStruct; para2:Pchar; para3:cint):cint;cdecl;external libX11;
function XTextWidth16(para1:PXFontStruct; para2:PXChar2b; para3:cint):cint;cdecl;external libX11;
function XTranslateCoordinates(para1:PDisplay; para2:TWindow; para3:TWindow; para4:cint; para5:cint;
para6:Pcint; para7:Pcint; para8:PWindow):TBool;cdecl;external libX11;
function XUndefineCursor(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XUngrabButton(para1:PDisplay; para2:cuint; para3:cuint; para4:TWindow):cint;cdecl;external libX11;
function XUngrabKey(para1:PDisplay; para2:cint; para3:cuint; para4:TWindow):cint;cdecl;external libX11;
function XUngrabKeyboard(para1:PDisplay; para2:TTime):cint;cdecl;external libX11;
function XUngrabPointer(para1:PDisplay; para2:TTime):cint;cdecl;external libX11;
function XUngrabServer(para1:PDisplay):cint;cdecl;external libX11;
function XUninstallColormap(para1:PDisplay; para2:TColormap):cint;cdecl;external libX11;
function XUnloadFont(para1:PDisplay; para2:TFont):cint;cdecl;external libX11;
function XUnmapSubwindows(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XUnmapWindow(para1:PDisplay; para2:TWindow):cint;cdecl;external libX11;
function XVendorRelease(para1:PDisplay):cint;cdecl;external libX11;
function XWarpPointer(para1:PDisplay; para2:TWindow; para3:TWindow; para4:cint; para5:cint;
para6:cuint; para7:cuint; para8:cint; para9:cint):cint;cdecl;external libX11;
function XWidthMMOfScreen(para1:PScreen):cint;cdecl;external libX11;
function XWidthOfScreen(para1:PScreen):cint;cdecl;external libX11;
function XWindowEvent(para1:PDisplay; para2:TWindow; para3:clong; para4:PXEvent):cint;cdecl;external libX11;
function XWriteBitmapFile(para1:PDisplay; para2:Pchar; para3:TPixmap; para4:cuint; para5:cuint;
para6:cint; para7:cint):cint;cdecl;external libX11;
function XSupportsLocale:TBool;cdecl;external libX11;
function XSetLocaleModifiers(para1:Pchar):Pchar;cdecl;external libX11;
function XOpenOM(para1:PDisplay; para2:PXrmHashBucketRec; para3:Pchar; para4:Pchar):TXOM;cdecl;external libX11;
function XCloseOM(para1:TXOM):TStatus;cdecl;external libX11;
function XSetOMValues(para1:TXOM; dotdotdot:array of const):Pchar;cdecl;external libX11;
function XGetOMValues(para1:TXOM; dotdotdot:array of const):Pchar;cdecl;external libX11;
function XDisplayOfOM(para1:TXOM):PDisplay;cdecl;external libX11;
function XLocaleOfOM(para1:TXOM):Pchar;cdecl;external libX11;
function XCreateOC(para1:TXOM; dotdotdot:array of const):TXOC;cdecl;external libX11;
procedure XDestroyOC(para1:TXOC);cdecl;external libX11;
function XOMOfOC(para1:TXOC):TXOM;cdecl;external libX11;
function XSetOCValues(para1:TXOC; dotdotdot:array of const):Pchar;cdecl;external libX11;
function XGetOCValues(para1:TXOC; dotdotdot:array of const):Pchar;cdecl;external libX11;
function XCreateFontSet(para1:PDisplay; para2:Pchar; para3:PPPchar; para4:Pcint; para5:PPchar):TXFontSet;cdecl;external libX11;
procedure XFreeFontSet(para1:PDisplay; para2:TXFontSet);cdecl;external libX11;
function XFontsOfFontSet(para1:TXFontSet; para2:PPPXFontStruct; para3:PPPchar):cint;cdecl;external libX11;
function XBaseFontNameListOfFontSet(para1:TXFontSet):Pchar;cdecl;external libX11;
function XLocaleOfFontSet(para1:TXFontSet):Pchar;cdecl;external libX11;
function XContextDependentDrawing(para1:TXFontSet):TBool;cdecl;external libX11;
function XDirectionalDependentDrawing(para1:TXFontSet):TBool;cdecl;external libX11;
function XContextualDrawing(para1:TXFontSet):TBool;cdecl;external libX11;
function XExtentsOfFontSet(para1:TXFontSet):PXFontSetExtents;cdecl;external libX11;
function XmbTextEscapement(para1:TXFontSet; para2:Pchar; para3:cint):cint;cdecl;external libX11;
function XwcTextEscapement(para1:TXFontSet; para2:PWideChar; para3:cint):cint;cdecl;external libX11;
function Xutf8TextEscapement(para1:TXFontSet; para2:Pchar; para3:cint):cint;cdecl;external libX11;
function XmbTextExtents(para1:TXFontSet; para2:Pchar; para3:cint; para4:PXRectangle; para5:PXRectangle):cint;cdecl;external libX11;
function XwcTextExtents(para1:TXFontSet; para2:PWideChar; para3:cint; para4:PXRectangle; para5:PXRectangle):cint;cdecl;external libX11;
function Xutf8TextExtents(para1:TXFontSet; para2:Pchar; para3:cint; para4:PXRectangle; para5:PXRectangle):cint;cdecl;external libX11;
function XmbTextPerCharExtents(para1:TXFontSet; para2:Pchar; para3:cint; para4:PXRectangle; para5:PXRectangle;
para6:cint; para7:Pcint; para8:PXRectangle; para9:PXRectangle):TStatus;cdecl;external libX11;
function XwcTextPerCharExtents(para1:TXFontSet; para2:PWideChar; para3:cint; para4:PXRectangle; para5:PXRectangle;
para6:cint; para7:Pcint; para8:PXRectangle; para9:PXRectangle):TStatus;cdecl;external libX11;
function Xutf8TextPerCharExtents(para1:TXFontSet; para2:Pchar; para3:cint; para4:PXRectangle; para5:PXRectangle;
para6:cint; para7:Pcint; para8:PXRectangle; para9:PXRectangle):TStatus;cdecl;external libX11;
procedure XmbDrawText(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:PXmbTextItem; para7:cint);cdecl;external libX11;
procedure XwcDrawText(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:PXwcTextItem; para7:cint);cdecl;external libX11;
procedure Xutf8DrawText(para1:PDisplay; para2:TDrawable; para3:TGC; para4:cint; para5:cint;
para6:PXmbTextItem; para7:cint);cdecl;external libX11;
procedure XmbDrawString(para1:PDisplay; para2:TDrawable; para3:TXFontSet; para4:TGC; para5:cint;
para6:cint; para7:Pchar; para8:cint);cdecl;external libX11;
procedure XwcDrawString(para1:PDisplay; para2:TDrawable; para3:TXFontSet; para4:TGC; para5:cint;
para6:cint; para7:PWideChar; para8:cint);cdecl;external libX11;
procedure Xutf8DrawString(para1:PDisplay; para2:TDrawable; para3:TXFontSet; para4:TGC; para5:cint;
para6:cint; para7:Pchar; para8:cint);cdecl;external libX11;
procedure XmbDrawImageString(para1:PDisplay; para2:TDrawable; para3:TXFontSet; para4:TGC; para5:cint;
para6:cint; para7:Pchar; para8:cint);cdecl;external libX11;
procedure XwcDrawImageString(para1:PDisplay; para2:TDrawable; para3:TXFontSet; para4:TGC; para5:cint;
para6:cint; para7:PWideChar; para8:cint);cdecl;external libX11;
procedure Xutf8DrawImageString(para1:PDisplay; para2:TDrawable; para3:TXFontSet; para4:TGC; para5:cint;
para6:cint; para7:Pchar; para8:cint);cdecl;external libX11;
function XOpenIM(para1:PDisplay; para2:PXrmHashBucketRec; para3:Pchar; para4:Pchar):TXIM;cdecl;external libX11;
function XCloseIM(para1:TXIM):TStatus;cdecl;external libX11;
function XGetIMValues(para1:TXIM; dotdotdot:array of const):Pchar;cdecl;external libX11;
function XSetIMValues(para1:TXIM; dotdotdot:array of const):Pchar;cdecl;external libX11;
function XDisplayOfIM(para1:TXIM):PDisplay;cdecl;external libX11;
function XLocaleOfIM(para1:TXIM):Pchar;cdecl;external libX11;
function XCreateIC(para1:TXIM; dotdotdot:array of const):TXIC;cdecl;external libX11;
procedure XDestroyIC(para1:TXIC);cdecl;external libX11;
procedure XSetICFocus(para1:TXIC);cdecl;external libX11;
procedure XUnsetICFocus(para1:TXIC);cdecl;external libX11;
function XwcResetIC(para1:TXIC):PWideChar;cdecl;external libX11;
function XmbResetIC(para1:TXIC):Pchar;cdecl;external libX11;
function Xutf8ResetIC(para1:TXIC):Pchar;cdecl;external libX11;
function XSetICValues(para1:TXIC; dotdotdot:array of const):Pchar;cdecl;external libX11;
function XGetICValues(para1:TXIC; dotdotdot:array of const):Pchar;cdecl;external libX11;
function XIMOfIC(para1:TXIC):TXIM;cdecl;external libX11;
function XFilterEvent(para1:PXEvent; para2:TWindow):TBool;cdecl;external libX11;
function XmbLookupString(para1:TXIC; para2:PXKeyPressedEvent; para3:Pchar; para4:cint; para5:PKeySym;
para6:PStatus):cint;cdecl;external libX11;
function XwcLookupString(para1:TXIC; para2:PXKeyPressedEvent; para3:PWideChar; para4:cint; para5:PKeySym;
para6:PStatus):cint;cdecl;external libX11;
function Xutf8LookupString(para1:TXIC; para2:PXKeyPressedEvent; para3:Pchar; para4:cint; para5:PKeySym;
para6:PStatus):cint;cdecl;external libX11;
function XVaCreateNestedList(unused:cint; dotdotdot:array of const):TXVaNestedList;cdecl;external libX11;
function XRegisterIMInstantiateCallback(para1:PDisplay; para2:PXrmHashBucketRec; para3:Pchar; para4:Pchar; para5:TXIDProc;
para6:TXPointer):TBool;cdecl;external libX11;
function XUnregisterIMInstantiateCallback(para1:PDisplay; para2:PXrmHashBucketRec; para3:Pchar; para4:Pchar; para5:TXIDProc;
para6:TXPointer):TBool;cdecl;external libX11;
type
TXConnectionWatchProc = procedure (para1:PDisplay; para2:TXPointer; para3:cint; para4:TBool; para5:PXPointer);cdecl;
function XInternalConnectionNumbers(para1:PDisplay; para2:PPcint; para3:Pcint):TStatus;cdecl;external libX11;
procedure XProcessInternalConnection(para1:PDisplay; para2:cint);cdecl;external libX11;
function XAddConnectionWatch(para1:PDisplay; para2:TXConnectionWatchProc; para3:TXPointer):TStatus;cdecl;external libX11;
procedure XRemoveConnectionWatch(para1:PDisplay; para2:TXConnectionWatchProc; para3:TXPointer);cdecl;external libX11;
procedure XSetAuthorization(para1:Pchar; para2:cint; para3:Pchar; para4:cint);cdecl;external libX11;
{
_Xmbtowc?
_Xwctomb?
}
{$ifdef MACROS}
function ConnectionNumber(dpy : PDisplay) : longint;
function RootWindow(dpy : PDisplay; scr : longint) : TWindow;
function DefaultScreen(dpy : PDisplay) : longint;
function DefaultRootWindow(dpy : PDisplay) : TWindow;
function DefaultVisual(dpy : PDisplay; scr : longint) : PVisual;
function DefaultGC(dpy : PDisplay; scr : longint) : TGC;
function BlackPixel(dpy : PDisplay; scr : longint) : dword;
function WhitePixel(dpy : PDisplay; scr : longint) : dword;
function QLength(dpy : PDisplay) : longint;
function DisplayWidth(dpy : PDisplay; scr : longint) : longint;
function DisplayHeight(dpy : PDisplay; scr : longint) : longint;
function DisplayWidthMM(dpy : PDisplay; scr : longint) : longint;
function DisplayHeightMM(dpy : PDisplay; scr : longint) : longint;
function DisplayPlanes(dpy : PDisplay; scr : longint) : longint;
function DisplayCells(dpy : PDisplay; scr : longint) : longint;
function ScreenCount(dpy : PDisplay) : longint;
function ServerVendor(dpy : PDisplay) : Pchar;
function ProtocolVersion(dpy : PDisplay) : longint;
function ProtocolRevision(dpy : PDisplay) : longint;
function VendorRelease(dpy : PDisplay) : longint;
function DisplayString(dpy : PDisplay) : Pchar;
function DefaultDepth(dpy : PDisplay; scr : longint) : longint;
function DefaultColormap(dpy : PDisplay; scr : longint) : TColormap;
function BitmapUnit(dpy : PDisplay) : longint;
function BitmapBitOrder(dpy : PDisplay) : longint;
function BitmapPad(dpy : PDisplay) : longint;
function ImageByteOrder(dpy : PDisplay) : longint;
function NextRequest(dpy : PDisplay) : dword;
function LastKnownRequestProcessed(dpy : PDisplay) : dword;
function ScreenOfDisplay(dpy : PDisplay; scr : longint) : PScreen;
function DefaultScreenOfDisplay(dpy : PDisplay) : PScreen;
function DisplayOfScreen(s : PScreen) : PDisplay;
function RootWindowOfScreen(s : PScreen) : TWindow;
function BlackPixelOfScreen(s : PScreen) : dword;
function WhitePixelOfScreen(s : PScreen) : dword;
function DefaultColormapOfScreen(s : PScreen) : TColormap;
function DefaultDepthOfScreen(s : PScreen) : longint;
function DefaultGCOfScreen(s : PScreen) : TGC;
function DefaultVisualOfScreen(s : PScreen) : PVisual;
function WidthOfScreen(s : PScreen) : longint;
function HeightOfScreen(s : PScreen) : longint;
function WidthMMOfScreen(s : PScreen) : longint;
function HeightMMOfScreen(s : PScreen) : longint;
function PlanesOfScreen(s : PScreen) : longint;
function CellsOfScreen(s : PScreen) : longint;
function MinCmapsOfScreen(s : PScreen) : longint;
function MaxCmapsOfScreen(s : PScreen) : longint;
function DoesSaveUnders(s : PScreen) : TBool;
function DoesBackingStore(s : PScreen) : longint;
function EventMaskOfScreen(s : PScreen) : longint;
function XAllocID(dpy : PDisplay) : TXID;
{$endif MACROS}
implementation
{$ifdef MACROS}
function ConnectionNumber(dpy : PDisplay) : longint;
begin
ConnectionNumber:=(PXPrivDisplay(dpy))^.fd;
end;
function RootWindow(dpy : PDisplay; scr : longint) : TWindow;
begin
RootWindow:=(ScreenOfDisplay(dpy,scr))^.root;
end;
function DefaultScreen(dpy : PDisplay) : longint;
begin
DefaultScreen:=(PXPrivDisplay(dpy))^.default_screen;
end;
function DefaultRootWindow(dpy : PDisplay) : TWindow;
begin
DefaultRootWindow:=(ScreenOfDisplay(dpy,DefaultScreen(dpy)))^.root;
end;
function DefaultVisual(dpy : PDisplay; scr : longint) : PVisual;
begin
DefaultVisual:=(ScreenOfDisplay(dpy,scr))^.root_visual;
end;
function DefaultGC(dpy : PDisplay; scr : longint) : TGC;
begin
DefaultGC:=(ScreenOfDisplay(dpy,scr))^.default_gc;
end;
function BlackPixel(dpy : PDisplay; scr : longint) : dword;
begin
BlackPixel:=(ScreenOfDisplay(dpy,scr))^.black_pixel;
end;
function WhitePixel(dpy : PDisplay; scr : longint) : dword;
begin
WhitePixel:=(ScreenOfDisplay(dpy,scr))^.white_pixel;
end;
function QLength(dpy : PDisplay) : longint;
begin
QLength:=(PXPrivDisplay(dpy))^.qlen;
end;
function DisplayWidth(dpy : PDisplay; scr : longint) : longint;
begin
DisplayWidth:=(ScreenOfDisplay(dpy,scr))^.width;
end;
function DisplayHeight(dpy : PDisplay; scr : longint) : longint;
begin
DisplayHeight:=(ScreenOfDisplay(dpy,scr))^.height;
end;
function DisplayWidthMM(dpy : PDisplay; scr : longint) : longint;
begin
DisplayWidthMM:=(ScreenOfDisplay(dpy,scr))^.mwidth;
end;
function DisplayHeightMM(dpy : PDisplay; scr : longint) : longint;
begin
DisplayHeightMM:=(ScreenOfDisplay(dpy,scr))^.mheight;
end;
function DisplayPlanes(dpy : PDisplay; scr : longint) : longint;
begin
DisplayPlanes:=(ScreenOfDisplay(dpy,scr))^.root_depth;
end;
function DisplayCells(dpy : PDisplay; scr : longint) : longint;
begin
DisplayCells:=(DefaultVisual(dpy,scr))^.map_entries;
end;
function ScreenCount(dpy : PDisplay) : longint;
begin
ScreenCount:=(PXPrivDisplay(dpy))^.nscreens;
end;
function ServerVendor(dpy : PDisplay) : Pchar;
begin
ServerVendor:=(PXPrivDisplay(dpy))^.vendor;
end;
function ProtocolVersion(dpy : PDisplay) : longint;
begin
ProtocolVersion:=(PXPrivDisplay(dpy))^.proto_major_version;
end;
function ProtocolRevision(dpy : PDisplay) : longint;
begin
ProtocolRevision:=(PXPrivDisplay(dpy))^.proto_minor_version;
end;
function VendorRelease(dpy : PDisplay) : longint;
begin
VendorRelease:=(PXPrivDisplay(dpy))^.release;
end;
function DisplayString(dpy : PDisplay) : Pchar;
begin
DisplayString:=(PXPrivDisplay(dpy))^.display_name;
end;
function DefaultDepth(dpy : PDisplay; scr : longint) : longint;
begin
DefaultDepth:=(ScreenOfDisplay(dpy,scr))^.root_depth;
end;
function DefaultColormap(dpy : PDisplay; scr : longint) : TColormap;
begin
DefaultColormap:=(ScreenOfDisplay(dpy,scr))^.cmap;
end;
function BitmapUnit(dpy : PDisplay) : longint;
begin
BitmapUnit:=(PXPrivDisplay(dpy))^.bitmap_unit;
end;
function BitmapBitOrder(dpy : PDisplay) : longint;
begin
BitmapBitOrder:=(PXPrivDisplay(dpy))^.bitmap_bit_order;
end;
function BitmapPad(dpy : PDisplay) : longint;
begin
BitmapPad:=(PXPrivDisplay(dpy))^.bitmap_pad;
end;
function ImageByteOrder(dpy : PDisplay) : longint;
begin
ImageByteOrder:=(PXPrivDisplay(dpy))^.byte_order;
end;
function NextRequest(dpy : PDisplay) : dword;
begin
NextRequest:=((PXPrivDisplay(dpy))^.request) + 1;
end;
function LastKnownRequestProcessed(dpy : PDisplay) : dword;
begin
LastKnownRequestProcessed:=(PXPrivDisplay(dpy))^.last_request_read;
end;
function ScreenOfDisplay(dpy : PDisplay; scr : longint) : PScreen;
begin
ScreenOfDisplay:=@(((PXPrivDisplay(dpy))^.screens)[scr]);
end;
function DefaultScreenOfDisplay(dpy : PDisplay) : PScreen;
begin
DefaultScreenOfDisplay:=ScreenOfDisplay(dpy,DefaultScreen(dpy));
end;
function DisplayOfScreen(s : PScreen) : PDisplay;
begin
DisplayOfScreen:=s^.display;
end;
function RootWindowOfScreen(s : PScreen) : TWindow;
begin
RootWindowOfScreen:=s^.root;
end;
function BlackPixelOfScreen(s : PScreen) : dword;
begin
BlackPixelOfScreen:=s^.black_pixel;
end;
function WhitePixelOfScreen(s : PScreen) : dword;
begin
WhitePixelOfScreen:=s^.white_pixel;
end;
function DefaultColormapOfScreen(s : PScreen) : TColormap;
begin
DefaultColormapOfScreen:=s^.cmap;
end;
function DefaultDepthOfScreen(s : PScreen) : longint;
begin
DefaultDepthOfScreen:=s^.root_depth;
end;
function DefaultGCOfScreen(s : PScreen) : TGC;
begin
DefaultGCOfScreen:=s^.default_gc;
end;
function DefaultVisualOfScreen(s : PScreen) : PVisual;
begin
DefaultVisualOfScreen:=s^.root_visual;
end;
function WidthOfScreen(s : PScreen) : longint;
begin
WidthOfScreen:=s^.width;
end;
function HeightOfScreen(s : PScreen) : longint;
begin
HeightOfScreen:=s^.height;
end;
function WidthMMOfScreen(s : PScreen) : longint;
begin
WidthMMOfScreen:=s^.mwidth;
end;
function HeightMMOfScreen(s : PScreen) : longint;
begin
HeightMMOfScreen:=s^.mheight;
end;
function PlanesOfScreen(s : PScreen) : longint;
begin
PlanesOfScreen:=s^.root_depth;
end;
function CellsOfScreen(s : PScreen) : longint;
begin
CellsOfScreen:=(DefaultVisualOfScreen(s))^.map_entries;
end;
function MinCmapsOfScreen(s : PScreen) : longint;
begin
MinCmapsOfScreen:=s^.min_maps;
end;
function MaxCmapsOfScreen(s : PScreen) : longint;
begin
MaxCmapsOfScreen:=s^.max_maps;
end;
function DoesSaveUnders(s : PScreen) : TBool;
begin
DoesSaveUnders:=s^.save_unders;
end;
function DoesBackingStore(s : PScreen) : longint;
begin
DoesBackingStore:=s^.backing_store;
end;
function EventMaskOfScreen(s : PScreen) : longint;
begin
EventMaskOfScreen:=s^.root_input_mask;
end;
function XAllocID(dpy : PDisplay) : TXID;
begin
XAllocID:=(PXPrivDisplay(dpy))^.resource_alloc(dpy);
end;
{$endif MACROS}
end.