mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-16 15:39:30 +02:00
1745 lines
86 KiB
ObjectPascal
1745 lines
86 KiB
ObjectPascal
{
|
|
$Id$
|
|
}
|
|
unit xlib;
|
|
interface
|
|
|
|
{ Changes after conversion from Xlib.h marked MVC -- Michael Van Canneyt
|
|
Removed many many comments.
|
|
Including copyright. should be pasted in again. MVC }
|
|
|
|
uses X;
|
|
|
|
{$LinkLib c}
|
|
{$LinkLib X11}
|
|
|
|
type
|
|
TXPointer = ^char;
|
|
TBool = Longint;
|
|
PBool = ^TBool;
|
|
TStatus = Longint; { Also a choice. MVC }
|
|
{ Some pointers : }
|
|
pppchar = ^ppchar;
|
|
ppwindow = ^pwindow;
|
|
Twchar_t = cardinal;
|
|
Pwchar_t = ^Twchar_t;
|
|
Pstatus = ^TStatus;
|
|
PXPointer = ^TXPointer;
|
|
Plongint = ^Longint;
|
|
PPLOngint = ^Plongint;
|
|
|
|
const
|
|
|
|
{
|
|
Removed, standard in Pascal - MVC
|
|
True = 1;
|
|
False = 0;
|
|
}
|
|
QueuedAlready = 0;
|
|
QueuedAfterReading = 1;
|
|
|
|
{ !!!!!
|
|
#define ConnectionNumber(dpy) (((_XPrivDisplay)dpy)->fd)
|
|
#define RootWindow(dpy, scr) (ScreenOfDisplay(dpy,scr)->root)
|
|
#define DefaultScreen(dpy) (((_XPrivDisplay)dpy)->default_screen)
|
|
#define DefaultRootWindow(dpy) (ScreenOfDisplay(dpy,DefaultScreen(dpy))->root)
|
|
#define DefaultVisual(dpy, scr) (ScreenOfDisplay(dpy,scr)->root_visual)
|
|
#define DefaultGC(dpy, scr) (ScreenOfDisplay(dpy,scr)->default_gc)
|
|
#define BlackPixel(dpy, scr) (ScreenOfDisplay(dpy,scr)->black_pixel)
|
|
#define WhitePixel(dpy, scr) (ScreenOfDisplay(dpy,scr)->white_pixel)
|
|
#define AllPlanes ((unsigned long)~0L)
|
|
#define QLength(dpy) (((_XPrivDisplay)dpy)->qlen)
|
|
#define DisplayWidth(dpy, scr) (ScreenOfDisplay(dpy,scr)->width)
|
|
#define DisplayHeight(dpy, scr) (ScreenOfDisplay(dpy,scr)->height)
|
|
#define DisplayWidthMM(dpy, scr)(ScreenOfDisplay(dpy,scr)->mwidth)
|
|
#define DisplayHeightMM(dpy, scr)(ScreenOfDisplay(dpy,scr)->mheight)
|
|
#define DisplayPlanes(dpy, scr) (ScreenOfDisplay(dpy,scr)->root_depth)
|
|
#define DisplayCells(dpy, scr) (DefaultVisual(dpy,scr)->map_entries)
|
|
#define ScreenCount(dpy) (((_XPrivDisplay)dpy)->nscreens)
|
|
#define ServerVendor(dpy) (((_XPrivDisplay)dpy)->vendor)
|
|
#define ProtocolVersion(dpy) (((_XPrivDisplay)dpy)->proto_major_version)
|
|
#define ProtocolRevision(dpy) (((_XPrivDisplay)dpy)->proto_minor_version)
|
|
#define VendorRelease(dpy) (((_XPrivDisplay)dpy)->release)
|
|
#define DisplayString(dpy) (((_XPrivDisplay)dpy)->display_name)
|
|
#define DefaultDepth(dpy, scr) (ScreenOfDisplay(dpy,scr)->root_depth)
|
|
#define DefaultColormap(dpy, scr)(ScreenOfDisplay(dpy,scr)->cmap)
|
|
#define BitmapUnit(dpy) (((_XPrivDisplay)dpy)->bitmap_unit)
|
|
#define BitmapBitOrder(dpy) (((_XPrivDisplay)dpy)->bitmap_bit_order)
|
|
#define BitmapPad(dpy) (((_XPrivDisplay)dpy)->bitmap_pad)
|
|
#define ImageByteOrder(dpy) (((_XPrivDisplay)dpy)->byte_order)
|
|
|
|
#ifdef CRAY /* unable to get WORD64 without pulling in other symbols
|
|
#define NextRequest(dpy) XNextRequest(dpy)
|
|
#else
|
|
#define NextRequest(dpy) (((_XPrivDisplay)dpy)->request + 1)
|
|
#endif
|
|
#define LastKnownRequestProcessed(dpy) (((_XPrivDisplay)dpy)->last_request_read)
|
|
|
|
/* macros for screen oriented applications (toolkit)
|
|
|
|
#define ScreenOfDisplay(dpy, scr)(&((_XPrivDisplay)dpy)->screens[scr])
|
|
#define DefaultScreenOfDisplay(dpy) ScreenOfDisplay(dpy,DefaultScreen(dpy))
|
|
#define DisplayOfScreen(s) ((s)->display)
|
|
#define RootWindowOfScreen(s) ((s)->root)
|
|
#define BlackPixelOfScreen(s) ((s)->black_pixel)
|
|
#define WhitePixelOfScreen(s) ((s)->white_pixel)
|
|
#define DefaultColormapOfScreen(s)((s)->cmap)
|
|
#define DefaultDepthOfScreen(s) ((s)->root_depth)
|
|
#define DefaultGCOfScreen(s) ((s)->default_gc)
|
|
#define DefaultVisualOfScreen(s)((s)->root_visual)
|
|
#define WidthOfScreen(s) ((s)->width)
|
|
#define HeightOfScreen(s) ((s)->height)
|
|
#define WidthMMOfScreen(s) ((s)->mwidth)
|
|
#define HeightMMOfScreen(s) ((s)->mheight)
|
|
#define PlanesOfScreen(s) ((s)->root_depth)
|
|
#define CellsOfScreen(s) (DefaultVisualOfScreen((s))->map_entries)
|
|
#define MinCmapsOfScreen(s) ((s)->min_maps)
|
|
#define MaxCmapsOfScreen(s) ((s)->max_maps)
|
|
#define DoesSaveUnders(s) ((s)->save_unders)
|
|
#define DoesBackingStore(s) ((s)->backing_store)
|
|
#define EventMaskOfScreen(s) ((s)->root_input_mask)
|
|
}
|
|
{
|
|
* Extensions need a way to hang private data on some structures.
|
|
}
|
|
QueuedAfterFlush = 2;
|
|
{ number returned by XRegisterExtension }
|
|
{ next item on list of data for structure }
|
|
{ !!!!!
|
|
int (*free_private)(); /* called to free private storage }
|
|
{ data private to this extension. }
|
|
|
|
type
|
|
{ Added this for functions at the end. }
|
|
PCardinal = ^Cardinal;
|
|
|
|
PXExtData = ^TXExtData ;
|
|
PPXExtData = ^PXExtData ;
|
|
{ Put this in to accomodate for the next in the following record. MVC}
|
|
TXExtData = record
|
|
number : longint;
|
|
next : PXExtData; { incorrectly converted. MVC }
|
|
private_data : TXPointer;
|
|
end;
|
|
TXExtCodes = record
|
|
extension : longint;
|
|
major_opcode : longint;
|
|
first_event : longint;
|
|
first_error : longint;
|
|
end;
|
|
PXExtCodes = ^TXExtCodes;
|
|
{
|
|
* Data structure for retrieving info about pixmap formats.
|
|
}
|
|
TXPixmapFormatValues = record
|
|
depth : longint;
|
|
bits_per_pixel : longint;
|
|
scanline_pad : longint;
|
|
end;
|
|
PXPixmapFormatValues = ^TXPixmapFormatValues;
|
|
TXGCValues = record
|
|
Xfunction : longint; { Renamed function to Xfunction }
|
|
plane_mask : cardinal;
|
|
foreground : cardinal;
|
|
background : cardinal;
|
|
line_width : longint;
|
|
line_style : longint;
|
|
cap_style : longint;
|
|
join_style : longint;
|
|
fill_style : longint;
|
|
fill_rule : longint;
|
|
arc_mode : longint;
|
|
tile : TPixmap;
|
|
stipple : TPixmap;
|
|
ts_x_origin : longint;
|
|
ts_y_origin : longint;
|
|
font : TFont;
|
|
subwindow_mode : longint;
|
|
graphics_exposures : TBool;
|
|
{ This was Bool - error in converter ? MVC}
|
|
clip_x_origin : longint;
|
|
clip_y_origin : longint;
|
|
clip_mask : TPixmap;
|
|
dash_offset : longint;
|
|
dashes : char;
|
|
end;
|
|
PXGCValues = ^TXGCValues;
|
|
{ The GC got defined as GC = ^record - probably from *struct, so I
|
|
defined a GCrecord. MVC. }
|
|
TGC = ^TGCrecord;
|
|
TGCrecord = record
|
|
ext_data : PXExtData;
|
|
gid : TGContext;
|
|
end;
|
|
{
|
|
* Visual structure; contains information about colormapping possible.
|
|
}
|
|
TVisual = record
|
|
ext_data : PXExtData;
|
|
visualid : TVisualID;
|
|
c_class : longint;
|
|
classes : longint; { Renamed class to classes. MVC}
|
|
red_mask : cardinal;
|
|
green_mask : cardinal;
|
|
blue_mask : cardinal;
|
|
bits_per_rgb : longint;
|
|
map_entries : longint;
|
|
end;
|
|
PVisual = ^TVisual;
|
|
{
|
|
* Depth structure; contains information for each possible depth.
|
|
}
|
|
TDepth = record
|
|
depth : longint;
|
|
nvisuals : longint;
|
|
visuals : PVisual;
|
|
end;
|
|
PDepth=^TDepth;
|
|
{
|
|
* Information about the screen. The contents of this structure are
|
|
* implementation dependent. A Screen should be treated as opaque
|
|
* by application code.
|
|
}
|
|
{
|
|
struct _XDisplay; Forward declare before use for C++
|
|
}
|
|
{ Defined this, needed for the display field in the following.
|
|
Should be a pointer to the previous _Xdisplay... MVC}
|
|
p_XDisplay = pointer;
|
|
TScreen = record
|
|
ext_data : PXExtData;
|
|
display : p_XDisplay;
|
|
root : TWindow;
|
|
width : longint;
|
|
height : longint;
|
|
mwidth : longint;
|
|
mheight : longint;
|
|
ndepths : longint;
|
|
depths : PDepth;
|
|
root_depth : longint;
|
|
root_visual : PVisual;
|
|
default_gc : TGC;
|
|
cmap : TColormap;
|
|
white_pixel : cardinal;
|
|
black_pixel : cardinal;
|
|
max_maps : longint;
|
|
min_maps : longint;
|
|
backing_store : longint;
|
|
save_unders : TBool;
|
|
root_input_mask : longint;
|
|
end;
|
|
PScreen = ^TScreen;
|
|
{
|
|
* Format structure; describes ZFormat data the screen will understand.
|
|
}
|
|
TScreenFormat = record
|
|
ext_data : PXExtData;
|
|
depth : longint;
|
|
bits_per_pixel : longint;
|
|
scanline_pad : longint;
|
|
end;
|
|
PScreenFormat=^TScreenFormat;
|
|
{
|
|
* Data structure for setting window attributes.
|
|
}
|
|
TXSetWindowAttributes = record
|
|
background_pixmap : TPixmap;
|
|
background_pixel : cardinal;
|
|
border_pixmap : TPixmap;
|
|
border_pixel : cardinal;
|
|
bit_gravity : longint;
|
|
win_gravity : longint;
|
|
backing_store : longint;
|
|
backing_planes : cardinal;
|
|
backing_pixel : cardinal;
|
|
save_under : TBool;
|
|
event_mask : longint;
|
|
do_not_propagate_mask : longint;
|
|
override_redirect : TBool;
|
|
colormap : TColormap;
|
|
cursor : TCursor;
|
|
end;
|
|
PXSetWindowAttributes = ^TXSetWindowAttributes;
|
|
TXWindowAttributes = record
|
|
x : longint;
|
|
y : longint;
|
|
width : longint;
|
|
height : longint;
|
|
border_width : longint;
|
|
depth : longint;
|
|
visual : PVisual;
|
|
root : TWindow;
|
|
c_class : longint;
|
|
classes : longint; { Renamed from class. MVC}
|
|
bit_gravity : longint;
|
|
win_gravity : longint;
|
|
backing_store : longint;
|
|
backing_planes : cardinal;
|
|
backing_pixel : cardinal;
|
|
save_under : TBool;
|
|
colormap : TColormap;
|
|
map_installed : TBool;
|
|
map_state : longint;
|
|
all_event_masks : longint;
|
|
your_event_mask : longint;
|
|
do_not_propagate_mask : longint;
|
|
override_redirect : TBool;
|
|
screen : PScreen;
|
|
end;
|
|
PXWindowAttributes = ^TXWindowAttributes;
|
|
{
|
|
* Data structure for host setting; getting routines.
|
|
*
|
|
}
|
|
TXHostAddress = record
|
|
family : longint;
|
|
length : longint;
|
|
address : pchar;
|
|
end;
|
|
PXHostAddress = ^TXHostAddress ;
|
|
{
|
|
* Data structure for "image" data, used by image manipulation routines.
|
|
}
|
|
{ Added the following empty record - needed in Ximage.
|
|
Fill in later. MVC }
|
|
Funcsrecord = record
|
|
dummy : integer; { Just something stupid }
|
|
end;
|
|
TXImage = record
|
|
width : longint;
|
|
height : longint;
|
|
xoffset : longint;
|
|
format : longint;
|
|
data : pchar;
|
|
byte_order : longint;
|
|
bitmap_unit : longint;
|
|
bitmap_bit_order : longint;
|
|
bitmap_pad : longint;
|
|
depth : longint;
|
|
bytes_per_line : longint;
|
|
bits_per_pixel : longint;
|
|
red_mask : cardinal;
|
|
green_mask : cardinal;
|
|
blue_mask : cardinal;
|
|
obdata : TXPointer;
|
|
funcs : funcsrecord {Added this. Incorrectly converted}
|
|
end;
|
|
PXImage = ^TXImage;
|
|
{
|
|
* Data structure for XReconfigureWindow
|
|
}
|
|
TXWindowChanges = record
|
|
x : longint;
|
|
y : longint;
|
|
width : longint;
|
|
height : longint;
|
|
border_width : longint;
|
|
sibling : TWindow;
|
|
stack_mode : longint;
|
|
end;
|
|
PXWindowChanges = ^TXWindowChanges;
|
|
{
|
|
* Data structure used by color operations
|
|
}
|
|
{ do_red, do_green, do_blue }
|
|
TXColor = record
|
|
pixel : cardinal;
|
|
red : word;
|
|
green : word;
|
|
blue : word;
|
|
flags : char;
|
|
pad : char;
|
|
end;
|
|
PXColor = ^TXColor;
|
|
{
|
|
* Data structures for graphics operations. On most machines, these are
|
|
* congruent with the wire protocol structures, so reformatting the data
|
|
* can be avoided on these architectures.
|
|
}
|
|
TXSegment = record
|
|
x1 : integer;
|
|
y1 : integer;
|
|
x2 : integer;
|
|
y2 : integer;
|
|
end;
|
|
PXSegment = ^TXSegment;
|
|
TXPoint = record
|
|
x : integer;
|
|
y : integer;
|
|
end;
|
|
PXPoint = ^TXPoint;
|
|
TXRectangle = record
|
|
x : integer;
|
|
y : integer;
|
|
width : word;
|
|
height : word;
|
|
end;
|
|
PXRectangle = ^TXRectangle;
|
|
TXArc = record
|
|
x : integer;
|
|
y : integer;
|
|
width : word;
|
|
height : word;
|
|
angle1 : integer;
|
|
angle2 : integer;
|
|
end;
|
|
PXarc = ^TXarc;
|
|
{ Data structure for XChangeKeyboardControl }
|
|
{ On, Off, Default }
|
|
TXKeyboardControl = record
|
|
key_click_percent : longint;
|
|
bell_percent : longint;
|
|
bell_pitch : longint;
|
|
bell_duration : longint;
|
|
led : longint;
|
|
led_mode : longint;
|
|
key : longint;
|
|
auto_repeat_mode : longint;
|
|
end;
|
|
PXKeyboardControl = ^TXKeyboardControl;
|
|
{ Data structure for XGetKeyboardControl }
|
|
TXKeyboardState = record
|
|
key_click_percent : longint;
|
|
bell_percent : longint;
|
|
bell_pitch : cardinal;
|
|
bell_duration : cardinal;
|
|
led_mask : cardinal;
|
|
global_auto_repeat : longint;
|
|
auto_repeats : array[0..(32)-1] of char;
|
|
end;
|
|
PXKeyboardState = ^TXKeyboardState;
|
|
{ Data structure for XGetMotionEvents. }
|
|
TXTimeCoord = record
|
|
time : TTime;
|
|
x : integer;
|
|
y : integer;
|
|
end;
|
|
PXTimeCoord = ^TXTimeCoord;
|
|
{ Data structure for X[Set,Get]ModifierMapping }
|
|
{ The server's max # of keys per modifier }
|
|
{ An 8 by max_keypermod array of modifiers }
|
|
TXModifierKeymap = record
|
|
max_keypermod : longint;
|
|
modifiermap : PKeyCode;
|
|
end;
|
|
PXModifierKeymap = ^TXModifierKeymap;
|
|
{
|
|
* Display datatype maintaining display specific data.
|
|
* The contents of this structure are implementation dependent.
|
|
* A Display should be treated as opaque by application code.
|
|
}
|
|
{ I commented the following. It is a complete mess in the XLib.h !!
|
|
MVC
|
|
Display = Display;
|
|
}
|
|
{
|
|
struct _XPrivate; /* Forward declare before use for C++
|
|
struct _XrmHashBucketRec;
|
|
}
|
|
TDisplay = record
|
|
ext_data : PXExtData;
|
|
private1 : pointer ; { Should be to a _Xprivate struct. MVC }
|
|
fd : longint;
|
|
private2 : longint;
|
|
proto_major_version : longint;
|
|
proto_minor_version : longint;
|
|
vendor : pchar;
|
|
private3 : TXID;
|
|
private4 : TXID;
|
|
private5 : TXID;
|
|
private6 : longint;
|
|
resource_alloc : Function : TXID; cdecl;
|
|
byte_order : longint;
|
|
bitmap_unit : longint;
|
|
bitmap_pad : longint;
|
|
bitmap_bit_order : longint;
|
|
nformats : longint;
|
|
pixmap_format : PScreenFormat;
|
|
private8 : longint;
|
|
release : longint;
|
|
private9 : pointer ; { Both of them to a _XPRivate struct. MVC}
|
|
private10 : pointer ;
|
|
qlen : longint;
|
|
last_request_read : cardinal;
|
|
request : cardinal;
|
|
private11 : TXPointer;
|
|
private12 : TXPointer;
|
|
private13 : TXPointer;
|
|
private14 : TXPointer;
|
|
max_request_size : cardinal;
|
|
db : pointer; { To a _XrmHashBucketRec struct. MVC }
|
|
private15 : Function : longint; cdecl;
|
|
display_name : pchar;
|
|
default_screen : longint;
|
|
nscreens : longint;
|
|
screens : PScreen;
|
|
motion_buffer : cardinal;
|
|
private16 : cardinal;
|
|
min_keycode : longint;
|
|
max_keycode : longint;
|
|
private17 : TXPointer;
|
|
private18 : TXPointer;
|
|
private19 : longint;
|
|
xdefaults : pchar;
|
|
end;
|
|
PDisplay=^TDisplay;
|
|
{
|
|
* Definitions of specific events.
|
|
}
|
|
{ !! Changed all 'type' definitions to 'eventttype' MVC }
|
|
{ !! Changed al display definitions to 'whatdisplay' MVC }
|
|
{ !! Idem dito for window,time,property !!}
|
|
TXKeyEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
root : TWindow;
|
|
subwindow : TWindow;
|
|
time : TTime;
|
|
x : longint;
|
|
y : longint;
|
|
x_root : longint;
|
|
y_root : longint;
|
|
state : cardinal;
|
|
keycode : cardinal;
|
|
same_screen : TBool;
|
|
end;
|
|
PXKeyEvent =^TXKeyEvent;
|
|
TXKeyPressedEvent = TXKeyEvent;
|
|
PXKeyPressedEvent= ^TXKeyPressedEvent;
|
|
TXKeyReleasedEvent = TXKeyEvent;
|
|
PXKeyReleasedEvent= ^TXKeyReleasedEvent;
|
|
TXButtonEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
root : TWindow;
|
|
subwindow : TWindow;
|
|
time : TTime;
|
|
x : longint;
|
|
y : longint;
|
|
x_root : longint;
|
|
y_root : longint;
|
|
state : cardinal;
|
|
button : cardinal;
|
|
same_screen : TBool;
|
|
end;
|
|
PXButtonEvent = ^TXButtonEvent;
|
|
TXButtonPressedEvent = TXButtonEvent;
|
|
PXButtonPressedEvent = ^TXButtonPressedEvent;
|
|
TXButtonReleasedEvent = TXButtonEvent;
|
|
PXButtonReleasedEvent = ^TXButtonReleasedEvent;
|
|
TXMotionEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
root : TWindow;
|
|
subwindow : TWindow;
|
|
time : TTime;
|
|
x : longint;
|
|
y : longint;
|
|
x_root : longint;
|
|
y_root : longint;
|
|
state : cardinal;
|
|
is_hint : char;
|
|
same_screen : TBool;
|
|
end;
|
|
PXMotionEvent = ^TXMotionEvent;
|
|
TXPointerMovedEvent = TXMotionEvent;
|
|
PXPointerMovedEvent = ^TXPointerMovedEvent;
|
|
{
|
|
* NotifyAncestor, NotifyVirtual, NotifyInferior,
|
|
* NotifyNonlinear,NotifyNonlinearVirtual
|
|
}
|
|
TXCrossingEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
root : TWindow;
|
|
subwindow : TWindow;
|
|
time : TTime;
|
|
x : longint;
|
|
y : longint;
|
|
x_root : longint;
|
|
y_root : longint;
|
|
mode : longint;
|
|
detail : longint;
|
|
same_screen : TBool;
|
|
focus : TBool;
|
|
state : cardinal;
|
|
end;
|
|
PXCrossingEvent = ^TXCrossingEvent;
|
|
TXEnterWindowEvent = TXCrossingEvent;
|
|
PXEnterWindowEvent = ^TXEnterWindowEvent;
|
|
TXLeaveWindowEvent = TXCrossingEvent;
|
|
PXLeaveWindowEvent = ^TXLeaveWindowEvent;
|
|
TXFocusChangeEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
mode : longint;
|
|
detail : longint;
|
|
end;
|
|
PXFocusChangeEvent = ^TXFocusChangeEvent;
|
|
TXFocusInEvent = TXFocusChangeEvent;
|
|
PXFocusInEvent = ^TXFocusInEvent;
|
|
TXFocusOutEvent = TXFocusChangeEvent;
|
|
PXFocusOutEvent = ^TXFocusOutEvent;
|
|
TXKeymapEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
key_vector : array[0..(32)-1] of char;
|
|
end;
|
|
PXKeymapEvent = ^TXKeymapEvent;
|
|
TXExposeEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
x : longint;
|
|
y : longint;
|
|
width : longint;
|
|
height : longint;
|
|
count : longint;
|
|
end;
|
|
PXExposeEvent = ^TXExposeEvent;
|
|
TXGraphicsExposeEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
drawable : TDrawable;
|
|
x : longint;
|
|
y : longint;
|
|
width : longint;
|
|
height : longint;
|
|
count : longint;
|
|
major_code : longint;
|
|
minor_code : longint;
|
|
end;
|
|
PXGraphicsExposeEvent = ^TXGraphicsExposeEvent;
|
|
TXNoExposeEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
drawable : TDrawable;
|
|
major_code : longint;
|
|
minor_code : longint;
|
|
end;
|
|
PXNoExposeEvent = ^TXNoExposeEvent;
|
|
TXVisibilityEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
state : longint;
|
|
end;
|
|
PXVisibilityEvent = ^TXVisibilityEvent;
|
|
TXCreateWindowEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
parent : TWindow;
|
|
window : TWindow;
|
|
x : longint;
|
|
y : longint;
|
|
width : longint;
|
|
height : longint;
|
|
border_width : longint;
|
|
override_redirect : TBool;
|
|
end;
|
|
PXCreateWindowEvent = ^TXCreateWindowEvent;
|
|
TXDestroyWindowEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
event : TWindow;
|
|
window : TWindow;
|
|
end;
|
|
PXDestroyWindowEvent = ^TXDestroyWindowEvent;
|
|
TXUnmapEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
event : TWindow;
|
|
window : TWindow;
|
|
from_configure : TBool;
|
|
end;
|
|
PXUnmapEvent = ^TXUnmapEvent;
|
|
TXMapEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
event : TWindow;
|
|
window : TWindow;
|
|
override_redirect : TBool;
|
|
end;
|
|
PXMapEvent = ^TXMapEvent;
|
|
TXMapRequestEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
parent : TWindow;
|
|
window : TWindow;
|
|
end;
|
|
PXMapRequestEvent = ^TXMapRequestEvent;
|
|
TXReparentEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
event : TWindow;
|
|
window : TWindow;
|
|
parent : TWindow;
|
|
x : longint;
|
|
y : longint;
|
|
override_redirect : TBool;
|
|
end;
|
|
PXReparentEvent = ^TXReparentEvent;
|
|
TXConfigureEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
event : TWindow;
|
|
window : TWindow;
|
|
x : longint;
|
|
y : longint;
|
|
width : longint;
|
|
height : longint;
|
|
border_width : longint;
|
|
above : TWindow;
|
|
override_redirect : TBool;
|
|
end;
|
|
PXConfigureEvent = ^TXConfigureEvent;
|
|
TXGravityEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
event : TWindow;
|
|
window : TWindow;
|
|
x : longint;
|
|
y : longint;
|
|
end;
|
|
PXGravityEvent = ^TXGravityEvent;
|
|
TXResizeRequestEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
width : longint;
|
|
height : longint;
|
|
end;
|
|
PXResizeRequestEvent = ^TXResizeRequestEvent;
|
|
TXConfigureRequestEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
parent : TWindow;
|
|
window : TWindow;
|
|
x : longint;
|
|
y : longint;
|
|
width : longint;
|
|
height : longint;
|
|
border_width : longint;
|
|
above : TWindow;
|
|
detail : longint;
|
|
value_mask : cardinal;
|
|
end;
|
|
PXConfigureRequestEvent = ^TXConfigureRequestEvent;
|
|
TXCirculateEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
event : TWindow;
|
|
window : TWindow;
|
|
place : longint;
|
|
end;
|
|
PXCirculateEvent = ^TXCirculateEvent;
|
|
TXCirculateRequestEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
parent : TWindow;
|
|
window : TWindow;
|
|
place : longint;
|
|
end;
|
|
PXCirculateRequestEvent = ^TXCirculateRequestEvent;
|
|
TXPropertyEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
atom : TAtom;
|
|
time : TTime;
|
|
state : longint;
|
|
end;
|
|
PXPropertyEvent = ^TXPropertyEvent;
|
|
TXSelectionClearEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
selection : TAtom;
|
|
time : TTime;
|
|
end;
|
|
PXSelectionClearEvent = ^TXSelectionClearEvent;
|
|
TXSelectionRequestEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
owner : TWindow;
|
|
requestor : TWindow;
|
|
selection : TAtom;
|
|
target : TAtom;
|
|
{whatproperty : TAtom;}
|
|
time : TTime;
|
|
end;
|
|
PXSelectionRequestEvent = ^TXSelectionRequestEvent;
|
|
TXSelectionEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
requestor : TWindow;
|
|
selection : TAtom;
|
|
target : TAtom;
|
|
whatproperty : TAtom;
|
|
whattime : TTime;
|
|
end;
|
|
PXSelectionEvent = ^TXSelectionEvent;
|
|
TXColormapEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
colormap : TColormap;
|
|
c_new : TBool;
|
|
news : TBool; { Was new. MVC }
|
|
state : longint;
|
|
end;
|
|
PXColormapEvent = ^TXColormapEvent;
|
|
TXClientMessageEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
message_eventtype : TAtom;
|
|
format : longint;
|
|
data : record
|
|
case longint of
|
|
0 : (b : array[0..(20)-1] of char);
|
|
1 : (s : array[0..(10)-1] of integer);
|
|
2 : (l : array[0..(5)-1] of longint);
|
|
end;
|
|
end;
|
|
PXClientMessageEvent = ^TXClientMessageEvent;
|
|
TXMappingEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
request : longint;
|
|
first_keycode : longint;
|
|
count : longint;
|
|
end;
|
|
PXMappingEvent = ^TXMappingEvent;
|
|
TXErrorEvent = record
|
|
eventtype : longint;
|
|
Whatdisplay : PDisplay;
|
|
resourceid : TXID;
|
|
serial : cardinal;
|
|
error_code : char;
|
|
request_code : char;
|
|
minor_code : char;
|
|
end;
|
|
PXErrorEvent = ^TXErrorEvent;
|
|
TXAnyEvent = record
|
|
eventtype : longint;
|
|
serial : cardinal;
|
|
send_event : TBool;
|
|
display : PDisplay;
|
|
window : TWindow;
|
|
end;
|
|
PXAnyEvent = ^TXAnyEvent;
|
|
TXEvent = record
|
|
case longint of
|
|
0 : (eventtype : longint);
|
|
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..(24)-1] of longint);
|
|
end;
|
|
PXEvent = ^TXEvent;
|
|
{ !!!!!!
|
|
#define XAllocID(dpy) ((*((_XPrivDisplay)dpy)->resource_alloc)((dpy)))
|
|
}
|
|
{
|
|
* per character font metric information.
|
|
}
|
|
TXCharStruct = record
|
|
lbearing : integer;
|
|
rbearing : integer;
|
|
width : integer;
|
|
ascent : integer;
|
|
descent : integer;
|
|
attributes : word;
|
|
end;
|
|
PXCharStruct = ^TXCharStruct;
|
|
TXFontProp = record
|
|
name : TAtom;
|
|
card32 : cardinal;
|
|
end;
|
|
PXFontProp = ^TXFontProp;
|
|
PXFontstruct = ^TXFontStruct;
|
|
PPXFontstruct = ^PXFontStruct;
|
|
PPPXFontstruct = ^PPXFontStruct;
|
|
TXFontStruct = record
|
|
ext_data : PXExtData;
|
|
fid : TFont;
|
|
direction : cardinal;
|
|
min_char_or_byte2 : cardinal;
|
|
max_char_or_byte2 : cardinal;
|
|
min_byte1 : cardinal;
|
|
max_byte1 : cardinal;
|
|
all_chars_exist : TBool;
|
|
default_char : cardinal;
|
|
n_properties : longint;
|
|
properties : PXFontProp;
|
|
min_bounds : TXCharStruct;
|
|
max_bounds : TXCharStruct;
|
|
per_char : PXCharStruct;
|
|
ascent : longint;
|
|
descent : longint;
|
|
end;
|
|
TXTextItem = record
|
|
chars : pchar;
|
|
nchars : longint;
|
|
delta : longint;
|
|
font : TFont;
|
|
end;
|
|
PXTextItem = ^TXTextItem;
|
|
{ normal 16 bit characters are two bytes }
|
|
TXChar2b = record
|
|
byte1 : char;
|
|
byte2 : char;
|
|
end;
|
|
PXChar2b = ^TXChar2b;
|
|
TXTextItem16 = record
|
|
chars : PXChar2b;
|
|
nchars : longint;
|
|
delta : longint;
|
|
font : TFont;
|
|
end;
|
|
PXTextItem16 = ^TXTextItem16;
|
|
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;
|
|
TXFontSetExtents = record
|
|
max_ink_extent : TXRectangle;
|
|
max_logical_extent : TXRectangle;
|
|
end;
|
|
PXFontSetExtents = ^TXFontSetExtents;
|
|
TXOMProc = Procedure; cdecl;
|
|
|
|
TXOMrec = record
|
|
dummy : integer;
|
|
end;
|
|
TXOCrec = record
|
|
dummy : integer;
|
|
end;
|
|
TXOM = ^TXOMrec;
|
|
TXOC = ^TXOCrec;
|
|
{ Again an accomodation. MVC }
|
|
TXfontSetRecord = record
|
|
dummy : integer;
|
|
end;
|
|
TXFontSet = ^TXFontsetRecord;
|
|
TXmbTextItem = record
|
|
chars : pchar;
|
|
nchars : longint;
|
|
delta : longint;
|
|
font_set : TXFontSet;
|
|
end;
|
|
PXmbTextItem = ^TXmbTextItem;
|
|
TXwcTextItem = record
|
|
chars : Pwchar_t;
|
|
nchars : longint;
|
|
delta : longint;
|
|
font_set : TXFontSet;
|
|
end;
|
|
PXwcTextItem = ^TXwcTextItem;
|
|
|
|
const
|
|
XNRequiredCharSet = 'requiredCharSet';
|
|
XNQueryOrientation = 'queryOrientation';
|
|
XNBaseFontName = 'baseFontName';
|
|
XNOMAutomatic = 'omAutomatic';
|
|
XNMissingCharSet = 'missingCharSet';
|
|
XNDefaultString = 'defaultString';
|
|
XNOrientation = 'orientation';
|
|
XNDirectionalDependentDrawing = 'directionalDependentDrawing';
|
|
XNContextualDrawing = 'contextualDrawing';
|
|
XNFontInfo = 'fontInfo';
|
|
|
|
type
|
|
TXOMCharSetList = record
|
|
charset_count : longint;
|
|
charset_list : ^pchar;
|
|
end;
|
|
TXOrientation = (
|
|
XOMOrientation_LTR_TTB,
|
|
XOMOrientation_RTL_TTB,
|
|
XOMOrientation_TTB_LTR,
|
|
XOMOrientation_TTB_RTL,
|
|
XOMOrientation_Context
|
|
);
|
|
{ Input Text description }
|
|
TXOMOrientation = record
|
|
num_orient : longint;
|
|
orient : ^TXOrientation;
|
|
end;
|
|
TXOMFontInfo = record
|
|
num_font : longint;
|
|
font_struct_list : ^PXFontStruct;
|
|
font_name_list : ^pchar;
|
|
end;
|
|
TXIMProc = Procedure; cdecl;
|
|
{ Defined the following to accomodate XIM. MVC}
|
|
TXIMrecord = record
|
|
field : integer
|
|
end;
|
|
TXIM = ^TXIMrecord;
|
|
{ Defined the following to accomodate XIC. MVC}
|
|
TXICrecord = record
|
|
field : integer
|
|
end;
|
|
TXIC = ^TXICrecord;
|
|
TXIMStyle = cardinal;
|
|
TXIMStyles = record
|
|
count_styles : word;
|
|
supported_styles : ^TXIMStyle;
|
|
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;
|
|
XLookupKeySym = 3;
|
|
XLookupBoth = 4;
|
|
|
|
type
|
|
TXVaNestedList = TXPointer;
|
|
TXIMCallback = record
|
|
client_data : TXPointer;
|
|
callback : TXIMProc;
|
|
end;
|
|
TXIMFeedback = cardinal;
|
|
|
|
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
|
|
TXIMText = record
|
|
length : word;
|
|
feedback : ^TXIMFeedback;
|
|
encoding_is_wchar : TBool;
|
|
thestring : record { This was string. MVC}
|
|
case longint of
|
|
0 : (multi_byte : ^char);
|
|
1 : (wide_char : Pwchar_t);
|
|
end;
|
|
end;
|
|
PXIMText=^TXIMText;
|
|
TXIMPreeditState = cardinal;
|
|
|
|
const
|
|
XIMPreeditUnKnown = 0;
|
|
XIMPreeditEnable = 1;
|
|
XIMPreeditDisable = (1) shl (1);
|
|
|
|
type
|
|
TXIMPreeditStateNotifyCallbackStruct = record
|
|
state : TXIMPreeditState;
|
|
end;
|
|
TXIMResetState = cardinal;
|
|
|
|
const
|
|
XIMInitialState = 1;
|
|
XIMPreserveState = (1) shl (1);
|
|
|
|
type
|
|
TXIMStringConversionFeedback = cardinal;
|
|
|
|
const
|
|
XIMStringConversionLeftEdge = $00000001;
|
|
XIMStringConversionRightEdge = $00000002;
|
|
XIMStringConversionTopEdge = $00000004;
|
|
XIMStringConversionBottomEdge = $00000008;
|
|
XIMStringConversionConcealed = $00000010;
|
|
XIMStringConversionWrapped = $00000020;
|
|
|
|
type
|
|
TXIMStringConversionText = record
|
|
length : word;
|
|
feedback : ^TXIMStringConversionFeedback;
|
|
encoding_is_wchar : TBool;
|
|
thestring : record { This was string. MVC}
|
|
case longint of
|
|
0 : (mbs : pchar);
|
|
1 : (wcs : pwchar_t);
|
|
end;
|
|
end;
|
|
TXIMStringConversionPosition = word;
|
|
TXIMStringConversionType = word;
|
|
|
|
const
|
|
XIMStringConversionBuffer = $0001;
|
|
XIMStringConversionLine = $0002;
|
|
XIMStringConversionWord = $0003;
|
|
XIMStringConversionChar = $0004;
|
|
|
|
type
|
|
TXIMStringConversionOperation = word;
|
|
|
|
const
|
|
TXIMStringConversionSubstitution = $0001;
|
|
TXIMStringConversionRetrival = $0002;
|
|
|
|
type
|
|
TXIMStringConversionCallbackStruct = record
|
|
position : TXIMStringConversionPosition;
|
|
thetype : TXIMStringConversionType; { This wsa type. MVC}
|
|
operation : TXIMStringConversionOperation;
|
|
factor : word;
|
|
thetext : ^TXIMStringConversionText; { This was text. MVC}
|
|
end;
|
|
TXIMPreeditDrawCallbackStruct = record
|
|
caret : longint;
|
|
chg_first : longint;
|
|
chg_length : longint;
|
|
text : ^TXIMText;
|
|
end;
|
|
TXIMCaretDirection = (
|
|
XIMForwardChar,
|
|
XIMBackwardChar,
|
|
XIMForwardWord,
|
|
XIMBackwardWord,
|
|
XIMCaretUp,
|
|
XIMCaretDown,
|
|
XIMNextLine,
|
|
XIMPreviousLine,
|
|
XIMLineStart,
|
|
XIMLineEnd,
|
|
XIMAbsolutePosition,
|
|
XIMDontChange
|
|
);
|
|
TXIMCaretStyle = (
|
|
XIMIsInvisible,
|
|
XIMIsPrimary,
|
|
XIMIsSecondary
|
|
);
|
|
TXIMPreeditCaretCallbackStruct = record
|
|
position : longint;
|
|
direction : TXIMCaretDirection;
|
|
style : TXIMCaretStyle;
|
|
end;
|
|
TXIMStatusDataType = (
|
|
XIMTextType,
|
|
XIMBitmapType
|
|
);
|
|
TXIMStatusDrawCallbackStruct = record
|
|
thetype : TXIMStatusDataType; { Was Type. MVC }
|
|
data : record
|
|
case longint of
|
|
0 : (text : PXIMText);
|
|
1 : (bitmap : TPixmap);
|
|
end;
|
|
end;
|
|
TXIMHotKeyTrigger = record
|
|
keysym : TKeySym;
|
|
modifier : longint;
|
|
modifier_mask : longint;
|
|
end;
|
|
TXIMHotKeyTriggers = record
|
|
num_hot_key : longint;
|
|
key : ^TXIMHotKeyTrigger;
|
|
end;
|
|
TXIMHotKeyState = cardinal;
|
|
|
|
const
|
|
XIMHotKeyStateON = $0001;
|
|
XIMHotKeyStateOFF = $0002;
|
|
|
|
type
|
|
XIMValuesList = record
|
|
count_values : word;
|
|
supported_values : ^pchar;
|
|
end;
|
|
|
|
type
|
|
TXErrorHandler = Function(_para1 : PDisplay;_para2 : PXErrorEvent) : longint; cdecl;
|
|
TXIOErrorHandler = Function(_para1 : PDisplay) : longint; cdecl;
|
|
TXConnectionWatchProc = Procedure(_para1 : PDisplay;_para2 : TXPointer;_para3 : longint;_para4 : TBool;_para5 : PXPointer); cdecl;
|
|
|
|
|
|
{ Here start the Function definitions in the C header file. MVC }
|
|
|
|
Function XLoadQueryFont (para1 : PDisplay; para2 : pchar) : PXFontStruct; cdecl;external;
|
|
Function XQueryFont(_para1 : PDisplay;_para2 : TXID) : PXFontStruct; cdecl;external;
|
|
Function XGetMotionEvents(_para1 : PDisplay;_para2 : TWindow;_para3 : TTime;_para4 : TTime;_para5 : Plongint) : PXTimeCoord; cdecl;external;
|
|
Function XDeleteModifiermapEntry(_para1 : PXModifierKeymap;_para2 : cardinal;_para3 : TKeyCode;_para4 : longint) : PXModifierKeymap; cdecl;external;
|
|
Function XGetModifierMapping(_para1 : PDisplay) : PXModifierKeymap; cdecl;external;
|
|
Function XInsertModifiermapEntry(_para1 : PXModifierKeymap;_para2 : cardinal;_para3 : TKeyCode;_para4 : longint) : PXModifierKeymap; cdecl;external;
|
|
Function XNewModifiermap(_para1 : longint) : PXModifierKeymap; cdecl;external;
|
|
Function XCreateImage(_para1 : PDisplay;_para2 : PVisual;_para3 : cardinal;_para4 : longint;_para5 : longint;_para6 : pchar;_para7 : cardinal;_para8 : cardinal;_para9 : longint;_para10 : longint) : PXImage; cdecl;external;
|
|
Function XInitImage(_para1 : PXImage) : TStatus; cdecl;external;
|
|
Function XGetImage(_para1 : PDisplay;_para2 : TDrawable;_para3 : longint;_para4 : longint;_para5 : cardinal;_para6 : cardinal;_para7 : cardinal;_para8 : longint) : PXImage; cdecl;external;
|
|
Function XGetSubImage(_para1 : PDisplay;_para2 : TDrawable;_para3 : longint;_para4 : longint;_para5 : cardinal;_para6 : cardinal;_para7 : cardinal;_para8 : longint;_para9 : PXImage;_para10 : longint;_para11 : longint) : PXImage; cdecl;external;
|
|
Function XOpenDisplay(_para1 : pchar) : PDisplay; cdecl;external;
|
|
Procedure XrmInitialize; cdecl;external;
|
|
Function XFetchBytes(_para1 : PDisplay;_para2 : Plongint) : pchar; cdecl;external;
|
|
Function XFetchBuffer(_para1 : PDisplay;_para2 : Plongint;_para3 : longint) : pchar; cdecl;external;
|
|
Function XGetAtomName(_para1 : PDisplay;_para2 : TAtom) : pchar; cdecl;external;
|
|
Function XGetAtomNames(_para1 : PDisplay;_para2 : PAtom;_para3 : longint;_para4 : PPChar) : TStatus; cdecl;external;
|
|
Function XGetDefault(_para1 : PDisplay;_para2 : pchar;_para3 : pchar) : pchar; cdecl;external;
|
|
Function XDisplayName(_para1 : pchar) : pchar; cdecl;external;
|
|
Function XKeysymToString(_para1 : TKeySym) : pchar; cdecl;external;
|
|
Function XSynchronize(_para1 : PDisplay;_para2 : TBool) : longint; cdecl;external;
|
|
{ WHat to do with this ??? MVC
|
|
Function XSetAfterFunction(_para1 : PDisplay;_para2 : function(_para1 : PDisplay) : longint) : function : longint; cdecl;external;
|
|
}
|
|
Function XInternAtom(_para1 : PDisplay;_para2 : pchar;_para3 : TBool) : TAtom; cdecl;external;
|
|
Function XInternAtoms(_para1 : PDisplay;_para2 : PPChar;_para3 : longint;_para4 : TBool;_para5 : PAtom) : TStatus; cdecl;external;
|
|
Function XCopyColormapAndFree(_para1 : PDisplay;_para2 : TColormap) : TColormap; cdecl;external;
|
|
Function XCreateColormap(_para1 : PDisplay;_para2 : TWindow;_para3 : PVisual;_para4 : longint) : TColormap; cdecl;external;
|
|
Function XCreatePixmapCursor(_para1 : PDisplay;_para2 : TPixmap;_para3 : TPixmap;_para4 : PXColor;_para5 : PXColor;_para6 : cardinal;_para7 : cardinal) : TCursor; cdecl;external;
|
|
Function XCreateGlyphCursor(_para1 : PDisplay;_para2 : TFont;_para3 : TFont;_para4 : cardinal;_para5 : cardinal;_para6 : PXColor;_para7 : PXColor) : TCursor; cdecl;external;
|
|
Function XCreateFontCursor(_para1 : PDisplay;_para2 : cardinal) : TCursor; cdecl;external;
|
|
Function XLoadFont(_para1 : PDisplay;_para2 : pchar) : TFont; cdecl;external;
|
|
Function XCreateGC(_para1 : PDisplay;_para2 : TDrawable;_para3 : cardinal;_para4 : PXGCValues) : TGC; cdecl;external;
|
|
Function XGContextFromGC(_para1 : TGC) : TGContext; cdecl;external;
|
|
Procedure XFlushGC(_para1 : PDisplay;_para2 : TGC); cdecl;external;
|
|
Function XCreatePixmap(_para1 : PDisplay;_para2 : TDrawable;_para3 : cardinal;_para4 : cardinal;_para5 : cardinal) : TPixmap; cdecl;external;
|
|
Function XCreateBitmapFromData(_para1 : PDisplay;_para2 : TDrawable;_para3 : pchar;_para4 : cardinal;_para5 : cardinal) : TPixmap; cdecl;external;
|
|
Function XCreatePixmapFromBitmapData(_para1 : PDisplay;_para2 : TDrawable;_para3 : pchar;_para4 : cardinal;_para5 : cardinal;_para6 : cardinal;_para7 : cardinal;_para8 : cardinal) : TPixmap; cdecl;external;
|
|
Function XCreateSimpleWindow(_para1 : PDisplay;_para2 : TWindow;_para3 : longint;_para4 : longint;_para5 : cardinal;_para6 : cardinal;_para7 : cardinal;_para8 : cardinal;_para9 : cardinal) : TWindow; cdecl;external;
|
|
Function XGetSelectionOwner(_para1 : PDisplay;_para2 : TAtom) : TWindow; cdecl;external;
|
|
Function XCreateWindow(_para1 : PDisplay;_para2 : TWindow;_para3 : longint;_para4 : longint;_para5 : cardinal;_para6 : cardinal;_para7 : cardinal;_para8 : longint;_para9 : cardinal;_para10 : PVisual;_para11 : cardinal;_para12 : PXSetWindowAttributes) : TWindow; cdecl;external;
|
|
Function XListInstalledColormaps(_para1 : PDisplay;_para2 : TWindow;_para3 : Plongint) : PColormap; cdecl;external;
|
|
Function XListFonts(_para1 : PDisplay;_para2 : pchar;_para3 : longint;_para4 : Plongint) : PPChar; cdecl;external;
|
|
Function XListFontsWithInfo(_para1 : PDisplay;_para2 : pchar;_para3 : longint;_para4 : Plongint;_para5 : PPXFontStruct) : PPChar; cdecl;external;
|
|
Function XGetFontPath(_para1 : PDisplay;_para2 : Plongint) : PPChar; cdecl;external;
|
|
Function XListExtensions(_para1 : PDisplay;_para2 : Plongint) : PPChar; cdecl;external;
|
|
Function XListProperties(_para1 : PDisplay;_para2 : TWindow;_para3 : Plongint) : PAtom; cdecl;external;
|
|
Function XListHosts(_para1 : PDisplay;_para2 : Plongint;_para3 : PBool) : PXHostAddress; cdecl;external;
|
|
Function XKeycodeToKeysym(_para1 : PDisplay;_para3 : TKeyCode;_para4 : longint) : TKeySym; cdecl;external;
|
|
{ Doesn't want ? MVC
|
|
Function XLookupKeysym(_para1 : PXKeyEvent;_para2 : longint) : TKeySym; cdecl;external;
|
|
}
|
|
Function XGetKeyboardMapping(_para1 : PDisplay;_para2 : cardinal;_para3 : TKeyCode;_para4 : longint;_para5 : Plongint) : PKeySym; cdecl;external;
|
|
Function XStringToKeysym(_para1 : pchar) : TKeySym; cdecl;external;
|
|
Function XMaxRequestSize(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XExtendedMaxRequestSize(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XResourceManagerString(_para1 : PDisplay) : pchar; cdecl;external;
|
|
Function XScreenResourceString(_para1 : PScreen) : pchar; cdecl;external;
|
|
Function XDisplayMotionBufferSize(_para1 : PDisplay) : cardinal; cdecl;external;
|
|
Function XVisualIDFromVisual(_para1 : PVisual) : TVisualID; cdecl;external;
|
|
Function XInitThreads : TStatus; cdecl;external;
|
|
Procedure XLockDisplay(_para1 : PDisplay); cdecl;external;
|
|
Procedure XUnlockDisplay(_para1 : PDisplay); cdecl;external;
|
|
Function XInitExtension(_para1 : PDisplay;_para2 : pchar) : PXExtCodes; cdecl;external;
|
|
Function XAddExtension(_para1 : PDisplay) : PXExtCodes; cdecl;external;
|
|
Function XFindOnExtensionList(_para1 : PPXExtData;_para2 : longint) : PXExtData; cdecl;external;
|
|
Function XEHeadOfExtensionList(_para1 : TXEDataObject) : PPXExtData; cdecl;external;
|
|
Function XRootWindow(_para1 : PDisplay;_para2 : longint) : TWindow; cdecl;external;
|
|
Function XDefaultRootWindow(_para1 : PDisplay) : TWindow; cdecl;external;
|
|
Function XRootWindowOfScreen(_para1 : PScreen) : TWindow; cdecl;external;
|
|
Function XDefaultVisual(_para1 : PDisplay;_para2 : longint) : PVisual; cdecl;external;
|
|
Function XDefaultVisualOfScreen(_para1 : PScreen) : PVisual; cdecl;external;
|
|
Function XDefaultGC(_para1 : PDisplay;_para2 : longint) : TGC; cdecl;external;
|
|
Function XDefaultGCOfScreen(_para1 : PScreen) : TGC; cdecl;external;
|
|
Function XBlackPixel(_para1 : PDisplay;_para2 : longint) : cardinal; cdecl;external;
|
|
Function XWhitePixel(_para1 : PDisplay;_para2 : longint) : cardinal; cdecl;external;
|
|
Function XAllPlanes : cardinal; cdecl;external;
|
|
Function XBlackPixelOfScreen(_para1 : PScreen) : cardinal; cdecl;external;
|
|
Function XWhitePixelOfScreen(_para1 : PScreen) : cardinal; cdecl;external;
|
|
Function XNextRequest(_para1 : PDisplay) : cardinal; cdecl;external;
|
|
{
|
|
Function XLastKnownRequestProcessed(_para1 : PDisplay) : cardinal; cdecl;external;
|
|
}
|
|
Function XServerVendor(_para1 : PDisplay) : pchar; cdecl;external;
|
|
Function XDisplayString(_para1 : PDisplay) : pchar; cdecl;external;
|
|
Function XDefaultColormap(_para1 : PDisplay;_para2 : longint) : TColormap; cdecl;external;
|
|
Function XDefaultColormapOfScreen(_para1 : PScreen) : TColormap; cdecl;external;
|
|
Function XDisplayOfScreen(_para1 : PScreen) : PDisplay; cdecl;external;
|
|
Function XScreenOfDisplay(_para1 : PDisplay;_para2 : longint) : PScreen; cdecl;external;
|
|
Function XDefaultScreenOfDisplay(_para1 : PDisplay) : PScreen; cdecl;external;
|
|
Function XEventMaskOfScreen(_para1 : PScreen) : longint; cdecl;external;
|
|
Function XScreenNumberOfScreen(_para1 : PScreen) : longint; cdecl;external;
|
|
Function XSetErrorHandler(_para1 : TXErrorHandler) : TXErrorHandler; cdecl;external;
|
|
Function XSetIOErrorHandler(_para1 : TXIOErrorHandler) : TXIOErrorHandler; cdecl;external;
|
|
Function XListPixmapFormats(_para1 : PDisplay;_para2 : Plongint) : PXPixmapFormatValues; cdecl;external;
|
|
Function XListDepths(_para1 : PDisplay;_para2 : longint;_para3 : Plongint) : Plongint; cdecl;external;
|
|
Function XReconfigureWMWindow(_para1 : PDisplay;_para2 : TWindow;_para3 : longint;_para4 : cardinal;_para5 : PXWindowChanges) : TStatus; cdecl;external;
|
|
Function XGetWMProtocols(_para1 : PDisplay;_para2 : TWindow;_para3 : PPAtom;_para4 : Plongint) : TStatus; cdecl;external;
|
|
Function XSetWMProtocols(_para1 : PDisplay;_para2 : TWindow;_para3 : PAtom;_para4 : longint) : TStatus; cdecl;external;
|
|
Function XIconifyWindow(_para1 : PDisplay;_para2 : TWindow;_para3 : longint) : TStatus; cdecl;external;
|
|
Function XWithdrawWindow(_para1 : PDisplay;_para2 : TWindow;_para3 : longint) : TStatus; cdecl;external;
|
|
Function XGetCommand(_para1 : PDisplay;_para2 : TWindow;_para3 : PPPChar;_para4 : Plongint) : TStatus; cdecl;external;
|
|
Function XGetWMColormapWindows(_para1 : PDisplay;_para2 : TWindow;_para3 : PPWindow;_para4 : Plongint) : TStatus; cdecl;external;
|
|
Function XSetWMColormapWindows(_para1 : PDisplay;_para2 : TWindow;_para3 : PWindow;_para4 : longint) : TStatus; cdecl;external;
|
|
Procedure XFreeStringList(_para1 : PPChar); cdecl;external;
|
|
Function XSetTransientForHint(_para1 : PDisplay;_para2 : TWindow;_para3 : TWindow) : longint; cdecl;external;
|
|
Function XActivateScreenSaver(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XAddHost(_para1 : PDisplay;_para2 : PXHostAddress) : longint; cdecl;external;
|
|
Function XAddHosts(_para1 : PDisplay;_para2 : PXHostAddress;_para3 : longint) : longint; cdecl;external;
|
|
{
|
|
Function XAddToExtensionList(_para1 : ^^*;_para2 : PXExtData) : longint; cdecl;external;
|
|
}
|
|
Function XAddToSaveSet(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XAllocColor(_para1 : PDisplay;_para2 : TColormap;_para3 : PXColor) : TStatus; cdecl;external;
|
|
Function XAllocColorCells(_para1 : PDisplay;_para2 : TColormap;_para3 : TBool;_para4 : PCardinal;_para5 : cardinal;_para6 : PCardinal;_para7 : cardinal) : TStatus; cdecl;external;
|
|
Function XAllocColorPlanes(_para1 : PDisplay;_para2 : TColormap;_para3 : TBool;_para4 : PCardinal;_para5 : longint;_para6 : longint;_para7 : longint;_para8 : longint;_para9 : PCardinal;_para10 : PCardinal;_para11 : PCardinal) : TStatus; cdecl;external;
|
|
Function XAllocNamedColor(_para1 : PDisplay;_para2 : TColormap;_para3 : pchar;_para4 : PXColor;_para5 : PXColor) : TStatus; cdecl;external;
|
|
Function XAllowEvents(_para1 : PDisplay;_para2 : longint;_para3 : TTime) : longint; cdecl;external;
|
|
Function XAutoRepeatOff(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XAutoRepeatOn(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XBell(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XBitmapBitOrder(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XBitmapPad(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XBitmapUnit(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XCellsOfScreen(_para1 : PScreen) : longint; cdecl;external;
|
|
Function XChangeActivePointerGrab(_para1 : PDisplay;_para2 : cardinal;_para3 : TCursor;_para4 : TTime) : longint; cdecl;external;
|
|
Function XChangeGC(_para1 : PDisplay;_para2 : TGC;_para3 : cardinal;_para4 : PXGCValues) : longint; cdecl;external;
|
|
Function XChangeKeyboardControl(_para1 : PDisplay;_para2 : cardinal;_para3 : PXKeyboardControl) : longint; cdecl;external;
|
|
Function XChangeKeyboardMapping(_para1 : PDisplay;_para2 : longint;_para3 : longint;_para4 : PKeySym;_para5 : longint) : longint; cdecl;external;
|
|
Function XChangePointerControl(_para1 : PDisplay;_para2 : TBool;_para3 : TBool;_para4 : longint;_para5 : longint;_para6 : longint) : longint; cdecl;external;
|
|
Function XChangeProperty(_para1 : PDisplay;_para2 : TWindow;_para3 : TAtom;_para4 : TAtom;_para5 : longint;_para6 : longint;_para7 : pchar;_para8 : longint) : longint; cdecl;external;
|
|
Function XChangeSaveSet(_para1 : PDisplay;_para2 : TWindow;_para3 : longint) : longint; cdecl;external;
|
|
Function XChangeWindowAttributes(_para1 : PDisplay;_para2 : TWindow;_para3 : cardinal;_para4 : PXSetWindowAttributes) : longint; cdecl;external;
|
|
{
|
|
Function XCheckIfEvent(_para1 : PDisplay;_para2 : PXEvent;_para3 : function(_para1 : PDisplay;_para2 : PXEvent;_para3 : XPointer) : TBool;_para4 : XPointer) : TBool; cdecl;external;
|
|
}
|
|
Function XCheckMaskEvent(_para1 : PDisplay;_para2 : longint;_para3 : PXEvent) : TBool; cdecl;external;
|
|
Function XCheckTypedEvent(_para1 : PDisplay;_para2 : longint;_para3 : PXEvent) : TBool; cdecl;external;
|
|
Function XCheckTypedWindowEvent(_para1 : PDisplay;_para2 : TWindow;_para3 : longint;_para4 : PXEvent) : TBool; cdecl;external;
|
|
Function XCheckWindowEvent(_para1 : PDisplay;_para2 : TWindow;_para3 : longint;_para4 : PXEvent) : TBool; cdecl;external;
|
|
Function XCirculateSubwindows(_para1 : PDisplay;_para2 : TWindow;_para3 : longint) : longint; cdecl;external;
|
|
Function XCirculateSubwindowsDown(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XCirculateSubwindowsUp(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XClearArea(_para1 : PDisplay;_para2 : TWindow;_para3 : longint;_para4 : longint;_para5 : cardinal;_para6 : cardinal;_para7 : TBool) : longint; cdecl;external;
|
|
Function XClearWindow(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XCloseDisplay(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XConfigureWindow(_para1 : PDisplay;_para2 : TWindow;_para3 : cardinal;_para4 : PXWindowChanges) : longint; cdecl;external;
|
|
Function XConnectionNumber(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XConvertSelection(_para1 : PDisplay;_para2 : TAtom;_para3 : TAtom;_para4 : TAtom;_para5 : TWindow;_para6 : TTime) : longint; cdecl;external;
|
|
Function XCopyArea(_para1 : PDisplay;_para2 : TDrawable;_para3 : TDrawable;_para4 : TGC;_para5 : longint;_para6 : longint;_para7 : cardinal;_para8 : cardinal;_para9 : longint;_para10 : longint) : longint; cdecl;external;
|
|
Function XCopyGC(_para1 : PDisplay;_para2 : TGC;_para3 : cardinal;_para4 : TGC) : longint; cdecl;external;
|
|
Function XCopyPlane(_para1 : PDisplay;_para2 : TDrawable;_para3 : TDrawable;_para4 : TGC;_para5 : longint;_para6 : longint;_para7 : cardinal;_para8 : cardinal;_para9 : longint;_para10 : longint;_para11 : cardinal) : longint; cdecl;external;
|
|
Function XDefaultDepth(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XDefaultDepthOfScreen(_para1 : PScreen) : longint; cdecl;external;
|
|
Function XDefaultScreen(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XDefineCursor(_para1 : PDisplay;_para2 : TWindow;_para3 : TCursor) : longint; cdecl;external;
|
|
Function XDeleteProperty(_para1 : PDisplay;_para2 : TWindow;_para3 : TAtom) : longint; cdecl;external;
|
|
Function XDestroyWindow(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XDestroySubwindows(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XDoesBackingStore(_para1 : PScreen) : longint; cdecl;external;
|
|
Function XDoesSaveUnders(_para1 : PScreen) : TBool; cdecl;external;
|
|
Function XDisableAccessControl(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XDisplayCells(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XDisplayHeight(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XDisplayHeightMM(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XDisplayKeycodes(_para1 : PDisplay;_para2 : Plongint;_para3 : Plongint) : longint; cdecl;external;
|
|
Function XDisplayPlanes(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XDisplayWidth(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XDisplayWidthMM(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XDrawArc(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : cardinal;_para7 : cardinal;_para8 : longint;_para9 : longint) : longint; cdecl;external;
|
|
Function XDrawArcs(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : PXArc;_para5 : longint) : longint; cdecl;external;
|
|
Function XDrawImageString(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : pchar;_para7 : longint) : longint; cdecl;external;
|
|
Function XDrawImageString16(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : PXChar2b;_para7 : longint) : longint; cdecl;external;
|
|
Function XDrawLine(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : longint;_para7 : longint) : longint; cdecl;external;
|
|
Function XDrawLines(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : PXPoint;_para5 : longint;_para6 : longint) : longint; cdecl;external;
|
|
Function XDrawPoint(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint) : longint; cdecl;external;
|
|
Function XDrawPoints(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : PXPoint;_para5 : longint;_para6 : longint) : longint; cdecl;external;
|
|
Function XDrawRectangle(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : cardinal;_para7 : cardinal) : longint; cdecl;external;
|
|
Function XDrawRectangles(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : PXRectangle;_para5 : longint) : longint; cdecl;external;
|
|
Function XDrawSegments(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : PXSegment;_para5 : longint) : longint; cdecl;external;
|
|
Function XDrawString(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : pchar;_para7 : longint) : longint; cdecl;external;
|
|
Function XDrawString16(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : PXChar2b;_para7 : longint) : longint; cdecl;external;
|
|
Function XDrawText(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : PXTextItem;_para7 : longint) : longint; cdecl;external;
|
|
Function XDrawText16(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : PXTextItem16;_para7 : longint) : longint; cdecl;external;
|
|
Function XEnableAccessControl(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XEventsQueued(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XFetchName(_para1 : PDisplay;_para2 : TWindow;_para3 : PPChar) : TStatus; cdecl;external;
|
|
Function XFillArc(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : cardinal;_para7 : cardinal;_para8 : longint;_para9 : longint) : longint; cdecl;external;
|
|
Function XFillArcs(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : PXArc;_para5 : longint) : longint; cdecl;external;
|
|
Function XFillPolygon(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : PXPoint;_para5 : longint;_para6 : longint;_para7 : longint) : longint; cdecl;external;
|
|
Function XFillRectangle(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : cardinal;_para7 : cardinal) : longint; cdecl;external;
|
|
Function XFillRectangles(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : PXRectangle;_para5 : longint) : longint; cdecl;external;
|
|
Function XFlush(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XForceScreenSaver(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XFree(_para1 : pointer) : longint; cdecl;external;
|
|
Function XFreeColormap(_para1 : PDisplay;_para2 : TColormap) : longint; cdecl;external;
|
|
Function XFreeColors(_para1 : PDisplay;_para2 : TColormap;_para3 : PCardinal;_para4 : longint;_para5 : cardinal) : longint; cdecl;external;
|
|
Function XFreeCursor(_para1 : PDisplay;_para2 : TCursor) : longint; cdecl;external;
|
|
Function XFreeExtensionList(_para1 : PPChar) : longint; cdecl;external;
|
|
Function XFreeFont(_para1 : PDisplay;_para2 : PXFontStruct) : longint; cdecl;external;
|
|
Function XFreeFontInfo(_para1 : PPChar;_para2 : PXFontStruct;_para3 : longint) : longint; cdecl;external;
|
|
Function XFreeFontNames(_para1 : PPChar) : longint; cdecl;external;
|
|
Function XFreeFontPath(_para1 : PPChar) : longint; cdecl;external;
|
|
Function XFreeGC(_para1 : PDisplay;_para2 : TGC) : longint; cdecl;external;
|
|
Function XFreeModifiermap(_para1 : PXModifierKeymap) : longint; cdecl;external;
|
|
Function XFreePixmap(_para1 : PDisplay;_para2 : TPixmap) : longint; cdecl;external;
|
|
Function XGeometry(_para1 : PDisplay;_para2 : longint;_para3 : pchar;_para4 : pchar;_para5 : cardinal;_para6 : cardinal;_para7 : cardinal;_para8 : longint;_para9 : longint;_para10 : Plongint;_para11 : Plongint;_para12 : Plongint;_para13 : Plongint) : longint; cdecl;external;
|
|
Function XGetErrorDatabaseText(_para1 : PDisplay;_para2 : pchar;_para3 : pchar;_para4 : pchar;_para5 : pchar;_para6 : longint) : longint; cdecl;external;
|
|
Function XGetErrorText(_para1 : PDisplay;_para2 : longint;_para3 : pchar;_para4 : longint) : longint; cdecl;external;
|
|
Function XGetFontProperty(_para1 : PXFontStruct;_para2 : TAtom;_para3 : PCardinal) : TBool; cdecl;external;
|
|
Function XGetGCValues(_para1 : PDisplay;_para2 : TGC;_para3 : cardinal;_para4 : PXGCValues) : TStatus; cdecl;external;
|
|
Function XGetGeometry(_para1 : PDisplay;_para2 : TDrawable;_para3 : PWindow;_para4 : Plongint;_para5 : Plongint;_para6 : PCardinal;_para7 : PCardinal;_para8 : PCardinal;_para9 : PCardinal) : TStatus; cdecl;external;
|
|
Function XGetIconName(_para1 : PDisplay;_para2 : TWindow;_para3 : PPChar) : TStatus; cdecl;external;
|
|
Function XGetInputFocus(_para1 : PDisplay;_para2 : PWindow;_para3 : Plongint) : longint; cdecl;external;
|
|
Function XGetKeyboardControl(_para1 : PDisplay;_para2 : PXKeyboardState) : longint; cdecl;external;
|
|
Function XGetPointerControl(_para1 : PDisplay;_para2 : Plongint;_para3 : Plongint;_para4 : Plongint) : longint; cdecl;external;
|
|
Function XGetPointerMapping(_para1 : PDisplay;_para2 : pchar;_para3 : longint) : longint; cdecl;external;
|
|
Function XGetScreenSaver(_para1 : PDisplay;_para2 : Plongint;_para3 : Plongint;_para4 : Plongint;_para5 : Plongint) : longint; cdecl;external;
|
|
Function XGetTransientForHint(_para1 : PDisplay;_para2 : TWindow;_para3 : PWindow) : TStatus; cdecl;external;
|
|
Function XGetWindowProperty(_para1 : PDisplay;_para2 : TWindow;_para3 : TAtom;_para4 : longint;_para5 : longint;_para6 : TBool;_para7 : TAtom;_para8 : PAtom;_para9 : Plongint;_para10 : PCardinal;_para11 : PCardinal;_para12 : PPChar) : longint; cdecl;external;
|
|
Function XGetWindowAttributes(_para1 : PDisplay;_para2 : TWindow;_para3 : PXWindowAttributes) : TStatus; cdecl;external;
|
|
Function XGrabButton(_para1 : PDisplay;_para2 : cardinal;_para3 : cardinal;_para4 : TWindow;_para5 : TBool;_para6 : cardinal;_para7 : longint;_para8 : longint;_para9 : TWindow;_para10 : TCursor) : longint; cdecl;external;
|
|
Function XGrabKey(_para1 : PDisplay;_para2 : longint;_para3 : cardinal;_para4 : TWindow;_para5 : TBool;_para6 : longint;_para7 : longint) : longint; cdecl;external;
|
|
Function XGrabKeyboard(_para1 : PDisplay;_para2 : TWindow;_para3 : TBool;_para4 : longint;_para5 : longint;_para6 : TTime) : longint; cdecl;external;
|
|
Function XGrabPointer(_para1 : PDisplay;_para2 : TWindow;_para3 : TBool;_para4 : cardinal;_para5 : longint;_para6 : longint;_para7 : TWindow;_para8 : TCursor;_para9 : TTime) : longint; cdecl;external;
|
|
Function XGrabServer(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XHeightMMOfScreen(_para1 : PScreen) : longint; cdecl;external;
|
|
Function XHeightOfScreen(_para1 : PScreen) : longint; cdecl;external;
|
|
{
|
|
Function XIfEvent(_para1 : PDisplay;_para2 : PXEvent;_para3 : function(_para1 : PDisplay;_para2 : PXEvent;_para3 : XPointer) : TBool;_para4 : XPointer) : longint; cdecl;external;
|
|
}
|
|
Function XImageByteOrder(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XInstallColormap(_para1 : PDisplay;_para2 : TColormap) : longint; cdecl;external;
|
|
Function XKeysymToKeycode(_para1 : PDisplay;_para2 : TKeySym) : TKeyCode; cdecl;external;
|
|
Function XKillClient(_para1 : PDisplay;_para2 : TXID) : longint; cdecl;external;
|
|
Function XLastKnownRequestProcessed(_para1 : PDisplay) : cardinal; cdecl;external;
|
|
Function XLookupColor(_para1 : PDisplay;_para2 : TColormap;_para3 : pchar;_para4 : PXColor;_para5 : PXColor) : TStatus; cdecl;external;
|
|
Function XLowerWindow(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XMapRaised(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XMapSubwindows(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XMapWindow(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XMaskEvent(_para1 : PDisplay;_para2 : longint;_para3 : PXEvent) : longint; cdecl;external;
|
|
Function XMaxCmapsOfScreen(_para1 : PScreen) : longint; cdecl;external;
|
|
Function XMinCmapsOfScreen(_para1 : PScreen) : longint; cdecl;external;
|
|
Function XMoveResizeWindow(_para1 : PDisplay;_para2 : TWindow;_para3 : longint;_para4 : longint;_para5 : cardinal;_para6 : cardinal) : longint; cdecl;external;
|
|
Function XMoveWindow(_para1 : PDisplay;_para2 : TWindow;_para3 : longint;_para4 : longint) : longint; cdecl;external;
|
|
Function XNextEvent(_para1 : PDisplay;_para2 : PXEvent) : longint; cdecl;external;
|
|
Function XNoOp(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XParseColor(_para1 : PDisplay;_para2 : TColormap;_para3 : pchar;_para4 : PXColor) : TStatus; cdecl;external;
|
|
Function XParseGeometry(_para1 : pchar;_para2 : Plongint;_para3 : Plongint;_para4 : PCardinal;_para5 : PCardinal) : longint; cdecl;external;
|
|
Function XPeekEvent(_para1 : PDisplay;_para2 : PXEvent) : longint; cdecl;external;
|
|
{
|
|
Function XPeekIfEvent(_para1 : PDisplay;_para2 : PXEvent;_para3 : function(_para1 : PDisplay;_para2 : PXEvent;_para3 : XPointer) : TBool;_para4 : XPointer) : longint; cdecl;external;
|
|
}
|
|
Function XPending(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XPlanesOfScreen(_para1 : PScreen) : longint; cdecl;external;
|
|
Function XProtocolRevision(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XProtocolVersion(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XPutBackEvent(_para1 : PDisplay;_para2 : PXEvent) : longint; cdecl;external;
|
|
Function XPutImage(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : PXImage;_para5 : longint;_para6 : longint;_para7 : longint;_para8 : longint;_para9 : cardinal;_para10 : cardinal) : longint; cdecl;external;
|
|
Function XQLength(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XQueryBestCursor(_para1 : PDisplay;_para2 : TDrawable;_para3 : cardinal;_para4 : cardinal;_para5 : PCardinal;_para6 : PCardinal) : TStatus; cdecl;external;
|
|
Function XQueryBestSize(_para1 : PDisplay;_para2 : longint;_para3 : TDrawable;_para4 : cardinal;_para5 : cardinal;_para6 : PCardinal;_para7 : PCardinal) : TStatus; cdecl;external;
|
|
Function XQueryBestStipple(_para1 : PDisplay;_para2 : TDrawable;_para3 : cardinal;_para4 : cardinal;_para5 : PCardinal;_para6 : PCardinal) : TStatus; cdecl;external;
|
|
Function XQueryBestTile(_para1 : PDisplay;_para2 : TDrawable;_para3 : cardinal;_para4 : cardinal;_para5 : PCardinal;_para6 : PCardinal) : TStatus; cdecl;external;
|
|
Function XQueryColor(_para1 : PDisplay;_para2 : TColormap;_para3 : PXColor) : longint; cdecl;external;
|
|
Function XQueryColors(_para1 : PDisplay;_para2 : TColormap;_para3 : PXColor;_para4 : longint) : longint; cdecl;external;
|
|
Function XQueryExtension(_para1 : PDisplay;_para2 : pchar;_para3 : Plongint;_para4 : Plongint;_para5 : Plongint) : TBool; cdecl;external;
|
|
{
|
|
Function XQueryKeymap(_para1 : PDisplay;_para2 : array[0..(32)-1] of char) : longint; cdecl;external;
|
|
}
|
|
Function XQueryPointer(_para1 : PDisplay;_para2 : TWindow;_para3 : PWindow;_para4 : PWindow;_para5 : Plongint;_para6 : Plongint;_para7 : Plongint;_para8 : Plongint;_para9 : PCardinal) : TBool; cdecl;external;
|
|
Function XQueryTextExtents(_para1 : PDisplay;_para2 : TXID;_para3 : pchar;_para4 : longint;_para5 : Plongint;_para6 : Plongint;_para7 : Plongint;_para8 : PXCharStruct) : longint; cdecl;external;
|
|
Function XQueryTextExtents16(_para1 : PDisplay;_para2 : TXID;_para3 : PXChar2b;_para4 : longint;_para5 : Plongint;_para6 : Plongint;_para7 : Plongint;_para8 : PXCharStruct) : longint; cdecl;external;
|
|
Function XQueryTree(_para1 : PDisplay;_para2 : TWindow;_para3 : PWindow;_para4 : PWindow;_para5 : PPWindow;_para6 : PCardinal) : TStatus; cdecl;external;
|
|
Function XRaiseWindow(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XReadBitmapFile(_para1 : PDisplay;_para2 : TDrawable;_para3 : pchar;_para4 : PCardinal;_para5 : PCardinal;_para6 : PPixmap;_para7 : Plongint;_para8 : Plongint) : longint; cdecl;external;
|
|
Function XReadBitmapFileData(_para1 : pchar;_para2 : PCardinal;_para3 : PCardinal;_para4 : PPChar;_para5 : Plongint;_para6 : Plongint) : longint; cdecl;external;
|
|
Function XRebindKeysym(_para1 : PDisplay;_para2 : TKeySym;_para3 : PKeySym;_para4 : longint;_para5 : pchar;_para6 : longint) : longint; cdecl;external;
|
|
Function XRecolorCursor(_para1 : PDisplay;_para2 : TCursor;_para3 : PXColor;_para4 : PXColor) : longint; cdecl;external;
|
|
Function XRefreshKeyboardMapping(_para1 : PXMappingEvent) : longint; cdecl;external;
|
|
Function XRemoveFromSaveSet(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XRemoveHost(_para1 : PDisplay;_para2 : PXHostAddress) : longint; cdecl;external;
|
|
Function XRemoveHosts(_para1 : PDisplay;_para2 : PXHostAddress;_para3 : longint) : longint; cdecl;external;
|
|
Function XReparentWindow(_para1 : PDisplay;_para2 : TWindow;_para3 : TWindow;_para4 : longint;_para5 : longint) : longint; cdecl;external;
|
|
Function XResetScreenSaver(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XResizeWindow(_para1 : PDisplay;_para2 : TWindow;_para3 : cardinal;_para4 : cardinal) : longint; cdecl;external;
|
|
Function XRestackWindows(_para1 : PDisplay;_para2 : PWindow;_para3 : longint) : longint; cdecl;external;
|
|
Function XRotateBuffers(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XRotateWindowProperties(_para1 : PDisplay;_para2 : TWindow;_para3 : PAtom;_para4 : longint;_para5 : longint) : longint; cdecl;external;
|
|
Function XScreenCount(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XSelectInput(_para1 : PDisplay;_para2 : TWindow;_para3 : longint) : longint; cdecl;external;
|
|
Function XSendEvent(_para1 : PDisplay;_para2 : TWindow;_para3 : TBool;_para4 : longint;_para5 : PXEvent) : TStatus; cdecl;external;
|
|
Function XSetAccessControl(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XSetArcMode(_para1 : PDisplay;_para2 : TGC;_para3 : longint) : longint; cdecl;external;
|
|
Function XSetBackground(_para1 : PDisplay;_para2 : TGC;_para3 : cardinal) : longint; cdecl;external;
|
|
Function XSetClipMask(_para1 : PDisplay;_para2 : TGC;_para3 : TPixmap) : longint; cdecl;external;
|
|
Function XSetClipOrigin(_para1 : PDisplay;_para2 : TGC;_para3 : longint;_para4 : longint) : longint; cdecl;external;
|
|
Function XSetClipRectangles(_para1 : PDisplay;_para2 : TGC;_para3 : longint;_para4 : longint;_para5 : PXRectangle;_para6 : longint;_para7 : longint) : longint; cdecl;external;
|
|
Function XSetCloseDownMode(_para1 : PDisplay;_para2 : longint) : longint; cdecl;external;
|
|
Function XSetCommand(_para1 : PDisplay;_para2 : TWindow;_para3 : PPChar;_para4 : longint) : longint; cdecl;external;
|
|
Function XSetDashes(_para1 : PDisplay;_para2 : TGC;_para3 : longint;_para4 : pchar;_para5 : longint) : longint; cdecl;external;
|
|
Function XSetFillRule(_para1 : PDisplay;_para2 : TGC;_para3 : longint) : longint; cdecl;external;
|
|
Function XSetFillStyle(_para1 : PDisplay;_para2 : TGC;_para3 : longint) : longint; cdecl;external;
|
|
Function XSetFont(_para1 : PDisplay;_para2 : TGC;_para3 : TFont) : longint; cdecl;external;
|
|
Function XSetFontPath(_para1 : PDisplay;_para2 : PPChar;_para3 : longint) : longint; cdecl;external;
|
|
Function XSetForeground(_para1 : PDisplay;_para2 : TGC;_para3 : cardinal) : longint; cdecl;external;
|
|
Function XSetFunction(_para1 : PDisplay;_para2 : TGC;_para3 : longint) : longint; cdecl;external;
|
|
Function XSetGraphicsExposures(_para1 : PDisplay;_para2 : TGC;_para3 : TBool) : longint; cdecl;external;
|
|
Function XSetIconName(_para1 : PDisplay;_para2 : TWindow;_para3 : pchar) : longint; cdecl;external;
|
|
Function XSetInputFocus(_para1 : PDisplay;_para2 : TWindow;_para3 : longint;_para4 : TTime) : longint; cdecl;external;
|
|
Function XSetLineAttributes(_para1 : PDisplay;_para2 : TGC;_para3 : cardinal;_para4 : longint;_para5 : longint;_para6 : longint) : longint; cdecl;external;
|
|
Function XSetModifierMapping(_para1 : PDisplay;_para2 : PXModifierKeymap) : longint; cdecl;external;
|
|
Function XSetPlaneMask(_para1 : PDisplay;_para2 : TGC;_para3 : cardinal) : longint; cdecl;external;
|
|
Function XSetPointerMapping(_para1 : PDisplay;_para2 : pchar;_para3 : longint) : longint; cdecl;external;
|
|
Function XSetScreenSaver(_para1 : PDisplay;_para2 : longint;_para3 : longint;_para4 : longint;_para5 : longint) : longint; cdecl;external;
|
|
Function XSetSelectionOwner(_para1 : PDisplay;_para2 : TAtom;_para3 : TWindow;_para4 : TTime) : longint; cdecl;external;
|
|
Function XSetState(_para1 : PDisplay;_para2 : TGC;_para3 : cardinal;_para4 : cardinal;_para5 : longint;_para6 : cardinal) : longint; cdecl;external;
|
|
Function XSetStipple(_para1 : PDisplay;_para2 : TGC;_para3 : TPixmap) : longint; cdecl;external;
|
|
Function XSetSubwindowMode(_para1 : PDisplay;_para2 : TGC;_para3 : longint) : longint; cdecl;external;
|
|
Function XSetTSOrigin(_para1 : PDisplay;_para2 : TGC;_para3 : longint;_para4 : longint) : longint; cdecl;external;
|
|
Function XSetTile(_para1 : PDisplay;_para2 : TGC;_para3 : TPixmap) : longint; cdecl;external;
|
|
Function XSetWindowBackground(_para1 : PDisplay;_para2 : TWindow;_para3 : cardinal) : longint; cdecl;external;
|
|
Function XSetWindowBackgroundPixmap(_para1 : PDisplay;_para2 : TWindow;_para3 : TPixmap) : longint; cdecl;external;
|
|
Function XSetWindowBorder(_para1 : PDisplay;_para2 : TWindow;_para3 : cardinal) : longint; cdecl;external;
|
|
Function XSetWindowBorderPixmap(_para1 : PDisplay;_para2 : TWindow;_para3 : TPixmap) : longint; cdecl;external;
|
|
Function XSetWindowBorderWidth(_para1 : PDisplay;_para2 : TWindow;_para3 : cardinal) : longint; cdecl;external;
|
|
Function XSetWindowColormap(_para1 : PDisplay;_para2 : TWindow;_para3 : TColormap) : longint; cdecl;external;
|
|
Function XStoreBuffer(_para1 : PDisplay;_para2 : pchar;_para3 : longint;_para4 : longint) : longint; cdecl;external;
|
|
Function XStoreBytes(_para1 : PDisplay;_para2 : pchar;_para3 : longint) : longint; cdecl;external;
|
|
Function XStoreColor(_para1 : PDisplay;_para2 : TColormap;_para3 : PXColor) : longint; cdecl;external;
|
|
Function XStoreColors(_para1 : PDisplay;_para2 : TColormap;_para3 : PXColor;_para4 : longint) : longint; cdecl;external;
|
|
Function XStoreName(_para1 : PDisplay;_para2 : TWindow;_para3 : pchar) : longint; cdecl;external;
|
|
Function XStoreNamedColor(_para1 : PDisplay;_para2 : TColormap;_para3 : pchar;_para4 : cardinal;_para5 : longint) : longint; cdecl;external;
|
|
Function XSync(_para1 : PDisplay;_para2 : TBool) : longint; cdecl;external;
|
|
Function XTextExtents(_para1 : PXFontStruct;_para2 : pchar;_para3 : longint;_para4 : Plongint;_para5 : Plongint;_para6 : Plongint;_para7 : PXCharStruct) : longint; cdecl;external;
|
|
Function XTextExtents16(_para1 : PXFontStruct;_para2 : PXChar2b;_para3 : longint;_para4 : Plongint;_para5 : Plongint;_para6 : Plongint;_para7 : PXCharStruct) : longint; cdecl;external;
|
|
Function XTextWidth(_para1 : PXFontStruct;_para2 : pchar;_para3 : longint) : longint; cdecl;external;
|
|
Function XTextWidth16(_para1 : PXFontStruct;_para2 : PXChar2b;_para3 : longint) : longint; cdecl;external;
|
|
Function XTranslateCoordinates(_para1 : PDisplay;_para2 : TWindow;_para3 : TWindow;_para4 : longint;_para5 : longint;_para6 : Plongint;_para7 : Plongint;_para8 : PWindow) : TBool; cdecl;external;
|
|
Function XUndefineCursor(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XUngrabButton(_para1 : PDisplay;_para2 : cardinal;_para3 : cardinal;_para4 : TWindow) : longint; cdecl;external;
|
|
Function XUngrabKey(_para1 : PDisplay;_para2 : longint;_para3 : cardinal;_para4 : TWindow) : longint; cdecl;external;
|
|
Function XUngrabKeyboard(_para1 : PDisplay;_para2 : TTime) : longint; cdecl;external;
|
|
Function XUngrabPointer(_para1 : PDisplay;_para2 : TTime) : longint; cdecl;external;
|
|
Function XUngrabServer(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XUninstallColormap(_para1 : PDisplay;_para2 : TColormap) : longint; cdecl;external;
|
|
Function XUnloadFont(_para1 : PDisplay;_para2 : TFont) : longint; cdecl;external;
|
|
Function XUnmapSubwindows(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XUnmapWindow(_para1 : PDisplay;_para2 : TWindow) : longint; cdecl;external;
|
|
Function XVendorRelease(_para1 : PDisplay) : longint; cdecl;external;
|
|
Function XWarpPointer(_para1 : PDisplay;_para2 : TWindow;_para3 : TWindow;_para4 : longint;_para5 : longint;_para6 : cardinal;_para7 : cardinal;_para8 : longint;_para9 : longint) : longint; cdecl;external;
|
|
Function XWidthMMOfScreen(_para1 : PScreen) : longint; cdecl;external;
|
|
Function XWidthOfScreen(_para1 : PScreen) : longint; cdecl;external;
|
|
Function XWindowEvent(_para1 : PDisplay;_para2 : TWindow;_para3 : longint;_para4 : PXEvent) : longint; cdecl;external;
|
|
Function XWriteBitmapFile(_para1 : PDisplay;_para2 : pchar;_para3 : TPixmap;_para4 : cardinal;_para5 : cardinal;_para6 : longint;_para7 : longint) : longint; cdecl;external;
|
|
Function XSupportsLocale : TBool; cdecl;external;
|
|
Function XSetLocaleModifiers(_para1 : pchar) : pchar; cdecl;external;
|
|
{
|
|
Function XOpenOM(_para1 : PDisplay;_para2 : ^*;_para3 : pchar;_para4 : pchar) : TXOM; cdecl;external;
|
|
}
|
|
Function XCloseOM(_para1 : TXOM) : TStatus; cdecl;external;
|
|
Function XDisplayOfOM(_para1 : TXOM) : PDisplay; cdecl;external;
|
|
Function XLocaleOfOM(_para1 : TXOM) : pchar; cdecl;external;
|
|
Procedure XDestroyOC(_para1 : TXOC); cdecl;external;
|
|
Function TXOMOfOC(_para1 : TXOC) : TXOM; cdecl;external;
|
|
Function XCreateFontSet(_para1 : PDisplay;_para2 : pchar;_para3 : PPPChar;_para4 : Plongint;_para5 : PPChar) : TXFontSet; cdecl;external;
|
|
Procedure XFreeFontSet(_para1 : PDisplay;_para2 : TXFontSet); cdecl;external;
|
|
Function XFontsOfFontSet(_para1 : TXFontSet;_para2 : PPPXFontStruct;_para3 : PPPChar) : longint; cdecl;external;
|
|
Function XBaseFontNameListOfFontSet(_para1 : TXFontSet) : pchar; cdecl;external;
|
|
Function XLocaleOfFontSet(_para1 : TXFontSet) : pchar; cdecl;external;
|
|
Function XContextDependentDrawing(_para1 : TXFontSet) : TBool; cdecl;external;
|
|
Function XDirectionalDependentDrawing(_para1 : TXFontSet) : TBool; cdecl;external;
|
|
Function XContextualDrawing(_para1 : TXFontSet) : TBool; cdecl;external;
|
|
Function XExtentsOfFontSet(_para1 : TXFontSet) : PXFontSetExtents; cdecl;external;
|
|
Function XmbTextEscapement(_para1 : TXFontSet;_para2 : pchar;_para3 : longint) : longint; cdecl;external;
|
|
Function XwcTextEscapement(_para1 : TXFontSet;_para2 : Pwchar_t;_para3 : longint) : longint; cdecl;external;
|
|
Function XmbTextExtents(_para1 : TXFontSet;_para2 : pchar;_para3 : longint;_para4 : PXRectangle;_para5 : PXRectangle) : longint; cdecl;external;
|
|
Function XwcTextExtents(_para1 : TXFontSet;_para2 : Pwchar_t;_para3 : longint;_para4 : PXRectangle;_para5 : PXRectangle) : longint; cdecl;external;
|
|
Function XmbTextPerCharExtents(_para1 : TXFontSet;_para2 : pchar;_para3 : longint;_para4 : PXRectangle;_para5 : PXRectangle;_para6 : longint;_para7 : Plongint;_para8 : PXRectangle;_para9 : PXRectangle) : TStatus; cdecl;external;
|
|
Function XwcTextPerCharExtents(_para1 : TXFontSet;_para2 : Pwchar_t;_para3 : longint;_para4 : PXRectangle;_para5 : PXRectangle;_para6 : longint;_para7 : Plongint;_para8 : PXRectangle;_para9 : PXRectangle) : TStatus; cdecl;external;
|
|
Procedure XmbDrawText(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : PXmbTextItem;_para7 : longint); cdecl;external;
|
|
Procedure XwcDrawText(_para1 : PDisplay;_para2 : TDrawable;_para3 : TGC;_para4 : longint;_para5 : longint;_para6 : PXwcTextItem;_para7 : longint); cdecl;external;
|
|
Procedure XmbDrawString(_para1 : PDisplay;_para2 : TDrawable;_para3 : TXFontSet;_para4 : TGC;_para5 : longint;_para6 : longint;_para7 : pchar;_para8 : longint); cdecl;external;
|
|
Procedure XwcDrawString(_para1 : PDisplay;_para2 : TDrawable;_para3 : TXFontSet;_para4 : TGC;_para5 : longint;_para6 : longint;_para7 : Pwchar_t;_para8 : longint); cdecl;external;
|
|
Procedure XmbDrawImageString(_para1 : PDisplay;_para2 : TDrawable;_para3 : TXFontSet;_para4 : TGC;_para5 : longint;_para6 : longint;_para7 : pchar;_para8 : longint); cdecl;external;
|
|
Procedure XwcDrawImageString(_para1 : PDisplay;_para2 : TDrawable;_para3 : TXFontSet;_para4 : TGC;_para5 : longint;_para6 : longint;_para7 : Pwchar_t;_para8 : longint); cdecl;external;
|
|
{
|
|
Function XOpenIM(_para1 : PDisplay;_para2 : P*;_para3 : pchar;_para4 : pchar) : TXIM; cdecl;external;
|
|
}
|
|
Function XCloseIM(_para1 : TXIM) : TStatus; cdecl;external;
|
|
Function XDisplayOfIM(_para1 : TXIM) : PDisplay; cdecl;external;
|
|
Function XLocaleOfIM(_para1 : TXIM) : pchar; cdecl;external;
|
|
Procedure XDestroyIC(_para1 : TXIC); cdecl;external;
|
|
Procedure XSetICFocus(_para1 : TXIC); cdecl;external;
|
|
Procedure XUnsetICFocus(_para1 : TXIC); cdecl;external;
|
|
Function XwcResetIC(_para1 : TXIC) : Pwchar_t; cdecl;external;
|
|
Function XmbResetIC(_para1 : TXIC) : pchar; cdecl;external;
|
|
Function TXIMOfIC(_para1 : TXIC) : TXIM; cdecl;external;
|
|
Function XFilterEvent(_para1 : PXEvent;_para2 : TWindow) : TBool; cdecl;external;
|
|
Function XmbLookupString(_para1 : TXIC;_para2 : PXKeyPressedEvent;_para3 : pchar;_para4 : longint;_para5 : PKeySym;_para6 : PStatus) : longint; cdecl;external;
|
|
Function XwcLookupString(_para1 : TXIC;_para2 : PXKeyPressedEvent;_para3 : Pwchar_t;_para4 : longint;_para5 : PKeySym;_para6 : PStatus) : longint; cdecl;external;
|
|
{
|
|
Function XRegisterIMInstantiateCallback(_para1 : PDisplay;_para2 : P*;_para3 : pchar;_para4 : pchar;_para5 : TXIMProc;_para6 : PXPointer) : TBool; cdecl;external;
|
|
Function XUnregisterIMInstantiateCallback(_para1 : PDisplay;_para2 : P*;_para3 : pchar;_para4 : pchar;_para5 : TXIMProc;_para6 : PXPointer) : TBool; cdecl;external;
|
|
}
|
|
Function XInternalConnectionNumbers(_para1 : PDisplay;_para2 : PPlongint;_para3 : Plongint) : TStatus; cdecl;external;
|
|
Procedure XProcessInternalConnection(_para1 : PDisplay;_para2 : longint); cdecl;external;
|
|
Function XAddConnectionWatch(_para1 : PDisplay;_para2 : TXConnectionWatchProc;_para3 : TXPointer) : TStatus; cdecl;external;
|
|
Procedure XRemoveConnectionWatch(_para1 : PDisplay;_para2 : TXConnectionWatchProc;_para3 : TXPointer); cdecl;external;
|
|
|
|
implementation
|
|
|
|
end.
|
|
{
|
|
$Log$
|
|
Revision 1.6 2000-05-22 08:21:05 sg
|
|
* Added pointer types for all events. (PXxxxEvent = ^TXxxxEvent)
|
|
|
|
Revision 1.5 2000/03/06 16:15:43 peter
|
|
* removed comment warnings
|
|
|
|
Revision 1.4 2000/03/01 09:16:13 sg
|
|
* Changed all occurences of $linklib C into $linklib c
|
|
|
|
Revision 1.3 2000/02/27 14:39:54 peter
|
|
* added explicit linklib c
|
|
|
|
Revision 1.2 2000/02/27 13:11:31 peter
|
|
* cleanup, removed warnings
|
|
* external decls moved from implementation to interface
|
|
|
|
} |