DataMuseum.dk

top - metrics - download

    Length: 1245 (0x4dd)
    Types: TextFile
    Names: »vpanetest.c«

└─⟦a0efdde77⟧ Bits:30001252 EUUGD11 Tape, 1987 Spring Conference Helsinki
    └─⟦526ad3590⟧ »EUUGD11/gnu-31mar87/X.V10.R4.tar.Z« 
        └─⟦2109abc41⟧ 
            └─⟦this⟧ »./X.V10R4/Toolkit/DECToolkit/examples/vpanetest.c« 

TextFile

/* Example program of vertically paned windows */

#include <stdio.h>
#include <X/Xlib.h>
#include "Toolkit.h"

#define NUMPANES 5

DoIt (parent, window, request, requestBox, replyBox)
Window parent, window;
enum TGeometryRequest request;
WindowBox *requestBox, *replyBox;
{
    *replyBox = *requestBox;
    XChangeWindow (window, requestBox->w, requestBox->h);
    return REQUESTYES;
}

main()
{
    int     i;
    XEvent  event;
    Window  windowframe,
            wpane[NUMPANES];
    Targ    args[10];

    if(XOpenDisplay("") == FALSE)
	printf("Error opening display\n");

/* Make the frame for the tiled window */

    windowframe = XCreateWindow(RootWindow, 300, 100, 100, 400, 3,
                                BlackPixmap, WhitePixmap);

    TSetGeometryRequest(windowframe, DoIt);
    TMakeVWindowFrame(windowframe);

/* Make the tiled panels (Uniform size for simplicity) */

    TSetArg(args[0], T_PANED_HEIGHT, 100);
    TSetArg(args[1], T_PANED_MIN, 10);
    TSetArg(args[2], T_PANED_MAX, 200);
    TSetArg(args[3], 0, 0);

    for (i = 0; i < NUMPANES; i++)
        wpane[i] = TAddToVWindowFrame(windowframe, args);

    XMapWindow(windowframe);

    while (TRUE) {
	XNextEvent(&event);
        TDispatchXEvent(&event);
    }
}