Unit mseguiintf

Description

Uses

Classes, Interfaces, Objects and Records

Functions and Procedures

Types

Constants

Variables

Description

Overview

Classes, Interfaces, Objects and Records

Name	Description
Record `x11internalwindowoptionsdty`
Record `x11internalwindowoptionsty`
Record `_XIM`
Record `_XIC`
Record `Visual`
Record `XWMHints`
Record `MwmHints`

Functions and Procedures

function gui_init: guierrorty;

function gui_deinit: guierrorty;

procedure gui_cancelshutdown;

procedure GUI_DEBUGBEGIN; export;

procedure GUI_DEBUGEND; export;

function gui_registergdi: guierrorty;

function gui_setmainthread: guierrorty;

function gui_sethighrestimer(const avalue: boolean): guierrorty;

function gui_grouphideminimizedwindows: boolean;

function gui_postevent(event: tmseevent): guierrorty;

function gui_settimer(us: longword): guierrorty;

procedure gui_disconnectmaineventqueue();

procedure gui_connectmaineventqueue();

function gui_addpollfd(var id: int32; const afd: int32; const aflags: pollflagsty; const acallback: pollcallbackty = nil; const adata: pointer = nil): guierrorty;

function gui_removepollfd(const id: int32): guierrorty;

function gui_setpollfdactive(const id: int32; const aactive: boolean): guierrorty;

function gui_hasevent: boolean;

function gui_getevent: tmseevent;

function gui_escapepressed: boolean;

procedure gui_resetescapepressed;

function gui_createwindow(const rect: rectty; var options: internalwindowoptionsty; var awindow: windowty): guierrorty;

function gui_destroywindow(var awindow: windowty): guierrorty;

function gui_getrootwindow(id: winidty = 0): winidty;

function gui_getparentwindow(const awindow: winidty): winidty;

function gui_reparentwindow(const child: winidty; const parent: winidty; const pos: pointty): guierrorty;

function gui_getchildren(const id: winidty; out children: winidarty): guierrorty;

function gui_showsysdock(var awindow: windowty): guierrorty;

function gui_hidesysdock(var awindow: windowty): guierrorty;

function gui_docktosyswindow(var child: windowty; const akind: syswindowty): guierrorty;

function gui_traymessage(var awindow: windowty; const message: msestring; out messageid: longword; const timeoutms: longword = 0): guierrorty;

function gui_canceltraymessage(var awindow: windowty; const messageid: longword): guierrorty;

function gui_settrayicon(var awindow: windowty; const icon,mask: pixmapty): guierrorty;

function gui_settrayhint(var awindow: windowty; const hint: msestring): guierrorty;

function gui_flushgdi(const synchronize: boolean = false): guierrorty;

function gui_showwindow(id: winidty): guierrorty;

function gui_hidewindow(id: winidty): guierrorty;

function gui_raisewindow(id: winidty; const topmost: boolean = false): guierrorty;

function gui_lowerwindow(id: winidty; const topmost: boolean = false): guierrorty;

function gui_stackunderwindow(id: winidty; predecessor: winidty): guierrorty;

function gui_stackoverwindow(id: winidty; predecessor: winidty): guierrorty;

function gui_canstackunder: boolean;

function gui_getzorder(const ids: winidarty; out zorders: integerarty): guierrorty;

function gui_getwindowrect(id: winidty; out rect: rectty): guierrorty;

function gui_getwindowpos(id: winidty; out pos: pointty): guierrorty;

function gui_getwindowsize(id: winidty): windowsizety;

function gui_getwindowdesktop(const id: winidty): integer;

function gui_windowvisible(id: winidty): boolean;

function gui_setwindowstate(id: winidty; size: windowsizety; visible: boolean): guierrorty;

function gui_setwindowcaption(id: winidty; const caption: msestring): guierrorty;

function gui_setwindowicon(id: winidty; const icon,mask: pixmapty): guierrorty;

function gui_setwindowopacity(id: winidty; const opacity: real): guierrorty;

function gui_setsizeconstraints(id: winidty; const min,max: sizety): guierrorty;

function gui_reposwindow(id: winidty; const rect: rectty): guierrorty;

function gui_getdecoratedwindowrect(id: winidty; out arect: rectty): guierrorty;

function gui_setdecoratedwindowrect(id: winidty; const rect: rectty; out clientrect: rectty): guierrorty;

function gui_setembeddedwindowrect(id: winidty; const rect: rectty): guierrorty;

function gui_setwindowfocus(id: winidty): guierrorty;

function gui_setimefocus(var awindow: windowty): guierrorty;

function gui_unsetimefocus(var awindow: windowty): guierrorty;

function gui_setappfocus(id: winidty): guierrorty;

function gui_minimizeapplication: guierrorty;

function gui_setwindowgroup(id: winidty; group: winidty): guierrorty;

function gui_settransientfor(var awindow: windowty; const transientfor: winidty): guierrorty;

function gui_movewindowrect(id: winidty; const dist: pointty; const rect: rectty): guierrorty;

function gui_windowatpos(const pos: pointty): winidty;

function gui_getscreenrect(const id: winidty): rectty;

function gui_getworkarea(id: winidty): rectty;

procedure gui_getppmm(id: winidty; out appmmwidth,appmmheight: flo64);

function gui_setapplicationicon(const icon,mask: pixmapty): guierrorty;

function gui_pidtowinid(const pids: procidarty): winidty;

function gui_setcursorshape(winid: winidty; shape: cursorshapety): guierrorty;

function gui_getpointerpos: pointty;

function gui_setpointerpos(const pos: pointty): guierrorty;

function gui_movepointer(const dist: pointty): guierrorty;

function gui_grabpointer(id: winidty): guierrorty;

function gui_ungrabpointer: guierrorty;

function gui_getpixel(const id: winidty; const pos: pointty; out pixel: pixelty): guierrorty;

function gui_rgbtopixel(rgb: longword): pixelty;

function gui_pixeltorgb(pixel: pixelty): longword;

function gui_graytopixel(gray: byte): pixelty;

function gui_pixeltogray(pixel: pixelty): byte;

function gui_initcolormap: guierrorty;

function gui_regiontorects(const aregion: regionty): rectarty;

function gui_getdefaultfontnames: defaultfontnamesty;

function gui_createpixmap(const size: sizety; winid: winidty = 0; kind: bitmapkindty = bmk_rgb; copyfrom: pixmapty = 0): pixmapty; overload;

function gui_freepixmap(pixmap: pixmapty): gdierrorty;

function gui_getpixmapinfo(var info: pixmapinfoty): gdierrorty;

function gui_createbitmapfromdata(const size: sizety; datapo: pbyte; msbitfirst: boolean = false; dwordaligned: boolean = false; bottomup: boolean = false): pixmapty;

function gui_pixmaptoimage(pixmap: pixmapty; out image: imagety; gchandle: longword): gdierrorty;

function gui_imagetopixmap(const image: imagety; out pixmap: pixmapty; gchandle: longword): gdierrorty;

function gui_allocimagemem(length: integer): plongwordaty;

procedure gui_freeimagemem(data: plongwordaty);

procedure gui_beep;

function gui_copytoclipboard(const value: msestring; const buffer: clipboardbufferty): guierrorty;

function gui_pastefromclipboard(out value: msestring; const buffer: clipboardbufferty): guierrorty;

function gui_canpastefromclipboard(const buffer: clipboardbufferty): boolean;

function gui_sysdnd(const action: sysdndactionty; const aintf: isysdnd; const arect: rectty; out aresult: boolean): guierrorty;

function gui_sysdndreaddata(var adata: string; const typeindex: integer): guierrorty;

function gui_sysdndreadtext(var atext: msestring; const typeindex: integer): guierrorty;

function gui_getgdifuncs: pgdifunctionaty;

function msedisplay: pdisplay;

function msevisual: pvisual;

function msedefaultscreen: pscreen;

function msedefaultscreenno: integer;

function XSetWMHints(Display: PDisplay; W: xid; WMHints: PXWMHints): cint; cdecl; external sXLib name 'XSetWMHints';

function XSetForeground(Display: PDisplay; GC: TGC; Foreground: culong): cint; cdecl; external sXLib name 'XSetForeground';

procedure XDrawImageString(Display: PDisplay; D: TDrawable; GC: TGC; X, Y: Integer; S: PChar; Len: Integer); cdecl; external sXLib name 'XDrawImageString';

procedure XDrawImageString16(Display: PDisplay; D: TDrawable; GC: TGC; X, Y: Integer; S: Pxchar2b; Len: Integer); cdecl; external sXLib name 'XDrawImageString16';

procedure XDrawString16(Display: PDisplay; D: TDrawable; GC: TGC; X, Y: Integer; S: Pxchar2b; Len: Integer); cdecl; external sXLib name 'XDrawString16';

function XOpenIM(Display: PDisplay; rdb: PXrmHashBucketRec; res_name: pchar; res_class: pchar): XIM; cdecl; external sXLib name 'XOpenIM';

function XCloseIM(IM: XIM): TStatus; cdecl; external sXLib name 'XCloseIM';

function XCreateIC(IM: XIM): XIC; cdecl; varargs; external sXLib name 'XCreateIC';

procedure XDestroyIC(IC: XIC); cdecl; external sXLib name 'XDestroyIC';

function XSetLocaleModifiers(modifier_list: pchar): pchar; cdecl; external sXLib name 'XSetLocaleModifiers';

function XSetICValues(IC: XIC): PChar; cdecl; varargs; external sXLib name 'XSetICValues';

function XSetIMValues(IC: XIM): PChar; cdecl; varargs; external sXLib name 'XSetIMValues';

function XGetICValues(IC: XIC): PChar; cdecl; varargs; external sXLib name 'XGetICValues';

procedure XSetICFocus(IC: XIC); cdecl; external sXLib name 'XSetICFocus';

procedure XUnsetICFocus(IC: XIC); cdecl; external sXLib name 'XUnsetICFocus';

function Xutf8LookupString(IC: XIC; Event: PXKeyPressedEvent; BufferReturn: Pchar; CharsBuffer: Longint; KeySymReturn: PKeySym; StatusReturn: PStatus): Longint; cdecl; external sXLib name 'Xutf8LookupString';

function XCreateImage(Display: PDisplay; Visual: msePVisual; Depth: longword; Format: Longint; Offset: Longint; Data: PChar; Width, Height: longword; BitmapPad: Longint; BytesPerLine: Longint): PXImage; cdecl; external sXLib name 'XCreateImage';

function Xutf8TextListToTextProperty(para1:PDisplay; para2:PPchar; para3: integer; para4: integer; para5: PXTextProperty): integer; cdecl; external sXLib name 'Xutf8TextListToTextProperty';

function Xutf8TextPropertyToTextList(para1:PDisplay; para2:PXTextProperty; para3:PPPchar; para4: pinteger): integer; cdecl; external sXlib name 'Xutf8TextPropertyToTextList';

Types

txevent = xevent;

syseventty = type txevent;

Bool = cint;

XID = type culong;

wchar_t = longword;

pwchar_t = ˆwchar_t;

patom = ˆatom;

atomarty = array of atom;

atomaty = array[0..0] of atom;

patomaty = ˆatomaty;

ulongarty = array of culong;

XIM = ˆ_XIM;

XIC = ˆ_XIC;

ppucs4char = ˆpucs4char;

dword = longword;

VisualID = culong;

msepvisual = ˆvisual;

PXWMHints = ˆXWMHints;

Constants

XK_BackSpace = $FF08;

XK_Tab = $FF09;

XK_Linefeed = $FF0A;

XK_Clear = $FF0B;

XK_Return = $FF0D;

XK_Pause = $FF13;

XK_Scroll_Lock = $FF14;

XK_Sys_Req = $FF15;

XK_Escape = $FF1B;

XK_Delete = $FFFF;

XK_Home = $FF50;

XK_Left = $FF51;

XK_Up = $FF52;

XK_Right = $FF53;

XK_Down = $FF54;

XK_Prior = $FF55;

XK_Page_Up = $FF55;

XK_Next = $FF56;

XK_Page_Down = $FF56;

XK_End = $FF57;

XK_Begin = $FF58;

XK_Select = $FF60;

XK_Print = $FF61;

XK_Execute = $FF62;

XK_Insert = $FF63;

XK_Undo = $FF65;

XK_Redo = $FF66;

XK_Menu = $FF67;

XK_Find = $FF68;

XK_Cancel = $FF69;

XK_Help = $FF6A;

XK_Break = $FF6B;

XK_Mode_switch = $FF7E;

XK_script_switch = $FF7E;

XK_Num_Lock = $FF7F;

XK_KP_Space = $FF80;

XK_KP_Tab = $FF89;

XK_KP_Enter = $FF8D;

XK_KP_F1 = $FF91;

XK_KP_F2 = $FF92;

XK_KP_F3 = $FF93;

XK_KP_F4 = $FF94;

XK_KP_Home = $FF95;

XK_KP_Left = $FF96;

XK_KP_Up = $FF97;

XK_KP_Right = $FF98;

XK_KP_Down = $FF99;

XK_KP_Prior = $FF9A;

XK_KP_Page_Up = $FF9A;

XK_KP_Next = $FF9B;

XK_KP_Page_Down = $FF9B;

XK_KP_End = $FF9C;

XK_KP_Begin = $FF9D;

XK_KP_Insert = $FF9E;

XK_KP_Delete = $FF9F;

XK_KP_Equal = $FFBD;

XK_KP_Multiply = $FFAA;

XK_KP_Add = $FFAB;

XK_KP_Separator = $FFAC;

XK_KP_Subtract = $FFAD;

XK_KP_Decimal = $FFAE;

XK_KP_Divide = $FFAF;

XK_KP_0 = $FFB0;

XK_KP_1 = $FFB1;

XK_KP_2 = $FFB2;

XK_KP_3 = $FFB3;

XK_KP_4 = $FFB4;

XK_KP_5 = $FFB5;

XK_KP_6 = $FFB6;

XK_KP_7 = $FFB7;

XK_KP_8 = $FFB8;

XK_KP_9 = $FFB9;

XK_F1 = $FFBE;

XK_F35 = $FFE0;

XK_Shift_L = $FFE1;

XK_Shift_R = $FFE2;

XK_Control_L = $FFE3;

XK_Control_R = $FFE4;

XK_Caps_Lock = $FFE5;

XK_Shift_Lock = $FFE6;

XK_Meta_L = $FFE7;

XK_Meta_R = $FFE8;

XK_Alt_L = $FFE9;

XK_Alt_R = $FFEA;

XK_Super_L = $FFEB;

XK_Super_R = $FFEC;

XK_Hyper_L = $FFED;

XK_Hyper_R = $FFEE;

XK_ISO_Lock = $FE01;

XK_ISO_Level2_Latch = $FE02;

XK_ISO_Level3_Shift = $FE03;

XK_ISO_Level3_Latch = $FE04;

XK_ISO_Level3_Lock = $FE05;

XK_ISO_Level5_Shift = $FE11;

XK_ISO_Level5_Latch = $FE12;

XK_ISO_Level5_Lock = $FE13;

XK_ISO_Group_Shift = $FF7E;

XK_ISO_Group_Latch = $FE06;

XK_ISO_Group_Lock = $FE07;

XK_ISO_Next_Group = $FE08;

XK_ISO_Next_Group_Lock = $FE09;

XK_ISO_Prev_Group = $FE0A;

XK_ISO_Prev_Group_Lock = $FE0B;

XK_ISO_First_Group = $FE0C;

XK_ISO_First_Group_Lock = $FE0D;

XK_ISO_Last_Group = $FE0E;

XK_ISO_Last_Group_Lock = $FE0F;

XK_ISO_Left_Tab = $FE20;

XK_ISO_Move_Line_Up = $FE21;

XK_ISO_Move_Line_Down = $FE22;

XK_ISO_Partial_Line_Up = $FE23;

XK_ISO_Partial_Line_Down = $FE24;

XK_ISO_Partial_Space_Left = $FE25;

XK_ISO_Partial_Space_Right = $FE26;

XK_ISO_Set_Margin_Left = $FE27;

XK_ISO_Set_Margin_Right = $FE28;

XK_ISO_Release_Margin_Left = $FE29;

XK_ISO_Release_Margin_Right = $FE2A;

XK_ISO_Release_Both_Margins = $FE2B;

XK_ISO_Fast_Cursor_Left = $FE2C;

XK_ISO_Fast_Cursor_Right = $FE2D;

XK_ISO_Fast_Cursor_Up = $FE2E;

XK_ISO_Fast_Cursor_Down = $FE2F;

XK_ISO_Continuous_Underline = $FE30;

XK_ISO_Discontinuous_Underline = $FE31;

XK_ISO_Emphasize = $FE32;

XK_ISO_Center_Object = $FE33;

XK_ISO_Enter = $FE34;

XC_num_glyphs = 154;

XC_X_cursor = 0;

XC_arrow = 2;

XC_based_arrow_down = 4;

XC_based_arrow_up = 6;

XC_boat = 8;

XC_bogosity = 10;

XC_bottom_left_corner = 12;

XC_bottom_right_corner = 14;

XC_bottom_side = 16;

XC_bottom_tee = 18;

XC_box_spiral = 20;

XC_center_ptr = 22;

XC_circle = 24;

XC_clock = 26;

XC_coffee_mug = 28;

XC_cross = 30;

XC_cross_reverse = 32;

XC_crosshair = 34;

XC_diamond_cross = 36;

XC_dot = 38;

XC_dotbox = 40;

XC_double_arrow = 42;

XC_draft_large = 44;

XC_draft_small = 46;

XC_draped_box = 48;

XC_exchange = 50;

XC_fleur = 52;

XC_gobbler = 54;

XC_gumby = 56;

XC_hand1 = 58;

XC_hand2 = 60;

XC_heart = 62;

XC_icon = 64;

XC_iron_cross = 66;

XC_left_ptr = 68;

XC_left_side = 70;

XC_left_tee = 72;

XC_leftbutton = 74;

XC_ll_angle = 76;

XC_lr_angle = 78;

XC_man = 80;

XC_middlebutton = 82;

XC_mouse = 84;

XC_pencil = 86;

XC_pirate = 88;

XC_plus = 90;

XC_question_arrow = 92;

XC_right_ptr = 94;

XC_right_side = 96;

XC_right_tee = 98;

XC_rightbutton = 100;

XC_rtl_logo = 102;

XC_sailboat = 104;

XC_sb_down_arrow = 106;

XC_sb_h_double_arrow = 108;

XC_sb_left_arrow = 110;

XC_sb_right_arrow = 112;

XC_sb_up_arrow = 114;

XC_sb_v_double_arrow = 116;

XC_shuttle = 118;

XC_sizing = 120;

XC_spider = 122;

XC_spraycan = 124;

XC_star = 126;

XC_target = 128;

XC_tcross = 130;

XC_top_left_arrow = 132;

XC_top_left_corner = 134;

XC_top_right_corner = 136;

XC_top_side = 138;

XC_top_tee = 140;

XC_trek = 142;

XC_ul_angle = 144;

XC_umbrella = 146;

XC_ur_angle = 148;

XC_watch = 150;

XC_xterm = 152;

sXlib = Xlibmodulename;

pixel0 = $000000;

pixel1 = $ffffff;

InputHint = 1 shl 0;

StateHint = 1 shl 1;

IconPixmapHint = 1 shl 2;

IconWindowHint = 1 shl 3;

IconPositionHint = 1 shl 4;

IconMaskHint = 1 shl 5;

WindowGroupHint = 1 shl 6;

AllHints = (((((InputHint or StateHint) or IconPixmapHint) or IconWindowHint)
    or IconPositionHint) or IconMaskHint) or WindowGroupHint;

XUrgencyHint = 1 shl 8;

MWM_HINTS_FUNCTIONS = 1 shl 0;

MWM_HINTS_DECORATIONS = 1 shl 1;

MWM_FUNC_ALL = 1 shl 0;

MWM_FUNC_RESIZE = 1 shl 1;

MWM_FUNC_MOVE = 1 shl 2;

MWM_FUNC_MINIMIZE = 1 shl 3;

MWM_FUNC_MAXIMIZE = 1 shl 4;

MWM_FUNC_CLOSE = 1 shl 5;

Description

Functions and Procedures

function gui_init: guierrorty;

function gui_deinit: guierrorty;

procedure gui_cancelshutdown;

procedure GUI_DEBUGBEGIN; export;

procedure GUI_DEBUGEND; export;

function gui_registergdi: guierrorty;

function gui_setmainthread: guierrorty;

function gui_sethighrestimer(const avalue: boolean): guierrorty;

function gui_grouphideminimizedwindows: boolean;

function gui_postevent(event: tmseevent): guierrorty;

function gui_settimer(us: longword): guierrorty;

procedure gui_disconnectmaineventqueue();

procedure gui_connectmaineventqueue();

function gui_addpollfd(var id: int32; const afd: int32; const aflags: pollflagsty; const acallback: pollcallbackty = nil; const adata: pointer = nil): guierrorty;

function gui_removepollfd(const id: int32): guierrorty;

function gui_setpollfdactive(const id: int32; const aactive: boolean): guierrorty;

function gui_hasevent: boolean;

function gui_getevent: tmseevent;

function gui_escapepressed: boolean;

procedure gui_resetescapepressed;

function gui_createwindow(const rect: rectty; var options: internalwindowoptionsty; var awindow: windowty): guierrorty;

function gui_destroywindow(var awindow: windowty): guierrorty;

function gui_getrootwindow(id: winidty = 0): winidty;

function gui_getparentwindow(const awindow: winidty): winidty;

function gui_reparentwindow(const child: winidty; const parent: winidty; const pos: pointty): guierrorty;

function gui_getchildren(const id: winidty; out children: winidarty): guierrorty;

function gui_showsysdock(var awindow: windowty): guierrorty;

function gui_hidesysdock(var awindow: windowty): guierrorty;

function gui_docktosyswindow(var child: windowty; const akind: syswindowty): guierrorty;

function gui_traymessage(var awindow: windowty; const message: msestring; out messageid: longword; const timeoutms: longword = 0): guierrorty;