The attached patch adds the Xinerama extensions to the X11 package
Colin
diff -uNr fpc/packages/extra/x11/Makefile.fpc fpc.w/packages/extra/x11/Makefile.fpc --- fpc/packages/extra/x11/Makefile.fpc 2004-10-10 22:21:51.000000000 +0100 +++ fpc.w/packages/extra/x11/Makefile.fpc 2004-11-13 12:39:46.000000000 +0000 @@ -7,7 +7,7 @@ version=1.9.4 [target] -units=x xlib xutil xresource xcms xshm xrender keysym xi xkb xkblib xatom +units=x xlib xutil xresource xcms xshm xrender keysym xi xkb xkblib xatom xinerama [require] libc=y diff -uNr fpc/packages/extra/x11/xinerama.pp fpc.w/packages/extra/x11/xinerama.pp --- fpc/packages/extra/x11/xinerama.pp 1970-01-01 01:00:00.000000000 +0100 +++ fpc.w/packages/extra/x11/xinerama.pp 2004-11-13 13:21:06.498009242 +0000 @@ -0,0 +1,26 @@ +unit xinerama; +interface +uses xlib; +{ Converted from X11/Xinerama.h } + +{$PACKRECORDS C} + +type + + PXineramaScreenInfo = ^TXineramaScreenInfo; + TXineramaScreenInfo = record + screen_number : longint; + x_org : smallint; + y_org : smallint; + width : smallint; + height : smallint; + end; + +function XineramaQueryExtension(dpy:PDisplay; event_base:Plongint; error_base:Plongint):TBool;cdecl;external 'Xinerama'; +function XineramaQueryVersion(dpy:PDisplay; major:Plongint; minor:Plongint):TStatus;cdecl;external 'Xinerama'; +function XineramaIsActive(dpy:PDisplay):TBool;cdecl;external 'Xinerama'; +function XineramaQueryScreens(dpy:PDisplay; number:Plongint):PXineramaScreenInfo;cdecl;external 'Xinerama'; + +implementation + +end.
_______________________________________________ fpc-devel maillist - [EMAIL PROTECTED] http://lists.freepascal.org/mailman/listinfo/fpc-devel