Re: XForms: folder.c demo source code needed

Steve Lamont (spl@szechuan.ucsd.edu)
Fri, 15 Jan 99 14:17:41 PST

Messages sorted by: [ date ][ thread ][ subject ][ author ]
Next message: T.C. Zhao: "Re: XForms: A note on Form Designer...."
Previous message: Don Melano: "XForms: folder.c demo source code needed"
Maybe in reply to: Don Melano: "XForms: folder.c demo source code needed"

# To subscribers of the xforms list from spl@szechuan.ucsd.edu (Steve Lamont) :

> The source code for folder.c was not included in my xforms distribution
> for Digital UNIX (OSF). Where can I locate it?

- - - folder.c - - -
/*
* Tabbed folder demo and tester
*
* This file is part of xforms package
* T.C. Zhao and M. Overmars
*
*/

#include "forms.h"
#include "folder_gui.h"
#include <stdlib.h>

/* callback routines */
void hide_show_cb(FL_OBJECT *ob, long data)
{
FD_mainform *fdui = ob->form->fdui;

(data ? fl_show_object:fl_hide_object)(fdui->folder);
}

void reshow_cb(FL_OBJECT *ob, long data)
{
fl_hide_form(ob->form);
fl_show_form(ob->form,FL_PLACE_CENTER,FL_FULLBORDER,"TabFolder");

}

void set_cb(FL_OBJECT *ob, long data)
{
FD_mainform *fdui = ob->form->fdui;
int n = fl_get_active_folder_number(fdui->folder);

fl_set_folder_bynumber(fdui->folder, (n%5)+1);
}

void deactivate_cb(FL_OBJECT *ob, long data)
{
FD_mainform *fdui = ob->form->fdui;

if(fdui->folder->active > 0)
{
fl_set_object_label(ob,"Activate");
fl_deactivate_object(fdui->folder);
}
else
{
fl_set_object_label(ob,"Deactivate");
fl_activate_object(fdui->folder);
}
}

void done_cb(FL_OBJECT *ob, long data)
{
#if 0
fl_hide_form(ob->form);
fl_free_form(ob->form);
if(fl_show_question("Do you want to quit ?",0))
exit(0);
fprintf(stderr,"will quit after 5 seconds\n");
fl_msleep(5000);
#endif
fl_finish();
exit(0);
}

static void make_folder(FL_OBJECT *);

int main(int argc, char *argv[])
{
FD_mainform *fd_mainform;

fl_set_border_width(-2);
fl_initialize(&argc, argv, 0, 0, 0);
fd_mainform = create_form_mainform();

make_folder(fd_mainform->folder);

/* show the first form */
fl_show_form(fd_mainform->mainform,FL_PLACE_CENTER,FL_FULLBORDER,"TabFolder");

while (fl_do_forms())
;
return 0;
}

static void make_folder(FL_OBJECT *folder)
{
FD_buttonform *fd_buttonform;
FD_staticform *fd_staticform;
FD_valuatorform *fd_valuatorform;
FD_choiceform *fd_choiceform;
FD_inputform *fd_inputform;
float x[6] = { 0, 1, 2, 3, 4, 5};
float y[6] = { 5.5, 4, 4.5, 3.8, 4, 5};
char *label[] = {"Mon","Tue","Wed", "Thur","Fri","Sat"};
int i;

fd_buttonform = create_form_buttonform();
fd_staticform = create_form_staticform();
fd_valuatorform = create_form_valuatorform();
fd_choiceform = create_form_choiceform();
fd_inputform = create_form_inputform();

/* fill-in form initialization code */
for ( i = 0; i < sizeof(y)/sizeof(y[0]); i++)
fl_add_chart_value(fd_staticform->chart,y[i],label[i],i+1);

fl_load_browser(fd_choiceform->browser,"01Readme");

#if 1
fl_addto_tabfolder(folder,"ButtonObj", fd_buttonform->buttonform);
fl_addto_tabfolder(folder,"StaticObj", fd_staticform->staticform);
fl_addto_tabfolder(folder,"ValuatorObj", fd_valuatorform->valuatorform);
fl_addto_tabfolder(folder,"ChoiceObj", fd_choiceform->choiceform);
fl_addto_tabfolder(folder,"InputObj", fd_inputform->inputform);
#endif
}

#include "folder_gui.c"
- - - folder_gui.c - - -
/* Form definition file generated with fdesign. */

#include "forms.h"
#include <stdlib.h>
#include "folder_gui.h"

FD_buttonform *create_form_buttonform(void)
{
FL_OBJECT *obj;
FD_buttonform *fdui = (FD_buttonform *) fl_calloc(1, sizeof(*fdui));

fdui->buttonform = fl_bgn_form(FL_NO_BOX, 430, 210);
obj = fl_add_box(FL_FLAT_BOX,0,0,430,210,"");
obj = fl_add_button(FL_NORMAL_BUTTON,30,151,80,30,"Button");
obj = fl_add_roundbutton(FL_PUSH_BUTTON,40,91,100,30,"RoundButton");
obj = fl_add_round3dbutton(FL_PUSH_BUTTON,135,151,110,30,"Round3DButton");
fl_set_object_color(obj,FL_COL1,FL_BLUE);
obj = fl_add_checkbutton(FL_PUSH_BUTTON,170,111,110,30,"CheckButton");
obj = fl_add_lightbutton(FL_PUSH_BUTTON,30,31,100,30,"LightButton");
obj = fl_add_pixmapbutton(FL_NORMAL_BUTTON,320,36,80,80,"PixmapButton");
fl_set_pixmapbutton_file(obj, "porsche.xpm");
obj = fl_add_button(FL_NORMAL_BUTTON,185,26,100,30,"Button");
fl_set_object_boxtype(obj,FL_ROUNDED3D_UPBOX);
obj = fl_add_lightbutton(FL_PUSH_BUTTON,290,146,100,30,"Button");
fl_set_object_boxtype(obj,FL_EMBOSSED_BOX);
obj = fl_add_button(FL_NORMAL_BUTTON,175,71,60,25,"Button");
fl_set_object_boxtype(obj,FL_SHADOW_BOX);
fl_set_object_color(obj,FL_COL1,FL_SLATEBLUE);
fl_end_form();

fdui->buttonform->fdui = fdui;