This is mibFrame.c in view mode; [Download] [Up]
#include "mibload.h" #include "mibwidgets.h" extern Display *dpy; extern GC mib_gc; /* Code for Frames */ /*****************************************************************************/ mib_Widget *mib_create_Frame(mib_Widget *parent, char *name, char *frame_type, int posx, int posy, int width, int height, int mib_fill) { mib_Widget *temp; mib_Frame *myres; Arg args[20]; int n; /* create the new widget and add it to the tree */ temp = mib_new_mib_Widget(); if (mib_fill == WDEFAULT) mib_add_backward(temp, parent); else mib_add_mib_Widget(temp, parent); myres = (mib_Frame *)malloc(sizeof(mib_Frame)); /* initialize public resources */ if (mib_fill == WDEFAULT) { temp->name = (char *)malloc(strlen(name)+1); strcpy(temp->name,name); } temp->mib_class = (char *)malloc(6); sprintf(temp->mib_class,"Frame"); temp->mib_class_num = MIB_FRAME; temp->width = width; temp->height = height; temp->topOffset = posy; temp->leftOffset = posx; temp->bottomOffset = 0; temp->rightOffset = 0; temp->topAttachment = 1; temp->leftAttachment = 1; temp->bottomAttachment = 0; temp->rightAttachment = 0; temp->mib_allowresize = 1; /* initialize private resources */ temp->myres = (void *)myres; myres->shadowtype = 0; /* create Xt widget */ n = 0; if (mib_fill == WDEFAULT) { XtSetArg (args[n], XmNleftAttachment, XmATTACH_FORM); n++; XtSetArg (args[n], XmNleftOffset, posx);n++; XtSetArg (args[n], XmNtopAttachment, XmATTACH_FORM); n++; XtSetArg (args[n], XmNtopOffset, posy);n++; XtSetArg (args[n], XmNwidth, width); n++; XtSetArg (args[n], XmNheight, height); n++; } XtSetArg (args[n], XmNrubberPositioning, False); n++; if (mib_fill == WDEFAULT) if (!strcmp("InFrame",frame_type)) { XtSetArg (args[n], XmNshadowType, XmSHADOW_IN); n++; } else if (!strcmp("OutFrame",frame_type)) { XtSetArg (args[n], XmNshadowType, XmSHADOW_OUT); n++; myres->shadowtype = 1; } else if (!strcmp("EtchedInFrame",frame_type)) { XtSetArg (args[n], XmNshadowType, XmSHADOW_ETCHED_IN); n++; myres->shadowtype = 2; } else if (!strcmp("EtchedOutFrame",frame_type)) { XtSetArg (args[n], XmNshadowType, XmSHADOW_ETCHED_OUT); n++; myres->shadowtype = 3; } temp->me = XtCreateManagedWidget(name, xmFrameWidgetClass, temp->parent->me, args, n); if (mib_fill == WEDIT || mib_fill == WDEFAULT) { mib_apply_eventhandlers(temp->me, temp); } return temp; } void mib_delete_Frame(mib_Widget *this) { mib_Frame *temp = (mib_Frame *)this->myres; free(temp); } void mib_save_Frame(mib_Widget *this, FILE *fout) { mib_Frame *temp = (mib_Frame *)this->myres; fprintf(fout,"shadowtype: %d\\n\\\n", temp->shadowtype); } int mib_load_Frame(mib_Widget *this, mib_Buffer *fin) { mib_Frame *myres; unsigned char *label_text; char res[MI_MAXSTRLEN]; char val[MI_MAXSTRLEN]; Arg args[5]; int n; myres = (mib_Frame *)this->myres; if (!mib_read_line(fin, res, val)) return 0; if (!strcmp(res,"shadowtype")) { sscanf(val,"%d",&(myres->shadowtype)); n = 0; switch (myres->shadowtype) { case 0: XtSetArg (args[n], XmNshadowType, XmSHADOW_IN); n++; break; case 1: XtSetArg (args[n], XmNshadowType, XmSHADOW_OUT); n++; break; case 2: XtSetArg (args[n], XmNshadowType, XmSHADOW_ETCHED_IN); n++; break; case 3: XtSetArg (args[n], XmNshadowType, XmSHADOW_ETCHED_OUT); n++; break; default: break; } XtSetValues(this->me, args, n); } else return 0; if (!mib_read_line(fin, res, val)) return 0; if (strcmp(res,"EndWidget")) return 0; return 1; }
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.