1 {
2 File: QD/Palettes.h
3
4 Contains: Palette Manager Interfaces.
5
6 Version: Quickdraw-262~1
7
8 Copyright: � 1987-2008 by Apple Computer, Inc., all rights reserved
9
10 Bugs?: For bug reports, consult the following page on
11 the World Wide Web:
12
13 http://bugs.freepascal.org
14
15 }
16 { Pascal Translation Updated: Jonas Maebe, <jonas@freepascal.org>, October 2009 }
17 {
18 Modified for use with Free Pascal
19 Version 308
20 Please report any bugs to <gpc@microbizz.nl>
21 }
22
23 {$ifc not defined MACOSALLINCLUDE or not MACOSALLINCLUDE}
24 {$mode macpas}
25 {$modeswitch cblocks}
26 {$packenum 1}
27 {$macro on}
28 {$inline on}
29 {$calling mwpascal}
30
31 unit Palettes;
32 interface
33 {$setc UNIVERSAL_INTERFACES_VERSION := $0400}
34 {$setc GAP_INTERFACES_VERSION := $0308}
35
36 {$ifc not defined USE_CFSTR_CONSTANT_MACROS}
37 {$setc USE_CFSTR_CONSTANT_MACROS := TRUE}
38 {$endc}
39
40 {$ifc defined CPUPOWERPC and defined CPUI386}
41 {$error Conflicting initial definitions for CPUPOWERPC and CPUI386}
42 {$endc}
43 {$ifc defined FPC_BIG_ENDIAN and defined FPC_LITTLE_ENDIAN}
44 {$error Conflicting initial definitions for FPC_BIG_ENDIAN and FPC_LITTLE_ENDIAN}
45 {$endc}
46
47 {$ifc not defined __ppc__ and defined CPUPOWERPC32}
48 {$setc __ppc__ := 1}
49 {$elsec}
50 {$setc __ppc__ := 0}
51 {$endc}
52 {$ifc not defined __ppc64__ and defined CPUPOWERPC64}
53 {$setc __ppc64__ := 1}
54 {$elsec}
55 {$setc __ppc64__ := 0}
56 {$endc}
57 {$ifc not defined __i386__ and defined CPUI386}
58 {$setc __i386__ := 1}
59 {$elsec}
60 {$setc __i386__ := 0}
61 {$endc}
62 {$ifc not defined __x86_64__ and defined CPUX86_64}
63 {$setc __x86_64__ := 1}
64 {$elsec}
65 {$setc __x86_64__ := 0}
66 {$endc}
67 {$ifc not defined __arm__ and defined CPUARM}
68 {$setc __arm__ := 1}
69 {$elsec}
70 {$setc __arm__ := 0}
71 {$endc}
72 {$ifc not defined __arm64__ and defined CPUAARCH64}
73 {$setc __arm64__ := 1}
74 {$elsec}
75 {$setc __arm64__ := 0}
76 {$endc}
77
78 {$ifc defined cpu64}
79 {$setc __LP64__ := 1}
80 {$elsec}
81 {$setc __LP64__ := 0}
82 {$endc}
83
84
85 {$ifc defined __ppc__ and __ppc__ and defined __i386__ and __i386__}
86 {$error Conflicting definitions for __ppc__ and __i386__}
87 {$endc}
88
89 {$ifc defined __ppc__ and __ppc__}
90 {$setc TARGET_CPU_PPC := TRUE}
91 {$setc TARGET_CPU_PPC64 := FALSE}
92 {$setc TARGET_CPU_X86 := FALSE}
93 {$setc TARGET_CPU_X86_64 := FALSE}
94 {$setc TARGET_CPU_ARM := FALSE}
95 {$setc TARGET_CPU_ARM64 := FALSE}
96 {$setc TARGET_OS_MAC := TRUE}
97 {$setc TARGET_OS_IPHONE := FALSE}
98 {$setc TARGET_IPHONE_SIMULATOR := FALSE}
99 {$setc TARGET_OS_EMBEDDED := FALSE}
100 {$elifc defined __ppc64__ and __ppc64__}
101 {$setc TARGET_CPU_PPC := FALSE}
102 {$setc TARGET_CPU_PPC64 := TRUE}
103 {$setc TARGET_CPU_X86 := FALSE}
104 {$setc TARGET_CPU_X86_64 := FALSE}
105 {$setc TARGET_CPU_ARM := FALSE}
106 {$setc TARGET_CPU_ARM64 := FALSE}
107 {$setc TARGET_OS_MAC := TRUE}
108 {$setc TARGET_OS_IPHONE := FALSE}
109 {$setc TARGET_IPHONE_SIMULATOR := FALSE}
110 {$setc TARGET_OS_EMBEDDED := FALSE}
111 {$elifc defined __i386__ and __i386__}
112 {$setc TARGET_CPU_PPC := FALSE}
113 {$setc TARGET_CPU_PPC64 := FALSE}
114 {$setc TARGET_CPU_X86 := TRUE}
115 {$setc TARGET_CPU_X86_64 := FALSE}
116 {$setc TARGET_CPU_ARM := FALSE}
117 {$setc TARGET_CPU_ARM64 := FALSE}
118 {$ifc defined iphonesim}
119 {$setc TARGET_OS_MAC := FALSE}
120 {$setc TARGET_OS_IPHONE := TRUE}
121 {$setc TARGET_IPHONE_SIMULATOR := TRUE}
122 {$elsec}
123 {$setc TARGET_OS_MAC := TRUE}
124 {$setc TARGET_OS_IPHONE := FALSE}
125 {$setc TARGET_IPHONE_SIMULATOR := FALSE}
126 {$endc}
127 {$setc TARGET_OS_EMBEDDED := FALSE}
128 {$elifc defined __x86_64__ and __x86_64__}
129 {$setc TARGET_CPU_PPC := FALSE}
130 {$setc TARGET_CPU_PPC64 := FALSE}
131 {$setc TARGET_CPU_X86 := FALSE}
132 {$setc TARGET_CPU_X86_64 := TRUE}
133 {$setc TARGET_CPU_ARM := FALSE}
134 {$setc TARGET_CPU_ARM64 := FALSE}
135 {$ifc defined iphonesim}
136 {$setc TARGET_OS_MAC := FALSE}
137 {$setc TARGET_OS_IPHONE := TRUE}
138 {$setc TARGET_IPHONE_SIMULATOR := TRUE}
139 {$elsec}
140 {$setc TARGET_OS_MAC := TRUE}
141 {$setc TARGET_OS_IPHONE := FALSE}
142 {$setc TARGET_IPHONE_SIMULATOR := FALSE}
143 {$endc}
144 {$setc TARGET_OS_EMBEDDED := FALSE}
145 {$elifc defined __arm__ and __arm__}
146 {$setc TARGET_CPU_PPC := FALSE}
147 {$setc TARGET_CPU_PPC64 := FALSE}
148 {$setc TARGET_CPU_X86 := FALSE}
149 {$setc TARGET_CPU_X86_64 := FALSE}
150 {$setc TARGET_CPU_ARM := TRUE}
151 {$setc TARGET_CPU_ARM64 := FALSE}
152 {$setc TARGET_OS_MAC := FALSE}
153 {$setc TARGET_OS_IPHONE := TRUE}
154 {$setc TARGET_IPHONE_SIMULATOR := FALSE}
155 {$setc TARGET_OS_EMBEDDED := TRUE}
156 {$elifc defined __arm64__ and __arm64__}
157 {$setc TARGET_CPU_PPC := FALSE}
158 {$setc TARGET_CPU_PPC64 := FALSE}
159 {$setc TARGET_CPU_X86 := FALSE}
160 {$setc TARGET_CPU_X86_64 := FALSE}
161 {$setc TARGET_CPU_ARM := FALSE}
162 {$setc TARGET_CPU_ARM64 := TRUE}
163 {$ifc defined ios}
164 {$setc TARGET_OS_MAC := FALSE}
165 {$setc TARGET_OS_IPHONE := TRUE}
166 {$setc TARGET_OS_EMBEDDED := TRUE}
167 {$elsec}
168 {$setc TARGET_OS_MAC := TRUE}
169 {$setc TARGET_OS_IPHONE := FALSE}
170 {$setc TARGET_OS_EMBEDDED := FALSE}
171 {$endc}
172 {$setc TARGET_IPHONE_SIMULATOR := FALSE}
173 {$elsec}
174 {$error __ppc__ nor __ppc64__ nor __i386__ nor __x86_64__ nor __arm__ nor __arm64__ is defined.}
175 {$endc}
176
177 {$ifc defined __LP64__ and __LP64__ }
178 {$setc TARGET_CPU_64 := TRUE}
179 {$elsec}
180 {$setc TARGET_CPU_64 := FALSE}
181 {$endc}
182
183 {$ifc defined FPC_BIG_ENDIAN}
184 {$setc TARGET_RT_BIG_ENDIAN := TRUE}
185 {$setc TARGET_RT_LITTLE_ENDIAN := FALSE}
186 {$elifc defined FPC_LITTLE_ENDIAN}
187 {$setc TARGET_RT_BIG_ENDIAN := FALSE}
188 {$setc TARGET_RT_LITTLE_ENDIAN := TRUE}
189 {$elsec}
190 {$error Neither FPC_BIG_ENDIAN nor FPC_LITTLE_ENDIAN are defined.}
191 {$endc}
192 {$setc ACCESSOR_CALLS_ARE_FUNCTIONS := TRUE}
193 {$setc CALL_NOT_IN_CARBON := FALSE}
194 {$setc OLDROUTINENAMES := FALSE}
195 {$setc OPAQUE_TOOLBOX_STRUCTS := TRUE}
196 {$setc OPAQUE_UPP_TYPES := TRUE}
197 {$setc OTCARBONAPPLICATION := TRUE}
198 {$setc OTKERNEL := FALSE}
199 {$setc PM_USE_SESSION_APIS := TRUE}
200 {$setc TARGET_API_MAC_CARBON := TRUE}
201 {$setc TARGET_API_MAC_OS8 := FALSE}
202 {$setc TARGET_API_MAC_OSX := TRUE}
203 {$setc TARGET_CARBON := TRUE}
204 {$setc TARGET_CPU_68K := FALSE}
205 {$setc TARGET_CPU_MIPS := FALSE}
206 {$setc TARGET_CPU_SPARC := FALSE}
207 {$setc TARGET_OS_UNIX := FALSE}
208 {$setc TARGET_OS_WIN32 := FALSE}
209 {$setc TARGET_RT_MAC_68881 := FALSE}
210 {$setc TARGET_RT_MAC_CFM := FALSE}
211 {$setc TARGET_RT_MAC_MACHO := TRUE}
212 {$setc TYPED_FUNCTION_POINTERS := TRUE}
213 {$setc TYPE_BOOL := FALSE}
214 {$setc TYPE_EXTENDED := FALSE}
215 {$setc TYPE_LONGLONG := TRUE}
216 uses MacTypes,QuickdrawTypes;
217 {$endc} {not MACOSALLINCLUDE}
218
219
220 {$ifc TARGET_OS_MAC}
221
222 {$ALIGN MAC68K}
223
224 const
225 pmCourteous = 0; {Record use of color on each device touched.}
226 pmDithered = $0001;
227 pmTolerant = $0002; {render ciRGB if ciTolerance is exceeded by best match.}
228 pmAnimated = $0004; {reserve an index on each device touched and render ciRGB.}
229 pmExplicit = $0008; {no reserve, no render, no record; stuff index into port.}
230 pmWhite = $0010;
231 pmBlack = $0020;
232 pmInhibitG2 = $0100;
233 pmInhibitC2 = $0200;
234 pmInhibitG4 = $0400;
235 pmInhibitC4 = $0800;
236 pmInhibitG8 = $1000;
237 pmInhibitC8 = $2000; { NSetPalette Update Constants }
238 pmNoUpdates = $8000; {no updates}
239 pmBkUpdates = $A000; {background updates only}
240 pmFgUpdates = $C000; {foreground updates only}
241 pmAllUpdates = $E000; {all updates}
242
243 type
244 ColorInfo = record
245 ciRGB: RGBColor; {true RGB values}
246 ciUsage: SInt16; {color usage}
247 ciTolerance: SInt16; {tolerance value}
248 ciDataFields: array [0..2] of SInt16; {private fields}
249 end;
250 ColorInfoPtr = ^ColorInfo;
251 type
252 ColorInfoHandle = ^ColorInfoPtr;
253 Palette = record
254 pmEntries: SInt16; {entries in pmTable}
255 pmDataFields: array [0..6] of SInt16; {private fields}
256 pmInfo: array [0..0] of ColorInfo;
257 end;
258 PalettePtr = ^Palette;
259 type
260 PaletteHandle = ^PalettePtr;
261 {$ifc not TARGET_CPU_64}
262 {
263 * InitPalettes() *** DEPRECATED ***
264 *
265 * Availability:
266 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
267 * CarbonLib: in CarbonLib 1.0 and later
268 * Non-Carbon CFM: in InterfaceLib 7.1 and later
269 }
270 procedure InitPalettes; external name '_InitPalettes';
271 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
272
273
274 {
275 * NewPalette() *** DEPRECATED ***
276 *
277 * Availability:
278 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
279 * CarbonLib: in CarbonLib 1.0 and later
280 * Non-Carbon CFM: in InterfaceLib 7.1 and later
281 }
NewPalettenull282 function NewPalette( entries: SInt16; srcColors: CTabHandle; srcUsage: SInt16; srcTolerance: SInt16 ): PaletteHandle; external name '_NewPalette';
283 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
284
285
286 {
287 * GetNewPalette() *** DEPRECATED ***
288 *
289 * Availability:
290 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
291 * CarbonLib: in CarbonLib 1.0 and later
292 * Non-Carbon CFM: in InterfaceLib 7.1 and later
293 }
GetNewPalettenull294 function GetNewPalette( PaletteID: SInt16 ): PaletteHandle; external name '_GetNewPalette';
295 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
296
297
298 {
299 * DisposePalette() *** DEPRECATED ***
300 *
301 * Availability:
302 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
303 * CarbonLib: in CarbonLib 1.0 and later
304 * Non-Carbon CFM: in InterfaceLib 7.1 and later
305 }
306 procedure DisposePalette( srcPalette: PaletteHandle ); external name '_DisposePalette';
307 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
308
309
310 {
311 * ActivatePalette() *** DEPRECATED ***
312 *
313 * Availability:
314 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
315 * CarbonLib: in CarbonLib 1.0 and later
316 * Non-Carbon CFM: in InterfaceLib 7.1 and later
317 }
318 procedure ActivatePalette( srcWindow: WindowRef ); external name '_ActivatePalette';
319 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
320
321
322 {
323 * SetPalette() *** DEPRECATED ***
324 *
325 * Availability:
326 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
327 * CarbonLib: in CarbonLib 1.0 and later
328 * Non-Carbon CFM: in InterfaceLib 7.1 and later
329 }
330 procedure SetPalette( dstWindow: WindowRef; srcPalette: PaletteHandle; cUpdates: Boolean ); external name '_SetPalette';
331 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
332
333
334 {
335 * NSetPalette() *** DEPRECATED ***
336 *
337 * Availability:
338 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
339 * CarbonLib: in CarbonLib 1.0 and later
340 * Non-Carbon CFM: in InterfaceLib 7.1 and later
341 }
342 procedure NSetPalette( dstWindow: WindowRef; srcPalette: PaletteHandle; nCUpdates: SInt16 ); external name '_NSetPalette';
343 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
344
345
346 {
347 * GetPalette() *** DEPRECATED ***
348 *
349 * Availability:
350 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
351 * CarbonLib: in CarbonLib 1.0 and later
352 * Non-Carbon CFM: in InterfaceLib 7.1 and later
353 }
GetPalettenull354 function GetPalette( srcWindow: WindowRef ): PaletteHandle; external name '_GetPalette';
355 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
356
357
358 {
359 * CopyPalette() *** DEPRECATED ***
360 *
361 * Availability:
362 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
363 * CarbonLib: in CarbonLib 1.0 and later
364 * Non-Carbon CFM: in InterfaceLib 7.1 and later
365 }
366 procedure CopyPalette( srcPalette: PaletteHandle; dstPalette: PaletteHandle; srcEntry: SInt16; dstEntry: SInt16; dstLength: SInt16 ); external name '_CopyPalette';
367 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
368
369
370 {
371 * PmForeColor() *** DEPRECATED ***
372 *
373 * Availability:
374 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
375 * CarbonLib: in CarbonLib 1.0 and later
376 * Non-Carbon CFM: in InterfaceLib 7.1 and later
377 }
378 procedure PmForeColor( dstEntry: SInt16 ); external name '_PmForeColor';
379 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
380
381
382 {
383 * PmBackColor() *** DEPRECATED ***
384 *
385 * Availability:
386 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
387 * CarbonLib: in CarbonLib 1.0 and later
388 * Non-Carbon CFM: in InterfaceLib 7.1 and later
389 }
390 procedure PmBackColor( dstEntry: SInt16 ); external name '_PmBackColor';
391 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
392
393
394 {
395 * AnimateEntry() *** DEPRECATED ***
396 *
397 * Availability:
398 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
399 * CarbonLib: in CarbonLib 1.0 and later
400 * Non-Carbon CFM: in InterfaceLib 7.1 and later
401 }
402 procedure AnimateEntry( dstWindow: WindowRef; dstEntry: SInt16; const (*var*) srcRGB: RGBColor ); external name '_AnimateEntry';
403 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
404
405
406 {
407 * [Mac]AnimatePalette() *** DEPRECATED ***
408 *
409 * Availability:
410 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
411 * CarbonLib: in CarbonLib 1.0 and later
412 * Non-Carbon CFM: in InterfaceLib 7.1 and later
413 }
414 procedure MacAnimatePalette( dstWindow: WindowRef; srcCTab: CTabHandle; srcIndex: SInt16; dstEntry: SInt16; dstLength: SInt16 ); external name '_AnimatePalette';
415 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
416 procedure AnimatePalette( dstWindow: WindowRef; srcCTab: CTabHandle; srcIndex: SInt16; dstEntry: SInt16; dstLength: SInt16 ); external name '_AnimatePalette';
417 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
418
419
420 {
421 * GetEntryColor() *** DEPRECATED ***
422 *
423 * Availability:
424 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
425 * CarbonLib: in CarbonLib 1.0 and later
426 * Non-Carbon CFM: in InterfaceLib 7.1 and later
427 }
428 procedure GetEntryColor( srcPalette: PaletteHandle; srcEntry: SInt16; var dstRGB: RGBColor ); external name '_GetEntryColor';
429 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
430
431
432 {
433 * SetEntryColor() *** DEPRECATED ***
434 *
435 * Availability:
436 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
437 * CarbonLib: in CarbonLib 1.0 and later
438 * Non-Carbon CFM: in InterfaceLib 7.1 and later
439 }
440 procedure SetEntryColor( dstPalette: PaletteHandle; dstEntry: SInt16; const (*var*) srcRGB: RGBColor ); external name '_SetEntryColor';
441 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
442
443
444 {
445 * GetEntryUsage() *** DEPRECATED ***
446 *
447 * Availability:
448 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
449 * CarbonLib: in CarbonLib 1.0 and later
450 * Non-Carbon CFM: in InterfaceLib 7.1 and later
451 }
452 procedure GetEntryUsage( srcPalette: PaletteHandle; srcEntry: SInt16; var dstUsage: SInt16; var dstTolerance: SInt16 ); external name '_GetEntryUsage';
453 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
454
455
456 {
457 * SetEntryUsage() *** DEPRECATED ***
458 *
459 * Availability:
460 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
461 * CarbonLib: in CarbonLib 1.0 and later
462 * Non-Carbon CFM: in InterfaceLib 7.1 and later
463 }
464 procedure SetEntryUsage( dstPalette: PaletteHandle; dstEntry: SInt16; srcUsage: SInt16; srcTolerance: SInt16 ); external name '_SetEntryUsage';
465 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
466
467
468 {
469 * CTab2Palette() *** DEPRECATED ***
470 *
471 * Availability:
472 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
473 * CarbonLib: in CarbonLib 1.0 and later
474 * Non-Carbon CFM: in InterfaceLib 7.1 and later
475 }
476 procedure CTab2Palette( srcCTab: CTabHandle; dstPalette: PaletteHandle; srcUsage: SInt16; srcTolerance: SInt16 ); external name '_CTab2Palette';
477 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
478
479
480 {
481 * Palette2CTab() *** DEPRECATED ***
482 *
483 * Availability:
484 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
485 * CarbonLib: in CarbonLib 1.0 and later
486 * Non-Carbon CFM: in InterfaceLib 7.1 and later
487 }
488 procedure Palette2CTab( srcPalette: PaletteHandle; dstCTab: CTabHandle ); external name '_Palette2CTab';
489 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
490
491
492 {
493 * Entry2Index() *** DEPRECATED ***
494 *
495 * Availability:
496 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
497 * CarbonLib: in CarbonLib 1.0 and later
498 * Non-Carbon CFM: in InterfaceLib 7.1 and later
499 }
Entry2Indexnull500 function Entry2Index( entry: SInt16 ): SInt32; external name '_Entry2Index';
501 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
502
503
504 {
505 * RestoreDeviceClut() *** DEPRECATED ***
506 *
507 * Availability:
508 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
509 * CarbonLib: in CarbonLib 1.0 and later
510 * Non-Carbon CFM: in InterfaceLib 7.1 and later
511 }
512 procedure RestoreDeviceClut( gd: GDHandle ); external name '_RestoreDeviceClut';
513 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
514
515
516 {
517 * [Mac]ResizePalette() *** DEPRECATED ***
518 *
519 * Availability:
520 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
521 * CarbonLib: in CarbonLib 1.0 and later
522 * Non-Carbon CFM: in InterfaceLib 7.1 and later
523 }
524 procedure MacResizePalette( p: PaletteHandle; size: SInt16 ); external name '_ResizePalette';
525 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
526 procedure ResizePalette( p: PaletteHandle; size: SInt16 ); external name '_ResizePalette';
527 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
528
529
530 {
531 * SaveFore() *** DEPRECATED ***
532 *
533 * Availability:
534 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
535 * CarbonLib: in CarbonLib 1.0 and later
536 * Non-Carbon CFM: in InterfaceLib 7.1 and later
537 }
538 procedure SaveFore( var c: ColorSpec ); external name '_SaveFore';
539 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
540
541
542 {
543 * SaveBack() *** DEPRECATED ***
544 *
545 * Availability:
546 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
547 * CarbonLib: in CarbonLib 1.0 and later
548 * Non-Carbon CFM: in InterfaceLib 7.1 and later
549 }
550 procedure SaveBack( var c: ColorSpec ); external name '_SaveBack';
551 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
552
553
554 {
555 * RestoreFore() *** DEPRECATED ***
556 *
557 * Availability:
558 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
559 * CarbonLib: in CarbonLib 1.0 and later
560 * Non-Carbon CFM: in InterfaceLib 7.1 and later
561 }
562 procedure RestoreFore( const (*var*) c: ColorSpec ); external name '_RestoreFore';
563 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
564
565
566 {
567 * RestoreBack() *** DEPRECATED ***
568 *
569 * Availability:
570 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
571 * CarbonLib: in CarbonLib 1.0 and later
572 * Non-Carbon CFM: in InterfaceLib 7.1 and later
573 }
574 procedure RestoreBack( const (*var*) c: ColorSpec ); external name '_RestoreBack';
575 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
576
577
578 {
579 * SetDepth() *** DEPRECATED ***
580 *
581 * Availability:
582 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
583 * CarbonLib: in CarbonLib 1.0 and later
584 * Non-Carbon CFM: in InterfaceLib 7.1 and later
585 }
SetDepthnull586 function SetDepth( gd: GDHandle; depth: SInt16; whichFlags: SInt16; flags: SInt16 ): OSErr; external name '_SetDepth';
587 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
588
589
590 {
591 * HasDepth() *** DEPRECATED ***
592 *
593 * Availability:
594 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
595 * CarbonLib: in CarbonLib 1.0 and later
596 * Non-Carbon CFM: in InterfaceLib 7.1 and later
597 }
HasDepthnull598 function HasDepth( gd: GDHandle; depth: SInt16; whichFlags: SInt16; flags: SInt16 ): SInt16; external name '_HasDepth';
599 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
600
601
602 {
603 * PMgrVersion() *** DEPRECATED ***
604 *
605 * Availability:
606 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
607 * CarbonLib: in CarbonLib 1.0 and later
608 * Non-Carbon CFM: in InterfaceLib 7.1 and later
609 }
PMgrVersionnull610 function PMgrVersion: SInt16; external name '_PMgrVersion';
611 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
612
613
614 {
615 * SetPaletteUpdates() *** DEPRECATED ***
616 *
617 * Availability:
618 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
619 * CarbonLib: in CarbonLib 1.0 and later
620 * Non-Carbon CFM: in InterfaceLib 7.1 and later
621 }
622 procedure SetPaletteUpdates( p: PaletteHandle; updates: SInt16 ); external name '_SetPaletteUpdates';
623 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
624
625
626 {
627 * GetPaletteUpdates() *** DEPRECATED ***
628 *
629 * Availability:
630 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
631 * CarbonLib: in CarbonLib 1.0 and later
632 * Non-Carbon CFM: in InterfaceLib 7.1 and later
633 }
GetPaletteUpdatesnull634 function GetPaletteUpdates( p: PaletteHandle ): SInt16; external name '_GetPaletteUpdates';
635 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
636
637
638 {
639 * GetGray() *** DEPRECATED ***
640 *
641 * Availability:
642 * Mac OS X: in version 10.0 and later in ApplicationServices.framework [32-bit only] but deprecated in 10.4
643 * CarbonLib: in CarbonLib 1.0 and later
644 * Non-Carbon CFM: in InterfaceLib 7.1 and later
645 }
GetGraynull646 function GetGray( device: GDHandle; const (*var*) backGround: RGBColor; var foreGround: RGBColor ): Boolean; external name '_GetGray';
647 (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
648
649
650 {$endc} {not TARGET_CPU_64}
651
652
653 {$endc} {TARGET_OS_MAC}
654
655 {$ifc not defined MACOSALLINCLUDE or not MACOSALLINCLUDE}
656
657 end.
658 {$endc} {not MACOSALLINCLUDE}
659