|
jpayne@69
|
1 /*
|
|
jpayne@69
|
2 * tkBusy.h --
|
|
jpayne@69
|
3 *
|
|
jpayne@69
|
4 * This file defines the type of the structure describing a busy window.
|
|
jpayne@69
|
5 *
|
|
jpayne@69
|
6 * Copyright 1993-1998 Lucent Technologies, Inc.
|
|
jpayne@69
|
7 *
|
|
jpayne@69
|
8 * The "busy" command was created by George Howlett. Adapted for
|
|
jpayne@69
|
9 * integration into Tk by Jos Decoster and Donal K. Fellows.
|
|
jpayne@69
|
10 *
|
|
jpayne@69
|
11 * See the file "license.terms" for information on usage and redistribution of
|
|
jpayne@69
|
12 * this file, and for a DISCLAIMER OF ALL WARRANTIES.
|
|
jpayne@69
|
13 */
|
|
jpayne@69
|
14
|
|
jpayne@69
|
15 typedef struct Busy {
|
|
jpayne@69
|
16 Display *display; /* Display of busy window */
|
|
jpayne@69
|
17 Tcl_Interp *interp; /* Interpreter where "busy" command was
|
|
jpayne@69
|
18 * created. It's used to key the searches in
|
|
jpayne@69
|
19 * the window hierarchy. See the "windows"
|
|
jpayne@69
|
20 * command. */
|
|
jpayne@69
|
21 Tk_Window tkBusy; /* Busy window: Transparent window used to
|
|
jpayne@69
|
22 * block delivery of events to windows
|
|
jpayne@69
|
23 * underneath it. */
|
|
jpayne@69
|
24 Tk_Window tkParent; /* Parent window of the busy window. It may be
|
|
jpayne@69
|
25 * the reference window (if the reference is a
|
|
jpayne@69
|
26 * toplevel) or a mutual ancestor of the
|
|
jpayne@69
|
27 * reference window */
|
|
jpayne@69
|
28 Tk_Window tkRef; /* Reference window of the busy window. It is
|
|
jpayne@69
|
29 * used to manage the size and position of the
|
|
jpayne@69
|
30 * busy window. */
|
|
jpayne@69
|
31 int x, y; /* Position of the reference window */
|
|
jpayne@69
|
32 int width, height; /* Size of the reference window. Retained to
|
|
jpayne@69
|
33 * know if the reference window has been
|
|
jpayne@69
|
34 * reconfigured to a new size. */
|
|
jpayne@69
|
35 int menuBar; /* Menu bar flag. */
|
|
jpayne@69
|
36 Tk_Cursor cursor; /* Cursor for the busy window. */
|
|
jpayne@69
|
37 Tcl_HashEntry *hashPtr; /* Used the delete the busy window entry out
|
|
jpayne@69
|
38 * of the global hash table. */
|
|
jpayne@69
|
39 Tcl_HashTable *tablePtr;
|
|
jpayne@69
|
40 Tk_OptionTable optionTable;
|
|
jpayne@69
|
41 } Busy;
|
