Tk_RestrictEvents (3)
filter and selectively delay X events
SYNOPSIS
#include <tk.h>
Tk_RestrictProc *
Tk_RestrictEvents(proc, clientData, prevClientDataPtr)
ARGUMENTS
Tk_RestrictProc **prevClientDataPtr
Tk_RestrictProc *proc in
Predicate procedure to call to filter incoming X events.
NULL means do not restrict events at all.
ClientData clientData in
Arbitrary argument to pass to proc.
ClientData *prevClientDataPtr out
Pointer to place to save argument to previous restrict procedure.
DESCRIPTION
This procedure is useful in certain situations where applications
are only prepared to receive certain X events. After
Tk_RestrictEvents is called, Tk_DoOneEvent (and
hence Tk_MainLoop) will filter X input events through
proc. Proc indicates whether a
given event is to be processed immediately, deferred until some
later time (e.g. when the event restriction is lifted), or discarded.
Proc
is a procedure with arguments and result that match
the type Tk_RestrictProc:
typedef Tk_RestrictAction Tk_RestrictProc(
ClientData clientData,
XEvent *eventPtr);
The clientData argument is a copy of the clientData passed
to Tk_RestrictEvents; it may be used to provide proc with
information it needs to filter events. The eventPtr points to
an event under consideration. Proc returns a restrict action
(enumerated type Tk_RestrictAction) that indicates what
Tk_DoOneEvent should do with the event. If the return value is
TK_PROCESS_EVENT, then the event will be handled immediately.
If the return value is TK_DEFER_EVENT, then the event will be
left on the event queue for later processing. If the return value is
TK_DISCARD_EVENT, then the event will be removed from the event
queue and discarded without being processed.
Tk_RestrictEvents uses its return value and prevClientDataPtr
to return information about the current event restriction procedure
(a NULL return value means there are currently no restrictions).
These values may be used to restore the previous restriction state
when there is no longer any need for the current restriction.
There are very few places where Tk_RestrictEvents is needed.
In most cases, the best way to restrict events is by changing the
bindings with the bind Tcl command or by calling
Tk_CreateEventHandler and Tk_DeleteEventHandler from C.
The main place where Tk_RestrictEvents must be used is when
performing synchronous actions (for example, if you need to wait
for a particular event to occur on a particular window but you don't
want to invoke any handlers for any other events). The ``obvious''
solution in these situations is to call XNextEvent or
XWindowEvent, but these procedures cannot be used because
Tk keeps its own event queue that is separate from the X event
queue. Instead, call Tk_RestrictEvents to set up a filter,
then call Tk_DoOneEvent to retrieve the desired event(s).
KEYWORDS
delay, event, filter, restriction
'\"
'\" Copyright (c) 1990-1993 The Regents of the University of California.
'\" Copyright (c) 1994-1997 Sun Microsystems, Inc.
'\"
'\" See the file "license.terms" for information on usage and redistribution
'\" of this file, and for a DISCLAIMER OF ALL WARRANTIES.
'\"
'\" RCS: @(#) $Id: WindowId.3,v 1.2 1998/09/14 18:22:54 stanton Exp $
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
'\" Start paragraph describing an argument to a library procedure.
'\" type is type of argument (int, etc.), in/out is either "in", "out",
'\" or "in/out" to describe whether procedure reads or modifies arg,
'\" and indent is equivalent to second arg of .IP (shouldn't ever be
'\" needed; use .AS below instead)
'\"
'\" .AS ?type? ?name?
'\" Give maximum sizes of arguments for setting tab stops. Type and
'\" name are examples of largest possible arguments that will be passed
'\" to .AP later. If args are omitted, default tab stops are used.
'\"
'\" .BS
'\" Start box enclosure. From here until next .BE, everything will be
'\" enclosed in one large box.
'\"
'\" .BE
'\" End of box enclosure.
'\"
'\" .CS
'\" Begin code excerpt.
'\"
'\" .CE
'\" End code excerpt.
'\"
'\" .VS ?version? ?br?
'\" Begin vertical sidebar, for use in marking newly-changed parts
'\" of man pages. The first argument is ignored and used for recording
'\" the version when the .VS was added, so that the sidebars can be
'\" found and removed when they reach a certain age. If another argument
'\" is present, then a line break is forced before starting the sidebar.
'\"
'\" .VE
'\" End of vertical sidebar.
'\"
'\" .DS
'\" Begin an indented unfilled display.
'\"
'\" .DE
'\" End of indented unfilled display.
'\"
'\" .SO
'\" Start of list of standard options for a Tk widget. The
'\" options follow on successive lines, in four columns separated
'\" by tabs.
'\"
'\" .SE
'\" End of list of standard options for a Tk widget.
'\"
'\" .OP cmdName dbName dbClass
'\" Start of description of a specific option. cmdName gives the
'\" option's name as specified in the class command, dbName gives
'\" the option's name in the option database, and dbClass gives
'\" the option's class in the option database.
'\"
'\" .UL arg1 arg2
'\" Print arg1 underlined, then print arg2 normally.
'\"
'\" RCS: @(#) $Id: man.macros,v 1.2 1998/09/14 18:39:54 stanton Exp $
'\"
'\" # Set up traps and other miscellaneous stuff for Tcl/Tk man pages.
t .wh -1.3i ^B
^l \n(.l
b
'\" # Start an argument description
AP
!"\\$4"" .TP \\$4
\{\
!"\\$2"" .TP \\n()Cu
.TP 15
|