Skip to content

Commit f2eda35

Browse files
committed
Added pre-try of mxcb.pas. (10)
1 parent f1309d6 commit f2eda35

File tree

1 file changed

+1
-5
lines changed

1 file changed

+1
-5
lines changed

lib/common/kernel/linux/mxcb.pas

Lines changed: 1 addition & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1574,9 +1574,7 @@ procedure XDrawImageString(Display: PDisplay; D: TDrawable; GC: TGC; X, Y: integ
15741574
procedure XDrawImageString16(Display: PDisplay; D: TDrawable; GC: TGC; X, Y: integer; S: Pxchar2b; Len: integer); cdecl;
15751575
function XOpenIM(Display: PDisplay; rdb: PXrmHashBucketRec; res_name: PChar; res_class: PChar): XIM; cdecl;
15761576
function XCloseIM(IM: XIM): TStatus; cdecl;
1577-
15781577
function XCreateIC(IM: XIM; inputstyle: PChar; status: longint; pt: Pointer): XIC; cdecl;
1579-
15801578
procedure XDestroyIC(IC: XIC); cdecl;
15811579
function XSetLocaleModifiers(modifier_list: PChar): PChar; cdecl;
15821580

@@ -1585,14 +1583,13 @@ function XSetICValues(IC: XIC; nreset: PChar; impreserv: PChar; pnt: Pointer): P
15851583
function XSetIMValues(IC: XIM; destroycb: PChar; ximcb: Pointer; pt: Pointer): PChar; cdecl;
15861584

15871585
function XGetICValues(IC: XIC; filterev: PChar; icmask: Pointer; pnt: Pointer): PChar; cdecl;
1588-
15891586
procedure XSetICFocus(IC: XIC); cdecl;
15901587
procedure XUnsetICFocus(IC: XIC); cdecl;
15911588
function Xutf8LookupString(IC: XIC; Event: PXKeyPressedEvent; BufferReturn: PChar; CharsBuffer: longint; KeySymReturn: PKeySym; StatusReturn: PStatus): longint; cdecl;
15921589
function Xutf8TextListToTextProperty(para1: PDisplay; para2: PPchar; para3: integer; para4: integer{TXICCEncodingStyle}; para5: PXTextProperty): integer; cdecl;
15931590
function Xutf8TextPropertyToTextList(para1: PDisplay; para2: PXTextProperty; para3: PPPchar; para4: pinteger): integer; cdecl;
15941591

1595-
// Todo from libXrandr
1592+
// Todo from libXrandr
15961593
function XRRQueryExtension(dpy: pDisplay; event_base_return: pcint; error_base_return: pcint): tBool; cdecl;
15971594
function XRRGetScreenResources(dpy: pDisplay; window: Window): pXRRScreenResources; cdecl;
15981595
procedure XRRFreeScreenResources(resources: pXRRScreenResources); cdecl;
@@ -1819,7 +1816,6 @@ function XCreateWindow(display: PDisplay; parent: Window; x, y: cint; Width, Hei
18191816
wid: xcb_window_t;
18201817
value_list: array[0..3] of cuint32;
18211818
begin
1822-
writeln('XCreateWindow');
18231819
wid := cuint(xcb_generate_id(display));
18241820
value_list[0] := attributes^.background_pixel;
18251821
value_list[1] := attributes^.event_mask;

0 commit comments

Comments
 (0)