Widget CreateViewText ( Widget parent )
/************************************************************************
* CreateViewText *
* *
* Widget CreateViewText( parent ) *
* *
* Input parameters: *
* parent Widget *
* *
* Output parameters: *
* CreateViewText Widget *
* *
** *
***********************************************************************/
{
Arg args[20];
int n;
/*---------------------------------------------------------------------*/
/*
* Create a label widget to hold filename
*/
n = 0;
viewlabel_widget = CreateLabelWidget( parent, "filename",
"View File", args, n);
viewfile_widget = CreateScrolledText( parent, "viewfile");
n = 0;
XtSetArg(args[n], XmNautoUnmanage, False); n++;
viewerror_widget = XmCreateErrorDialog( parent, "viewerror",
args, n);
XtAddCallback( viewerror_widget, XmNokCallback,
(XtCallbackProc)unviewerror_callback, NULL);
XtUnmanageChild( XmMessageBoxGetChild( viewerror_widget,
XmDIALOG_HELP_BUTTON));
XtUnmanageChild( XmMessageBoxGetChild( viewerror_widget,
XmDIALOG_CANCEL_BUTTON));
return( viewfile_widget );
}
ProjectUI *create_project_ui(ExplorerUI *eui)
{
ProjectUI *ui;
Widget form, fr, rc, rc1;
form = CreateVContainer(eui->scrolled_window);
AddHelpCB(form, "doc/UsersGuide.html#project-properties");
ui = xmalloc(sizeof(ProjectUI));
ui->current_page_units = PAGE_UNITS_PP;
fr = CreateFrame(form, "Project description");
ui->description = CreateScrolledText(fr, "", 5);
AddTextActivateCB(ui->description, text_explorer_cb, eui);
fr = CreateFrame(form, "Page dimensions");
rc1 = CreateVContainer(fr);
rc = CreateHContainer(rc1);
ui->page_orient = CreatePaperOrientationChoice(rc, "Orientation:");
AddOptionChoiceCB(ui->page_orient, do_orient_toggle, ui);
AddOptionChoiceCB(ui->page_orient, oc_explorer_cb, eui);
ui->page_format = CreatePaperFormatChoice(rc, "Size:");
AddOptionChoiceCB(ui->page_format, do_format_toggle, ui);
AddOptionChoiceCB(ui->page_format, oc_explorer_cb, eui);
rc = CreateHContainer(rc1);
ui->page_x = CreateText2(rc, "Dimensions:", 7);
AddTextActivateCB(ui->page_x, text_explorer_cb, eui);
ui->page_y = CreateText2(rc, "x ", 7);
AddTextActivateCB(ui->page_y, text_explorer_cb, eui);
ui->page_size_unit = CreateOptionChoiceVA(rc, " ",
"pp", PAGE_UNITS_PP,
"in", PAGE_UNITS_IN,
"cm", PAGE_UNITS_CM,
NULL);
SetOptionChoice(ui->page_size_unit, ui->current_page_units);
AddOptionChoiceCB(ui->page_size_unit, do_units_toggle, ui);
fr = CreateFrame(form, "Page background");
FormAddVChild(form, fr);
rc = CreateHContainer(fr);
ui->bg_color = CreateColorChoice(rc, "Color:");
AddOptionChoiceCB(ui->bg_color, oc_explorer_cb, eui);
ui->bg_fill = CreateToggleButton(rc, "Fill");
AddToggleButtonCB(ui->bg_fill, tb_explorer_cb, eui);
fr = CreateFrame(form, "Scaling factors");
FormAddVChild(form, fr);
rc = CreateVContainer(fr);
ui->fsize_scale = CreateSpinChoice(rc, "Font size:", 5,
SPIN_TYPE_FLOAT, 0.0, 1.0, 0.005);
AddSpinChoiceCB(ui->fsize_scale, sp_explorer_cb, eui);
ui->lwidth_scale = CreateSpinChoice(rc, "Line width:", 6,
SPIN_TYPE_FLOAT, 0.0, 1.0, 0.0005);
AddSpinChoiceCB(ui->lwidth_scale, sp_explorer_cb, eui);
fr = CreateFrame(form, "Data & Dates");
rc1 = CreateVContainer(fr);
ui->prec = CreateSpinChoice(rc1, "Data precision:", 3,
SPIN_TYPE_INT, DATA_PREC_MIN, DATA_PREC_MAX, 1);
AddSpinChoiceCB(ui->prec, sp_explorer_cb, eui);
ui->refdate = CreateText2(rc1, "Reference date:", 20);
AddTextActivateCB(ui->refdate, text_explorer_cb, eui);
rc = CreateHContainer(rc1);
ui->two_digits_years = CreateToggleButton(rc, "Two-digit year span");
AddToggleButtonCB(ui->two_digits_years, tb_explorer_cb, eui);
ui->wrap_year = CreateText2(rc, "Wrap year:", 4);
AddTextActivateCB(ui->wrap_year, text_explorer_cb, eui);
AddToggleButtonCB(ui->two_digits_years, wrap_year_cb, ui->wrap_year);
ui->top = form;
return ui;
}
