It sounds like xforms picked a visual that's different
from the root window. Since the trailblazer window
is not available in the binding, I would suggest you
try to force the visual to be the same as the root window
and use the root window as the window parameter.
--- Bernhard Rumpler <rumpler@eunet.at> wrote:
> # To subscribers of the xforms list from Bernhard Rumpler
> <rumpler@eunet.at> :
>
> hi,
>
> is it possible to load a number of pixmaps (fl_read_pixmapfile())
> before
> creating a form?
>
> my problem could be that I do not know which window I can use for the
> parameter Window win in fl_read_pixmapfile(), but I'm not sure
> whether
> this is really the cause or not!
> fl_default_window() described in the manual doesn't exist in the
> X11/Ada-Binding I use...
>
> I tried the following:
>
> win1: X11.Window;
> pix1: X11.Pixmap;
> col: constant Forms.FL_COLOR := Forms.FL_RED;
> x,y: aliased X11.Int := 1;
> pix: aliased X11.pixmap;
>
> win1 := Forms.fl_state_c0(integer(Forms.fl_get_vclass)).trailblazer;
> pix1 := Forms.fl_read_pixmapfile( win1, mypath, mywidth'ACCESS,
> myheight'ACCESS, mypix'ACCESS, x'ACCESS, y'ACCESS, col);
>
> it works when I set the form_icon to pix1 (with fl_set_form_icon()),
> but
> but causes a STORAGE_ERROR (segfault) when I try to set a pixmap
> within
> a form to pix1 (with fl_set_pixmap_pixmap()).
>
> thanks,
> Bernhard
> _________________________________________________
> To unsubscribe, send the message "unsubscribe" to
> xforms-request@bob.usuhs.mil or see
> http://bob.usuhs.mil/mailserv/xforms.html
> XForms Home Page: http://bragg.phys.uwm.edu/xforms
> List Archive: http://bob.usuhs.mil/mailserv/list-archives/
>
>
=====
__________________________________________________
Do You Yahoo!?
Bid and sell for free at http://auctions.yahoo.com
_________________________________________________
To unsubscribe, send the message "unsubscribe" to
xforms-request@bob.usuhs.mil or see
http://bob.usuhs.mil/mailserv/xforms.html
XForms Home Page: http://bragg.phys.uwm.edu/xforms
List Archive: http://bob.usuhs.mil/mailserv/list-archives/