Cross Reference: /ast/src/lib/libtk/generic/tkFrame.c

Lines Matching defs:framePtr
154 			    Frame *framePtr, int argc, char **argv,
243     Frame *framePtr;
357     framePtr = (Frame *) ckalloc(sizeof(Frame));
358     framePtr->tkwin = new;
359     framePtr->display = Tk_Display(new);
360     framePtr->interp = interp;
361     framePtr->widgetCmd = Tcl_CreateCommand(interp,
363 	    (ClientData) framePtr, FrameCmdDeletedProc);
364     framePtr->className = NULL;
365     framePtr->mask = (toplevel) ? TOPLEVEL : FRAME;
366     framePtr->screenName = NULL;
367     framePtr->visualName = NULL;
368     framePtr->colormapName = NULL;
369     framePtr->colormap = colormap;
370     framePtr->border = NULL;
371     framePtr->borderWidth = 0;
372     framePtr->relief = TK_RELIEF_FLAT;
373     framePtr->highlightWidth = 0;
374     framePtr->highlightBgColorPtr = NULL;
375     framePtr->highlightColorPtr = NULL;
376     framePtr->width = 0;
377     framePtr->height = 0;
378     framePtr->cursor = None;
379     framePtr->takeFocus = NULL;
380     framePtr->flags = 0;
382 	    FrameEventProc, (ClientData) framePtr);
383     if (ConfigureFrame(interp, framePtr, argc-2, argv+2, 0) != TCL_OK) {
387 	Tcl_DoWhenIdle(MapFrame, (ClientData) framePtr);
425     register Frame *framePtr = (Frame *) clientData;
435     Tcl_Preserve((ClientData) framePtr);
447 	result = Tk_ConfigureValue(interp, framePtr->tkwin, configSpecs,
448 		(char *) framePtr, argv[2], framePtr->mask);
452 	    result = Tk_ConfigureInfo(interp, framePtr->tkwin, configSpecs,
453 		    (char *) framePtr, (char *) NULL, framePtr->mask);
455 	    result = Tk_ConfigureInfo(interp, framePtr->tkwin, configSpecs,
456 		    (char *) framePtr, argv[2], framePtr->mask);
471 			|| ((c == 'c') && (framePtr->mask == TOPLEVEL)
473 			|| ((c == 's') && (framePtr->mask == TOPLEVEL)
475 			|| ((c == 'v') && (framePtr->mask == TOPLEVEL)
483 	    result = ConfigureFrame(interp, framePtr, argc-2, argv+2,
493     Tcl_Release((ClientData) framePtr);
520     register Frame *framePtr = (Frame *) memPtr;
522     Tk_FreeOptions(configSpecs, (char *) framePtr, framePtr->display,
523 	    framePtr->mask);
524     if (framePtr->colormap != None) {
525 	Tk_FreeColormap(framePtr->display, framePtr->colormap);
527     ckfree((char *) framePtr);
546  *	etc. get set for framePtr;  old resources get freed, if there
553 ConfigureFrame(interp, framePtr, argc, argv, flags)
555     register Frame *framePtr;	/* Information about widget;  may or may
561     if (Tk_ConfigureWidget(interp, framePtr->tkwin, configSpecs,
562 	    argc, argv, (char *) framePtr, flags | framePtr->mask) != TCL_OK) {
566     if (framePtr->border != NULL) {
567 	Tk_SetBackgroundFromBorder(framePtr->tkwin, framePtr->border);
569     if (framePtr->highlightWidth < 0) {
570 	framePtr->highlightWidth = 0;
572     Tk_SetInternalBorder(framePtr->tkwin,
573 	    framePtr->borderWidth + framePtr->highlightWidth);
574     if ((framePtr->width > 0) || (framePtr->height > 0)) {
575 	Tk_GeometryRequest(framePtr->tkwin, framePtr->width,
576 		framePtr->height);
579     if (Tk_IsMapped(framePtr->tkwin)) {
580 	if (!(framePtr->flags & REDRAW_PENDING)) {
581 	    Tcl_DoWhenIdle(DisplayFrame, (ClientData) framePtr);
583 	framePtr->flags |= REDRAW_PENDING;
610     register Frame *framePtr = (Frame *) clientData;
611     register Tk_Window tkwin = framePtr->tkwin;
614     framePtr->flags &= ~REDRAW_PENDING;
615     if ((framePtr->tkwin == NULL) || !Tk_IsMapped(tkwin)) {
619     if (framePtr->border != NULL) {
621 		framePtr->border, framePtr->highlightWidth,
622 		framePtr->highlightWidth,
623 		Tk_Width(tkwin) - 2*framePtr->highlightWidth,
624 		Tk_Height(tkwin) - 2*framePtr->highlightWidth,
625 		framePtr->borderWidth, framePtr->relief);
627     if (framePtr->highlightWidth != 0) {
628 	if (framePtr->flags & GOT_FOCUS) {
629 	    gc = Tk_GCForColor(framePtr->highlightColorPtr,
632 	    gc = Tk_GCForColor(framePtr->highlightBgColorPtr,
635 	Tk_DrawFocusHighlight(tkwin, gc, framePtr->highlightWidth,
665     register Frame *framePtr = (Frame *) clientData;
671 	if (framePtr->tkwin != NULL) {
672 	    framePtr->tkwin = NULL;
673 	    Tcl_DeleteCommand(framePtr->interp,
674 		    Tcl_GetCommandName(framePtr->interp, framePtr->widgetCmd));
676 	if (framePtr->flags & REDRAW_PENDING) {
677 	    Tcl_CancelIdleCall(DisplayFrame, (ClientData) framePtr);
679 	Tcl_CancelIdleCall(MapFrame, (ClientData) framePtr);
680 	Tcl_EventuallyFree((ClientData) framePtr, DestroyFrame);
683 	    framePtr->flags |= GOT_FOCUS;
684 	    if (framePtr->highlightWidth > 0) {
690 	    framePtr->flags &= ~GOT_FOCUS;
691 	    if (framePtr->highlightWidth > 0) {
699     if ((framePtr->tkwin != NULL) && !(framePtr->flags & REDRAW_PENDING)) {
700 	Tcl_DoWhenIdle(DisplayFrame, (ClientData) framePtr);
701 	framePtr->flags |= REDRAW_PENDING;
728     Frame *framePtr = (Frame *) clientData;
729     Tk_Window tkwin = framePtr->tkwin;
739 	framePtr->tkwin = NULL;
766     Frame *framePtr = (Frame *) clientData;
775     Tcl_Preserve((ClientData) framePtr);
786 	if (framePtr->tkwin == NULL) {
787 	    Tcl_Release((ClientData) framePtr);
791     Tk_MapWindow(framePtr->tkwin);
792     Tcl_Release((ClientData) framePtr);