Retired Document
Important: This sample code may not represent best practices for current development. The project may use deprecated symbols and illustrate technologies and techniques that are no longer recommended.
MIB-Libraries/MoreCarbonEvents/MoreCarbonEvents.c
/* |
File: MoreCarbonEvents.c |
Contains: Carbon event utilities. |
Written by: Quinn |
Copyright: Copyright (c) 2002 by Apple Computer, Inc., All Rights Reserved. |
Disclaimer: IMPORTANT: This Apple software is supplied to you by Apple Computer, Inc. |
("Apple") in consideration of your agreement to the following terms, and your |
use, installation, modification or redistribution of this Apple software |
constitutes acceptance of these terms. If you do not agree with these terms, |
please do not use, install, modify or redistribute this Apple software. |
In consideration of your agreement to abide by the following terms, and subject |
to these terms, Apple grants you a personal, non-exclusive license, under AppleĆs |
copyrights in this original Apple software (the "Apple Software"), to use, |
reproduce, modify and redistribute the Apple Software, with or without |
modifications, in source and/or binary forms; provided that if you redistribute |
the Apple Software in its entirety and without modifications, you must retain |
this notice and the following text and disclaimers in all such redistributions of |
the Apple Software. Neither the name, trademarks, service marks or logos of |
Apple Computer, Inc. may be used to endorse or promote products derived from the |
Apple Software without specific prior written permission from Apple. Except as |
expressly stated in this notice, no other rights or licenses, express or implied, |
are granted by Apple herein, including but not limited to any patent rights that |
may be infringed by your derivative works or by other works in which the Apple |
Software may be incorporated. |
The Apple Software is provided by Apple on an "AS IS" basis. APPLE MAKES NO |
WARRANTIES, EXPRESS OR IMPLIED, INCLUDING WITHOUT LIMITATION THE IMPLIED |
WARRANTIES OF NON-INFRINGEMENT, MERCHANTABILITY AND FITNESS FOR A PARTICULAR |
PURPOSE, REGARDING THE APPLE SOFTWARE OR ITS USE AND OPERATION ALONE OR IN |
COMBINATION WITH YOUR PRODUCTS. |
IN NO EVENT SHALL APPLE BE LIABLE FOR ANY SPECIAL, INDIRECT, INCIDENTAL OR |
CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE |
GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
ARISING IN ANY WAY OUT OF THE USE, REPRODUCTION, MODIFICATION AND/OR DISTRIBUTION |
OF THE APPLE SOFTWARE, HOWEVER CAUSED AND WHETHER UNDER THEORY OF CONTRACT, TORT |
(INCLUDING NEGLIGENCE), STRICT LIABILITY OR OTHERWISE, EVEN IF APPLE HAS BEEN |
ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
Change History (most recent first): |
$Log: MoreCarbonEvents.c,v $ |
Revision 1.1 2002/11/08 23:02:04 |
A new module containing Carbon event helper routines. |
*/ |
///////////////////////////////////////////////////////////////// |
// Our prototypes |
#include "MoreCarbonEvents.h" |
// System interfaces |
// MIB Interfaces |
///////////////////////////////////////////////////////////////// |
extern pascal OSStatus OKCancelWindowEventHandler(EventHandlerCallRef inHandlerCallRef, |
EventRef inEvent, void *inUserData) |
{ |
OSStatus err; |
#pragma unused(inHandlerCallRef) |
err = eventNotHandledErr; |
if ( (GetEventClass(inEvent) == kEventClassCommand ) |
&& (GetEventKind( inEvent) == kEventCommandProcess) ) { |
OSStatus junk; |
HICommand command; |
err = GetEventParameter(inEvent, kEventParamDirectObject, typeHICommand, NULL, sizeof(command), NULL, &command); |
if (err == noErr) { |
switch (command.commandID) { |
case kHICommandOK: |
case kHICommandCancel: |
junk = QuitAppModalLoopForWindow((WindowRef) inUserData); |
assert(junk == noErr); |
break; |
default: |
assert(err == eventNotHandledErr); |
break; |
} |
} |
} |
return err; |
} |
extern pascal EventHandlerUPP GetOKCancelWindowEventHandlerUPP(void) |
{ |
static EventHandlerUPP sOKCancelWindowEventHandlerUPP; |
if (sOKCancelWindowEventHandlerUPP == NULL) { |
sOKCancelWindowEventHandlerUPP = NewEventHandlerUPP(OKCancelWindowEventHandler); |
} |
assert(sOKCancelWindowEventHandlerUPP != NULL); |
return sOKCancelWindowEventHandlerUPP; |
} |
extern pascal OSStatus InstallOKCancelWindowEventHandler(WindowRef window) |
{ |
static const EventTypeSpec kOKCancelEvents[1] = { {kEventClassCommand, kEventCommandProcess} }; |
assert(window != NULL); |
return InstallWindowEventHandler(window, GetOKCancelWindowEventHandlerUPP(), |
GetEventTypeCount(kOKCancelEvents), |
kOKCancelEvents, window, NULL); |
} |
Copyright © 2003 Apple Computer, Inc. All Rights Reserved. Terms of Use | Privacy Policy | Updated: 2003-10-27