Dr. T.C. Zhao wrote:
>
> xforms V0.84 is now available for testing for the following platforms:
>
> linux/i386 a.out & ELF
> Sun SunOS 4.1 and Solaris 2.4
> FreeBSD 3.0-current
>
> SGI and HP versions will be made available shortly.
>
> I'd appreciate it if you download and test this version. As
> always, feedbacks are welcome.
>
Ok, here I am again with more feedback :-)
I've done the download of the linux-ELF xforms V0.84 and
tested it under linux kernel version 2.0.25, XFree86/S3, and
the FVWM95 V2.42a.
Here's a general browser problem. Try to run the example program.
------->snip<----------------------------------------------------
/*
** A Xforms Bug?
**
** This program has a HOLD_BROWSER and a checkbutton
** which enables it.
**
** Problem:
** 1. The browser will not be correct redrawn after
** enabling resp. disabling it.
** 2. The browser is not really disabled (try to
** disabled it and then to select a line!)
** 3. Try to drag the mouse down inside the browser.
** When leaving the browser area, the browser
** doesn't scroll! Older versions did it and
** also the FDESIGN of the current version does
** this!
**
** Linux 2.0.15, XF86_S3, FVWM95, xforms 0.84-ELF
**
** Christian Lorenz, 100.5078@germanynet.de
** 15.12.1996
*/
#include <stdlib.h>
#include <forms.h>
int main(int argc,char *argv[])
{
FL_FORM *Bug;
FL_OBJECT *obj,*BugQuit,*BugEnable,*BugBrowser;
FL_COLOR lcol,col1,col2;
int n;
/*
** init the form
*/
fl_initialize(&argc,argv,argv[0], 0, 0);
Bug = fl_bgn_form(FL_NO_BOX,290,170);
fl_add_box(FL_UP_BOX,0,0,290,170,"");
BugBrowser = fl_add_browser(FL_HOLD_BROWSER,10,10,150,150,"");
BugEnable = fl_add_checkbutton(FL_PUSH_BUTTON,170,10,100,30,"Enable
Browser");
BugQuit = fl_add_button(FL_NORMAL_BUTTON,170,130,110,30,"Quit");
fl_end_form();
/*
** fill the browser
*/
for (n = 0;n < 30;n++) {
char line[100];
sprintf(line,"Line #%d",n);
fl_add_browser_line(BugBrowser,line);
}
/*
** get the browsers colors
*/
lcol = BugBrowser->lcol;
col1 = BugBrowser->col1;
col2 = BugBrowser->col2;
fl_set_button(BugEnable,1);
/*
** show the form
*/
fl_show_form(Bug,FL_PLACE_CENTER,FL_FULLBORDER,"A Xforms-Bug?");
for (;;) {
obj = fl_do_forms();
if (obj == BugQuit) {
/*
** bye
*/
break;
}
else if (obj == BugEnable) {
if (fl_get_button(obj)) {
/*
** reactivate the browser
*/
fl_set_object_lcol(BugBrowser,lcol);
fl_set_object_color(BugBrowser,col1,col2);
fl_activate_object(BugBrowser);
}
else {
/*
** deactivate the browser
*/
fl_set_object_lcol(BugBrowser,FL_INACTIVE);
fl_set_object_color(BugBrowser,FL_COL1,FL_INACTIVE);
fl_deactivate_object(BugBrowser);
}
}
}
fl_hide_form(Bug);
return 0;
}/**/
To unsubscribe, send the message "unsubscribe" to
xforms-request@bob.usuf2.usuhs.mil or see
http://bob.usuf2.usuhs.mil/mailserv/xforms.html