-
Notifications
You must be signed in to change notification settings - Fork 3
/
listing1.html
executable file
·702 lines (569 loc) · 25.2 KB
/
listing1.html
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/1999/REC-html401-19991224/loose.dtd">
<html>
<head>
<!-- BEGIN META TAG INFO -->
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<link rel="home" href="http://developer.apple.com/">
<link rel="find" href="http://developer.apple.com/search/">
<link rel="stylesheet" type="text/css" href="../../documentation/css/adcstyle.css" title="fonts">
<script language="JavaScript" src="../../documentation/js/adc.js" type="text/javascript"></script>
<!-- END META TAG INFO -->
<!-- BEGIN TITLE -->
<title>QISA - /MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreAppearance/MoreAppearance.cp</title>
<!-- END TITLE -->
<script language="JavaScript">
function JumpToNewPage() {
window.location=document.scpopupmenu.gotop.value;
return true;
}
</script>
</head>
<!-- BEGIN BODY OPEN -->
<body>
<!--END BODY OPEN -->
<!-- START CENTER OPEN -->
<center>
<!-- END CENTER OPEN -->
<!-- BEGIN LOGO AND SEARCH -->
<!--#include virtual="/includes/adcnavbar"-->
<!-- END LOGO AND SEARCH -->
<!-- START BREADCRUMB -->
<div id="breadcrumb">
<table width="680" border="0" cellpadding="0" cellspacing="0">
<tr>
<td scope="row"><img width="340" height="10" src="images/1dot.gif" alt=""></td>
<td><img width="340" height="10" src="images/1dot.gif" alt=""></td>
</tr>
<tr valign="middle">
<td align="left" colspan="2">
<a href="http://developer.apple.com/">ADC Home</a> > <a href="../../referencelibrary/index.html">Reference Library</a> > <a href="../../samplecode/index.html">Sample Code</a> > <a href="../../samplecode/Networking/index.html">Networking</a> > <a href="../../samplecode/Networking/idxDarwin-date.html">Darwin</a> > <A HREF="javascript:location.replace('index.html');">QISA</A> >
</td>
</tr>
<tr>
<td colspan="2" scope="row"><img width="680" height="35" src="images/1dot.gif" alt=""></td>
</tr>
</table>
</div>
<!-- END BREADCRUMB -->
<!-- START MAIN CONTENT -->
<!-- START TITLE GRAPHIC AND INTRO-->
<table width="680" border="0" cellpadding="0" cellspacing="0">
<tr align="left" valign="top">
<td><h1><div id="pagehead">QISA</div></h1></td>
</tr>
</table>
<!-- END TITLE GRAPHIC AND INTRO -->
<!-- START WIDE COLUMN -->
<table width="680" border="0" cellpadding="0" cellspacing="0">
<tr align="left" valign="top">
<td id="scdetails">
<h2>/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreAppearance/MoreAppearance.cp</h2>
<form name="scpopupmenu" onSubmit="return false;" method=post>
<p><strong>View Source Code:</strong>
<select name="gotop" onChange="JumpToNewPage();" style="width:340px"><option selected value="ingnore">Select File</option>
<option value="listing1.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreAppearance/MoreAppearance.cp</option>
<option value="listing2.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreAppearance/MoreAppearance.h</option>
<option value="listing3.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreAppleEvents/MoreAEDataModel.c</option>
<option value="listing4.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreAppleEvents/MoreAEDataModel.h</option>
<option value="listing5.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreAppleEvents/MoreAEObjects.c</option>
<option value="listing6.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreAppleEvents/MoreAEObjects.h</option>
<option value="listing7.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreAppleEvents/MoreAppleEvents.cp</option>
<option value="listing8.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreAppleEvents/MoreAppleEvents.h</option>
<option value="listing9.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreCarbonEvents/MoreCarbonEvents.c</option>
<option value="listing10.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreCarbonEvents/MoreCarbonEvents.h</option>
<option value="listing11.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreCFQ/MoreCFQ.c</option>
<option value="listing12.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreCFQ/MoreCFQ.h</option>
<option value="listing13.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreControls/MoreControls.cp</option>
<option value="listing14.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreControls/MoreControls.h</option>
<option value="listing15.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreDialogs/MoreDialogs.cp</option>
<option value="listing16.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreDialogs/MoreDialogs.h</option>
<option value="listing17.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreInterfaceLib/MoreInterfaceLib.c</option>
<option value="listing18.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreInterfaceLib/MoreInterfaceLib.h</option>
<option value="listing19.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreInterfaceLib/RemoteAccessInterface.h</option>
<option value="listing20.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreMemory/MoreMemory.c</option>
<option value="listing21.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreMemory/MoreMemory.h</option>
<option value="listing22.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreOSUtils/MoreOSUtils.c</option>
<option value="listing23.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreOSUtils/MoreOSUtils.h</option>
<option value="listing24.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreProcesses/MoreProcesses.cp</option>
<option value="listing25.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreProcesses/MoreProcesses.h</option>
<option value="listing26.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreQuickDraw/MoreQuickDraw.cp</option>
<option value="listing27.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreQuickDraw/MoreQuickDraw.h</option>
<option value="listing28.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSCF/MoreSCF.c</option>
<option value="listing29.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSCF/MoreSCF.h</option>
<option value="listing30.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSCF/MoreSCFCCLScanner.c</option>
<option value="listing31.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSCF/MoreSCFCCLScanner.h</option>
<option value="listing32.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSCF/MoreSCFDigest.c</option>
<option value="listing33.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSCF/MoreSCFDigest.h</option>
<option value="listing34.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSCF/MoreSCFHelpers.c</option>
<option value="listing35.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSCF/MoreSCFHelpers.h</option>
<option value="listing36.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSCF/MoreSCFPortScanner.c</option>
<option value="listing37.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSCF/MoreSCFPortScanner.h</option>
<option value="listing38.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSecurity/MoreSecurity.c</option>
<option value="listing39.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSecurity/MoreSecurity.h</option>
<option value="listing40.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreSetup.h</option>
<option value="listing41.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreTextUtils/MoreTextUtils.cp</option>
<option value="listing42.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreTextUtils/MoreTextUtils.h</option>
<option value="listing43.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreUNIX/MoreUNIX.c</option>
<option value="listing44.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreUNIX/MoreUNIX.h</option>
<option value="listing45.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreWindows/MoreWindows.cp</option>
<option value="listing46.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/MoreWindows/MoreWindows.h</option>
<option value="listing47.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/NetworkSetup/MoreNetworkSetup.c</option>
<option value="listing48.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/NetworkSetup/MoreNetworkSetup.h</option>
<option value="listing49.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/NetworkSetup/NetworkSetupHelpers.c</option>
<option value="listing50.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/NetworkSetup/NetworkSetupHelpers.h</option>
<option value="listing51.html">/MoreIsBetter Bits/MoreIsBetter/MIB-Libraries/NetworkSetup/OldStyleAPI/OldOTConfigLib.h</option>
<option value="listing52.html">/QISA.c</option>
<option value="listing53.html">/QISA.h</option>
<option value="listing54.html">/QISAPanels.c</option>
<option value="listing55.html">/QISAPanels.h</option>
<option value="listing56.html">/QISAPlatform.c</option>
<option value="listing57.html">/QISAPlatform.h</option>
<option value="listing58.html">/QISAPlatformCFM/QISAPlatformCFM.c</option>
<option value="listing59.html">/QISAPlatformCFM/QISAPlatformCFMPrefix.h</option>
<option value="listing60.html">/QISAPlatformMach-O/QISAPlatformMach-O.c</option>
<option value="listing61.html">/QISAPlatformMach-O/QISASetupTool.c</option>
<option value="listing62.html">/ReadMeAboutQISA.html</option></select>
</p>
</form>
<p><strong><a href="QISA.zip">Download Sample</a></strong> (“QISA.zip”, 610.6K)<BR>
<strong><a href="QISA.dmg">Download Sample</a></strong> (“QISA.dmg”, 903.9K)</p>
<!--
<p><strong><a href="#">Download Sample</a></strong> (“filename.sit”, 500K)</p>
-->
</td>
</tr>
<tr>
<td scope="row"><img width="680" height="10" src="images/1dot.gif" alt=""><br>
<img height="1" width="680" src="images/1dot_919699.gif" alt=""><br>
<img width="680" height="20" src="images/1dot.gif" alt=""></td>
</tr>
<tr>
<td scope="row">
<!--googleon: index -->
<pre class="sourcecodebox">/* File: MoreAppearance.cp Contains: Appearance Manager utilities. Written by: Pete Gontier Copyright: Copyright (c) 1998-2001 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: MoreAppearance.cp,v $Revision 1.7 2002/11/08 22:44:39 eskimo1Convert nil to NULL. Convert MoreAssertQ to assert.Revision 1.6 2001/11/07 15:50:43 eskimo1Tidy up headers, add CVS logs, update copyright. <5> 21/9/01 Quinn Changes for CWPro7 Mach-O build. <4> 20/3/00 Quinn The various "have this feature" routines now auto-initialise. Made this change so that other MIB modules can call them without worrying about initialising this module. <3> 1/22/99 PCG TARGET_CARBON <2> 11/11/98 PCG fix header <1> 11/10/98 PCG first big re-org at behest of Quinn Old Change History (most recent first): <6> 10/11/98 Quinn Convert "MorePrefix.h" to "MoreSetup.h". <5> 9/11/98 PCG conditionalize calls to Appearance Manager 1.1 so they occur on PowerPC only and add sanity checks for Appearance Manager availability <4> 9/4/98 PCG theme drawing state functions call real APIs if present <3> 9/1/98 PCG clean up Gestalt cache logic; MoreGetThemeDrawingState inits stateResult to NIL <2> 9/1/98 PCG add theme drawing state functions <1> 6/16/98 PCG initial checkin*/#include "MoreSetup.h"#include "MoreAppearance.h"#include "MoreQuickDraw.h"#if ! MORE_FRAMEWORK_INCLUDES #include <Appearance.h> #include <Gestalt.h> #include <MacMemory.h>#endifstatic Boolean gHaveInited;static UInt32 gAppearanceAttributes;static UInt32 gAppearanceVersion;pascal long GetAppearanceVersion (void){ OSStatus junk; // // Simply returns our cached variable. See InitMoreAppearance // for how this variable is initialized. // if (!gHaveInited) { junk = InitMoreAppearance(); assert(junk == noErr); } return gAppearanceVersion;}pascal Boolean HaveAppearance (void){ OSStatus junk; // // Tests a bit in our cached variable and promotes it to a byte // indicating whether the Appearance APIs are present. // if (!gHaveInited) { junk = InitMoreAppearance(); assert(junk == noErr); } return (gAppearanceAttributes & (1 << gestaltAppearanceExists)) != 0;}pascal Boolean AppearanceInCompatibilityMode (void){ OSStatus junk; // // Tests a bit in our cached variable and promotes it to a byte // indicating whether Appearance is running in compatibility mode. // if (!gHaveInited) { junk = InitMoreAppearance(); assert(junk == noErr); } return (gAppearanceAttributes & (1 << gestaltAppearanceCompatMode)) != 0;}pascal OSStatus InitMoreAppearance (void){ // // Caches some Gestalt values so we don't have to keep calling Gestalt. // If Appearance is present, registers us as an Appearance-savvy app. // Second-guesses the version advertised by Gestalt. // gHaveInited = true; OSStatus err = Gestalt (gestaltAppearanceAttr, (SInt32 *) &gAppearanceAttributes); if (err == gestaltUndefSelectorErr) { gAppearanceAttributes = 0; err = noErr; } else if (!err) { err = Gestalt (gestaltAppearanceVersion, (SInt32 *) &gAppearanceVersion); if (err == gestaltUndefSelectorErr) { gAppearanceVersion = 0x0100; err = noErr; } } if (!err && HaveAppearance ( )) { // // We don't need to do any of these sanity checks for the // Carbon build because these symbols are always available // to Carbon builds. // #if ! TARGET_API_MAC_CARBON // // Perform sanity checking for potential weak links. // Even though Gestalt claims a certain version of // Appearance is available, we still may not have // successfully resolved all weak links to it. So // we second-guess Gestalt's claim and fall back to // progressively less useful versions of Appearance. // This is not an extensible approach; Appearance // Manager 2.0 weak links might be unresolved and // this code would never know to check. Still, this // code is only for ADDITIONAL paranoia/safety, and // a new Appearance Manager will not render it // invalid, just a little less canonical. //#if TARGET_RT_MAC_CFM#if TARGET_CPU_PPC if (gAppearanceVersion >= 0x0110 && !GetTheme) gAppearanceVersion = 0x0101;#endif // TARGET_CPU_PPC if (gAppearanceVersion >= 0x0101 && !DrawThemeModelessDialogFrame) gAppearanceVersion = 0x0100; if (gAppearanceVersion >= 0x0100 && !RegisterAppearanceClient) { gAppearanceVersion = 0; gAppearanceAttributes = 0; }#endif // TARGET_RT_MAC_CFM if (HaveAppearance ( )) err = RegisterAppearanceClient ( );#endif // ! TARGET_API_MAC_CARBON } return err;}#pragma mark -#if ! TARGET_API_MAC_CARBONstruct MoreThemeDrawingStateTag{ // // stolen from // {CommonSystem}:Toolbox:ToolboxUtils:CommonUtilities:ColorPenState.c // Boolean colorPort; Boolean bkPatternIsValid; RGBColor foreColor; RGBColor backColor; PenState pen; SInt16 textMode; PixPatHandle pnPixPat; PixPatHandle bkPixPat; Pattern bkPat; UInt32 fgColor; UInt32 bkColor;};#endifpascal OSStatus MoreGetThemeDrawingState (MoreThemeDrawingState *stateResult){ // // mostly stolen from // {CommonSystem}:Toolbox:ToolboxUtils:CommonUtilities:ColorPenState.c // *stateResult = NULL; OSStatus err = noErr; // The remaining uses of TARGET_CPU_PPC in this file are pretty // cheesy, but they're actually correct. We're using them to // test for a weak link. This works for CFM builds. It also // compiles and runs for Mach-O builds (it uses a few extra // CPU cycles). However, it won't compile for 68K builds // because the functions are either not defined for 68K builds // or they're defined as an inline A-trap, which you can't take // the address of. So, testing for TARGET_CPU_PPC is OK. #if TARGET_CPU_PPC if (::GetAppearanceVersion ( ) >= 0x0110 && ::GetThemeDrawingState) err = ::GetThemeDrawingState ((ThemeDrawingState *) stateResult); else#endif#if TARGET_API_MAC_CARBON err = unimpErr;#else { MoreThemeDrawingState state = MoreThemeDrawingState (::NewPtrClear (sizeof (*state))); if (!state) err = ::MemError ( ); else { GrafPtr curPort; ::GetPort( &curPort ); state->pnPixPat = NULL; state->bkPixPat = NULL; state->colorPort = ::IsColorGrafPort( curPort ); // Save the black and white information always state->bkPatternIsValid = true; state->bkPat = curPort->bkPat; state->bkColor = curPort->bkColor; state->fgColor = curPort->fgColor; if ( state->colorPort ) { ::GetForeColor( &state->foreColor ); ::GetBackColor( &state->backColor ); // // If the pen pattern is not an old style pattern, // copy the handle. If it is an old style pattern, // GetPenState below will save the right thing. // PixPatHandle penPixPat = ((CGrafPtr)curPort)->pnPixPat; PixPatHandle backPixPat = ((CGrafPtr)curPort)->bkPixPat; if ( penPixPat != NULL ) if( (**penPixPat).patType != 0 ) state->pnPixPat = penPixPat; // // If the back pattern is not an old style pattern, // copy the handle, else get the old pattern into // bkPat for restoring that way. // if( backPixPat != NULL ) { if ( (**backPixPat).patType != 0 ) state->bkPixPat = backPixPat; else state->bkPat = *(PatPtr)(*(**backPixPat).patData); state->bkPatternIsValid = true; } else { state->bkPatternIsValid = false; } } ::GetPenState( &state->pen ); state->textMode = curPort->txMode; *stateResult = state; } }#endif return err;}pascal OSStatus MoreNormalizeThemeDrawingState (void){ // // mostly stolen from // {CommonSystem}:Toolbox:ToolboxUtils:CommonUtilities:ColorPenState.c // OSStatus err = noErr;#if TARGET_CPU_PPC if (::GetAppearanceVersion ( ) >= 0x0110 && ::NormalizeThemeDrawingState) err = NormalizeThemeDrawingState ( ); else#endif#if TARGET_API_MAC_CARBON err = unimpErr;#else { static Pattern whitePat = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 }; GrafPtr curPort; ::GetPort( &curPort ); ::ForeColor( blackColor ); ::BackColor( whiteColor ); ::PenNormal ( ); ::BackPat( &whitePat ); ::TextMode( srcOr ); }#endif return err;}pascal OSStatus MoreSetThemeDrawingState (MoreThemeDrawingState state, Boolean disposeNow){ // // mostly stolen from // {CommonSystem}:Toolbox:ToolboxUtils:CommonUtilities:ColorPenState.c // and // {CommonSystem}:Toolbox:Appearance:AppearanceCore:ThemeDrawingState.cp // OSStatus err = noErr; if (!state) err = paramErr; else#if TARGET_CPU_PPC if (::GetAppearanceVersion ( ) >= 0x0110 && ::SetThemeDrawingState) err = ::SetThemeDrawingState (ThemeDrawingState (state), disposeNow); else#endif#if TARGET_API_MAC_CARBON err = unimpErr;#else { GrafPtr curPort; ::GetPort( &curPort ); ::SetPenState (&(state->pen)); // // If we saved color information, and this port is a // color port, use the color stuff, else just use the // black and white information. // if ( ::IsColorGrafPort( curPort ) && state->colorPort ) { ::RGBForeColor( &state->foreColor ); ::RGBBackColor( &state->backColor ); if ( state->pnPixPat != NULL ) ::PenPixPat( state->pnPixPat ); if( state->bkPatternIsValid ) { if ( state->bkPixPat != NULL ) ::BackPixPat( state->bkPixPat ); else ::BackPat( &state->bkPat ); } } else { // // back pattern is always valid for monochrome ports // ::BackPat( &state->bkPat ); ::ForeColor( state->fgColor ); ::BackColor( state->bkColor ); } ::TextMode( state->textMode ); if (disposeNow) { ::DisposePtr (Ptr (state)); err = ::MemError ( ); } }#endif return err;}pascal OSStatus MoreDisposeThemeDrawingState (MoreThemeDrawingState state){ // // mostly stolen from // {CommonSystem}:Toolbox:Appearance:AppearanceCore:ThemeDrawingState.cp // OSStatus err = noErr; if (!state) err = paramErr; else#if TARGET_CPU_PPC if (::GetAppearanceVersion ( ) >= 0x0110 && ::DisposeThemeDrawingState) err = ::DisposeThemeDrawingState (ThemeDrawingState (state)); else#endif#if TARGET_API_MAC_CARBON err = unimpErr;#else { ::DisposePtr (Ptr (state)); err = ::MemError ( ); }#endif return err;}</pre>
<!--googleoff: index -->
</td>
</tr>
</table>
<!-- END WIDE COLUMN -->
<!-- END MAIN CONTENT -->
<table width="680" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><div style="width: 100%; height: 1px; background-color: #919699; margin-top: 5px; margin-bottom: 15px"></div></td>
</tr>
<tr>
<td align="center"><br/>
<table border="0" cellpadding="0" cellspacing="0" class="graybox">
<tr>
<th>Did this document help you?</th>
</tr>
<tr>
<td>
<div style="margin-bottom: 8px"><a href="http://developer.apple.com/feedback/?v=1&url=/samplecode/QISA/listing1.html%3Fid%3DDTS10000714-1.0&media=dvd" target=_new>Yes</a>: Tell us what works for you.</div>
<div style="margin-bottom: 8px"><a href="http://developer.apple.com/feedback/?v=2&url=/samplecode/QISA/listing1.html%3Fid%3DDTS10000714-1.0&media=dvd" target=_new>It’s good, but:</a> Report typos, inaccuracies, and so forth.</div>
<div><a href="http://developer.apple.com/feedback/?v=3&url=/samplecode/QISA/listing1.html%3Fid%3DDTS10000714-1.0&media=dvd" target=_new>It wasn’t helpful</a>: Tell us what would have helped.</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
<!-- START BOTTOM APPLE NAVIGATION -->
<!--#include virtual="/includes/footer"-->
<!-- END BOTTOM APPLE NAVIGATION -->
<!-- START CENTER CLOSE -->
</center>
<!-- END CENTER CLOSE -->
</body>
</html>