/packages/univint/src/HIComboBox.pas
Pascal | 677 lines | 37 code | 55 blank | 585 comment | 0 complexity | 9bc25af7d891483626a049f81bd4a2fc MD5 | raw file
Possible License(s): LGPL-2.0, LGPL-2.1, LGPL-3.0
1{ 2 File: HIToolbox/HIComboBox.h 3 4 Contains: Definition of the combo box view provided by HIToolbox. 5 6 Version: HIToolbox-624~3 7 8 Copyright: � 2006-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://www.freepascal.org/bugs.html 14 15} 16{ Translation Updated: Jonas Maebe, <jonas@freepascal.org>, October 2009 } 17{ Pascal Translation Updated: Jonas Maebe, <jonas@freepascal.org>, October 2012 } 18{ 19 Modified for use with Free Pascal 20 Version 308 21 Please report any bugs to <gpc@microbizz.nl> 22} 23 24{$ifc not defined MACOSALLINCLUDE or not MACOSALLINCLUDE} 25{$mode macpas} 26{$packenum 1} 27{$macro on} 28{$inline on} 29{$calling mwpascal} 30 31unit HIComboBox; 32interface 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 73{$ifc defined cpu64} 74 {$setc __LP64__ := 1} 75{$elsec} 76 {$setc __LP64__ := 0} 77{$endc} 78 79 80{$ifc defined __ppc__ and __ppc__ and defined __i386__ and __i386__} 81 {$error Conflicting definitions for __ppc__ and __i386__} 82{$endc} 83 84{$ifc defined __ppc__ and __ppc__} 85 {$setc TARGET_CPU_PPC := TRUE} 86 {$setc TARGET_CPU_PPC64 := FALSE} 87 {$setc TARGET_CPU_X86 := FALSE} 88 {$setc TARGET_CPU_X86_64 := FALSE} 89 {$setc TARGET_CPU_ARM := FALSE} 90 {$setc TARGET_OS_MAC := TRUE} 91 {$setc TARGET_OS_IPHONE := FALSE} 92 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 93 {$setc TARGET_OS_EMBEDDED := FALSE} 94{$elifc defined __ppc64__ and __ppc64__} 95 {$setc TARGET_CPU_PPC := FALSE} 96 {$setc TARGET_CPU_PPC64 := TRUE} 97 {$setc TARGET_CPU_X86 := FALSE} 98 {$setc TARGET_CPU_X86_64 := FALSE} 99 {$setc TARGET_CPU_ARM := FALSE} 100 {$setc TARGET_OS_MAC := TRUE} 101 {$setc TARGET_OS_IPHONE := FALSE} 102 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 103 {$setc TARGET_OS_EMBEDDED := FALSE} 104{$elifc defined __i386__ and __i386__} 105 {$setc TARGET_CPU_PPC := FALSE} 106 {$setc TARGET_CPU_PPC64 := FALSE} 107 {$setc TARGET_CPU_X86 := TRUE} 108 {$setc TARGET_CPU_X86_64 := FALSE} 109 {$setc TARGET_CPU_ARM := FALSE} 110{$ifc defined(iphonesim)} 111 {$setc TARGET_OS_MAC := FALSE} 112 {$setc TARGET_OS_IPHONE := TRUE} 113 {$setc TARGET_IPHONE_SIMULATOR := TRUE} 114{$elsec} 115 {$setc TARGET_OS_MAC := TRUE} 116 {$setc TARGET_OS_IPHONE := FALSE} 117 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 118{$endc} 119 {$setc TARGET_OS_EMBEDDED := FALSE} 120{$elifc defined __x86_64__ and __x86_64__} 121 {$setc TARGET_CPU_PPC := FALSE} 122 {$setc TARGET_CPU_PPC64 := FALSE} 123 {$setc TARGET_CPU_X86 := FALSE} 124 {$setc TARGET_CPU_X86_64 := TRUE} 125 {$setc TARGET_CPU_ARM := FALSE} 126 {$setc TARGET_OS_MAC := TRUE} 127 {$setc TARGET_OS_IPHONE := FALSE} 128 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 129 {$setc TARGET_OS_EMBEDDED := FALSE} 130{$elifc defined __arm__ and __arm__} 131 {$setc TARGET_CPU_PPC := FALSE} 132 {$setc TARGET_CPU_PPC64 := FALSE} 133 {$setc TARGET_CPU_X86 := FALSE} 134 {$setc TARGET_CPU_X86_64 := FALSE} 135 {$setc TARGET_CPU_ARM := TRUE} 136 { will require compiler define when/if other Apple devices with ARM cpus ship } 137 {$setc TARGET_OS_MAC := FALSE} 138 {$setc TARGET_OS_IPHONE := TRUE} 139 {$setc TARGET_IPHONE_SIMULATOR := FALSE} 140 {$setc TARGET_OS_EMBEDDED := TRUE} 141{$elsec} 142 {$error __ppc__ nor __ppc64__ nor __i386__ nor __x86_64__ nor __arm__ is defined.} 143{$endc} 144 145{$ifc defined __LP64__ and __LP64__ } 146 {$setc TARGET_CPU_64 := TRUE} 147{$elsec} 148 {$setc TARGET_CPU_64 := FALSE} 149{$endc} 150 151{$ifc defined FPC_BIG_ENDIAN} 152 {$setc TARGET_RT_BIG_ENDIAN := TRUE} 153 {$setc TARGET_RT_LITTLE_ENDIAN := FALSE} 154{$elifc defined FPC_LITTLE_ENDIAN} 155 {$setc TARGET_RT_BIG_ENDIAN := FALSE} 156 {$setc TARGET_RT_LITTLE_ENDIAN := TRUE} 157{$elsec} 158 {$error Neither FPC_BIG_ENDIAN nor FPC_LITTLE_ENDIAN are defined.} 159{$endc} 160{$setc ACCESSOR_CALLS_ARE_FUNCTIONS := TRUE} 161{$setc CALL_NOT_IN_CARBON := FALSE} 162{$setc OLDROUTINENAMES := FALSE} 163{$setc OPAQUE_TOOLBOX_STRUCTS := TRUE} 164{$setc OPAQUE_UPP_TYPES := TRUE} 165{$setc OTCARBONAPPLICATION := TRUE} 166{$setc OTKERNEL := FALSE} 167{$setc PM_USE_SESSION_APIS := TRUE} 168{$setc TARGET_API_MAC_CARBON := TRUE} 169{$setc TARGET_API_MAC_OS8 := FALSE} 170{$setc TARGET_API_MAC_OSX := TRUE} 171{$setc TARGET_CARBON := TRUE} 172{$setc TARGET_CPU_68K := FALSE} 173{$setc TARGET_CPU_MIPS := FALSE} 174{$setc TARGET_CPU_SPARC := FALSE} 175{$setc TARGET_OS_UNIX := FALSE} 176{$setc TARGET_OS_WIN32 := FALSE} 177{$setc TARGET_RT_MAC_68881 := FALSE} 178{$setc TARGET_RT_MAC_CFM := FALSE} 179{$setc TARGET_RT_MAC_MACHO := TRUE} 180{$setc TYPED_FUNCTION_POINTERS := TRUE} 181{$setc TYPE_BOOL := FALSE} 182{$setc TYPE_EXTENDED := FALSE} 183{$setc TYPE_LONGLONG := TRUE} 184uses MacTypes,Appearance,CarbonEvents,Controls,CFBase,CFArray,HIGeometry,HIObject,HIView; 185{$endc} {not MACOSALLINCLUDE} 186 187 188{$ifc TARGET_OS_MAC} 189 190{$ALIGN POWER} 191 192 193{ 194 * HIComboBox.h 195 * 196 * Discussion: 197 * API definitions for the combo box view. 198 } 199{==============================================================================} 200{ HIComboBox } 201{ The combo box is a new view starting in Mac OS 10.2. It can be used in } 202{ both the new compositing mode, as well as the traditional Control Manager } 203{ mode. Like all new HIFoo views, this view is created invisible. You must } 204{ show the view after creation if you want to, like, see it and stuff. } 205{==============================================================================} 206{ The HIObject class ID for the HIComboBox class. } 207{$ifc USE_CFSTR_CONSTANT_MACROS} 208{$definec kHIComboBoxClassID CFSTRP('com.apple.HIComboBox')} 209{$endc} 210{ 211 kEventClassHIComboBox quick reference: 212 213 kEventComboBoxListItemSelected = 1 214} 215const 216 kEventClassHIComboBox = FourCharCode('hicb'); 217 218const 219 kEventParamComboBoxListSelectedItemIndex = FourCharCode('cbli'); 220 221{ 222 * kEventClassHIComboBox / kEventComboBoxListItemSelected 223 * 224 * Summary: 225 * Notification that an item in the ComboBox disclosure list has 226 * been selected. 227 * 228 * Discussion: 229 * This event is sent as a notification when an item in the ComboBox 230 * disclosure list has been selected. This event is sent to all 231 * handlers installed on the view. This does not imply that the 232 * selection has been accepted; for that you will need to register 233 * for the kEventClassTextField/kEventTextAccepted event; you can 234 * register for that event in order to make live selections however. 235 * 236 * Mac OS X threading: 237 * Not thread safe 238 * 239 * Parameters: 240 * 241 * --> kEventParamDirectObject (in, typeControlRef) 242 * The ComboBox view that has sent the notification. 243 * 244 * --> kEventParamComboBoxListSelectedItemIndex (in, typeCFIndex) 245 * The index of the combo box list item that has been selected. 246 * 247 * Availability: 248 * Mac OS X: in version 10.4 and later in Carbon.framework 249 * CarbonLib: not available 250 } 251const 252 kEventComboBoxListItemSelected = 1; 253 254 255{ 256 * Summary: 257 * ComboBox attributes 258 } 259const 260{ 261 * A constant with value zero; the lack of any attributes. 262 } 263 kHIComboBoxNoAttributes = 0; 264 265 { 266 * The view will attempt to auto complete the text the user is typing 267 * with an item in the ComboBox list that is the closest appropriate 268 * match. 269 } 270 kHIComboBoxAutoCompletionAttribute = 1 shl 0; 271 272 { 273 * The view will disclose the ComboBox list after the user enters 274 * text. 275 } 276 kHIComboBoxAutoDisclosureAttribute = 1 shl 1; 277 278 { 279 * The items in the ComboBox list will be automatically sorted in 280 * alphabetical order. 281 } 282 kHIComboBoxAutoSortAttribute = 1 shl 2; 283 284 { 285 * The ComboBox list will be automatically sized to fit the Human 286 * Interface Guidelines. 287 } 288 kHIComboBoxAutoSizeListAttribute = 1 shl 3; 289 290 { 291 * The minimum set of ComboBox attributes commonly used. 292 } 293 kHIComboBoxStandardAttributes = kHIComboBoxAutoCompletionAttribute or kHIComboBoxAutoDisclosureAttribute or kHIComboBoxAutoSizeListAttribute; 294 295{ ControlKind} 296const 297 kControlKindHIComboBox = FourCharCode('cbbx'); 298 299{ ComboBox Part codes} 300const 301 kHIComboBoxEditTextPart = 5; 302 kHIComboBoxDisclosurePart = 28; 303 304{ 305 The ComboBox view supports these tags previously defined for the EditUnicodeText view. 306 These tags are available through Get/SetControlData with a ControlPartCode of kHIComboBoxEditTextPart: 307 308 kControlFontStyleTag 309 kControlEditTextFixedTextTag 310 kControlEditTextTextTag 311 kControlEditTextKeyFilterTag 312 kControlEditTextValidationProcTag 313 kControlEditUnicodeTextPostUpdateProcTag 314 kControlEditTextSelectionTag 315 kControlEditTextKeyScriptBehaviorTag 316 kControlEditTextCharCount 317 kControlEditTextCFStringTag 318} 319 320{ 321 * Discussion: 322 * ComboBox ControlData tags available with Mac OS X 10.2 and later. 323 } 324const 325{ 326 * Extract the contents of the ComboBox list as a CFArray. The 327 * CFArray will be retained: if you get the array, you own it and 328 * will be required to release it; if you set it the toolbox makes a 329 * copy of it and you are free to release your reference. 330 } 331 kHIComboBoxListTag = FourCharCode('cbls'); { CFArrayRef; bumps the refCount on get/retains on set} 332 333 { 334 * The width of the ComboBox list. This can be customized. This 335 * disables the autosize attribute. 336 } 337 kHIComboBoxListPixelWidthTag = FourCharCode('cblw'); { UInt32 } 338 339 { 340 * The height of the ComboBox list. This can be customized. This 341 * disables the autosize attribute. 342 } 343 kHIComboBoxListPixelHeightTag = FourCharCode('cblh'); { UInt32} 344 345 { 346 * The number of visible items in the list. This can be customized. 347 * This disables the autosize attribute. 348 } 349 kHIComboBoxNumVisibleItemsTag = FourCharCode('cbni'); { UInt32} 350 351{$ifc not TARGET_CPU_64} 352{ 353 * HIComboBoxCreate() 354 * 355 * Summary: 356 * Creates a combo box view. The new view is initially invisible. 357 * 358 * Mac OS X threading: 359 * Not thread safe 360 * 361 * Parameters: 362 * 363 * boundsRect: 364 * The bounding box of the view. 365 * 366 * text: 367 * The default text in the editable portion of the view. Can be 368 * NULL. 369 * 370 * style: 371 * The font style of the both editable text and the text in the 372 * disclosure list. Can be NULL. 373 * 374 * list: 375 * The default values available in the disclosure list. Can be 376 * NULL. 377 * 378 * inAttributes: 379 * The default attributes of the combo box. 380 * 381 * outComboBox: 382 * On exit, contains the new view. 383 * 384 * Availability: 385 * Mac OS X: in version 10.2 and later in Carbon.framework [32-bit only] 386 * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later 387 * Non-Carbon CFM: not available 388 } 389function HIComboBoxCreate( const (*var*) boundsRect: HIRect; text: CFStringRef { can be NULL }; {const} style: ControlFontStyleRecPtr { can be NULL }; list: CFArrayRef { can be NULL }; inAttributes: OptionBits; var outComboBox: HIViewRef ): OSStatus; external name '_HIComboBoxCreate'; 390(* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *) 391 392 393{ 394 * HIComboBoxGetItemCount() 395 * 396 * Summary: 397 * Get the number of items in the combo box disclosure list. 398 * 399 * Mac OS X threading: 400 * Not thread safe 401 * 402 * Parameters: 403 * 404 * inComboBox: 405 * The combo box. 406 * 407 * Result: 408 * The number of items in the combo box disclosure list. 409 * 410 * Availability: 411 * Mac OS X: in version 10.2 and later in Carbon.framework [32-bit only] 412 * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later 413 * Non-Carbon CFM: not available 414 } 415function HIComboBoxGetItemCount( inComboBox: HIViewRef ): ItemCount; external name '_HIComboBoxGetItemCount'; 416(* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *) 417 418 419{ 420 * HIComboBoxInsertTextItemAtIndex() 421 * 422 * Summary: 423 * Inserts a CFString in the disclosure list 424 * 425 * Mac OS X threading: 426 * Not thread safe 427 * 428 * Parameters: 429 * 430 * inComboBox: 431 * The combo box whose disclosure list the text will be inserted 432 * in. 433 * 434 * inIndex: 435 * The index that the text should be inserted in. If the index 436 * does not fall within the number of items in the combo box list, 437 * it will be appended to the end of the list. 438 * 439 * inText: 440 * The text item to be inserted in the combo box disclosure list. 441 * 442 * Result: 443 * An operating system status code. 444 * 445 * Availability: 446 * Mac OS X: in version 10.2 and later in Carbon.framework [32-bit only] 447 * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later 448 * Non-Carbon CFM: not available 449 } 450function HIComboBoxInsertTextItemAtIndex( inComboBox: HIViewRef; inIndex: CFIndex; inText: CFStringRef ): OSStatus; external name '_HIComboBoxInsertTextItemAtIndex'; 451(* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *) 452 453 454{ 455 * HIComboBoxAppendTextItem() 456 * 457 * Summary: 458 * Appends a text item to the combo box disclosure list. 459 * 460 * Mac OS X threading: 461 * Not thread safe 462 * 463 * Parameters: 464 * 465 * inComboBox: 466 * The combo box whose disclosure list the text will be appended 467 * to. 468 * 469 * inText: 470 * The text item to be appended to the combo box disclosure list. 471 * 472 * outIndex: 473 * On exit, the index of the new item. Can be NULL if the caller 474 * does not require this information. 475 * 476 * Result: 477 * An operating system status code. 478 * 479 * Availability: 480 * Mac OS X: in version 10.2 and later in Carbon.framework [32-bit only] 481 * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later 482 * Non-Carbon CFM: not available 483 } 484function HIComboBoxAppendTextItem( inComboBox: HIViewRef; inText: CFStringRef; outIndex: CFIndexPtr { can be NULL } ): OSStatus; external name '_HIComboBoxAppendTextItem'; 485(* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *) 486 487 488{ 489 * HIComboBoxCopyTextItemAtIndex() 490 * 491 * Summary: 492 * Copy the text from the combo box disclosure list 493 * 494 * Mac OS X threading: 495 * Not thread safe 496 * 497 * Parameters: 498 * 499 * inComboBox: 500 * The combo box that contains the text item you would like to 501 * copy. 502 * 503 * inIndex: 504 * The index of the text item. Will return paramErr if the index 505 * is out of bounds of the combo box list. 506 * 507 * outString: 508 * A copy of the string at the given index. Remember this is now 509 * your copy that you will need to release. 510 * 511 * Result: 512 * An operating system status code. 513 * 514 * Availability: 515 * Mac OS X: in version 10.2 and later in Carbon.framework [32-bit only] 516 * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later 517 * Non-Carbon CFM: not available 518 } 519function HIComboBoxCopyTextItemAtIndex( inComboBox: HIViewRef; inIndex: CFIndex; var outString: CFStringRef ): OSStatus; external name '_HIComboBoxCopyTextItemAtIndex'; 520(* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *) 521 522 523{ 524 * HIComboBoxRemoveItemAtIndex() 525 * 526 * Summary: 527 * Remove an item from a combo box disclosure list. 528 * 529 * Mac OS X threading: 530 * Not thread safe 531 * 532 * Parameters: 533 * 534 * inComboBox: 535 * The combo box that contains the disclosure list that you would 536 * like to remove an item from. 537 * 538 * inIndex: 539 * The index of the item to remove. 540 * 541 * Result: 542 * An operating system status code. 543 * 544 * Availability: 545 * Mac OS X: in version 10.2 and later in Carbon.framework [32-bit only] 546 * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later 547 * Non-Carbon CFM: not available 548 } 549function HIComboBoxRemoveItemAtIndex( inComboBox: HIViewRef; inIndex: CFIndex ): OSStatus; external name '_HIComboBoxRemoveItemAtIndex'; 550(* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *) 551 552 553{ 554 * HIComboBoxChangeAttributes() 555 * 556 * Summary: 557 * Change the attributes of a combo box 558 * 559 * Mac OS X threading: 560 * Not thread safe 561 * 562 * Parameters: 563 * 564 * inComboBox: 565 * The combo box whose attributes you would like to change. 566 * 567 * inAttributesToSet: 568 * The attributes to set. 569 * 570 * inAttributesToClear: 571 * The attributes to clear. 572 * 573 * Result: 574 * An operating system status code. 575 * 576 * Availability: 577 * Mac OS X: in version 10.2 and later in Carbon.framework [32-bit only] 578 * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later 579 * Non-Carbon CFM: not available 580 } 581function HIComboBoxChangeAttributes( inComboBox: HIViewRef; inAttributesToSet: OptionBits; inAttributesToClear: OptionBits ): OSStatus; external name '_HIComboBoxChangeAttributes'; 582(* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *) 583 584 585{ 586 * HIComboBoxGetAttributes() 587 * 588 * Summary: 589 * Get the attributes of a combo box. 590 * 591 * Mac OS X threading: 592 * Not thread safe 593 * 594 * Parameters: 595 * 596 * inComboBox: 597 * The combo box whose attributes you would like to obtain. 598 * 599 * outAttributes: 600 * The attributes of the combo box. 601 * 602 * Result: 603 * An operating system status code. 604 * 605 * Availability: 606 * Mac OS X: in version 10.2 and later in Carbon.framework [32-bit only] 607 * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later 608 * Non-Carbon CFM: not available 609 } 610function HIComboBoxGetAttributes( inComboBox: HIViewRef; var outAttributes: OptionBits ): OSStatus; external name '_HIComboBoxGetAttributes'; 611(* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *) 612 613 614{ 615 * HIComboBoxIsListVisible() 616 * 617 * Summary: 618 * Returns whether the combo box list is currently disclosed. 619 * 620 * Mac OS X threading: 621 * Not thread safe 622 * 623 * Parameters: 624 * 625 * inComboBox: 626 * The combo box whose list visibility you would like to obtain. 627 * 628 * Result: 629 * A boolean value indicating whether the combo box list is 630 * disclosed (true) or hidden (false). 631 * 632 * Availability: 633 * Mac OS X: in version 10.4 and later in Carbon.framework [32-bit only] 634 * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.4 and later 635 * Non-Carbon CFM: not available 636 } 637function HIComboBoxIsListVisible( inComboBox: HIViewRef ): Boolean; external name '_HIComboBoxIsListVisible'; 638(* AVAILABLE_MAC_OS_X_VERSION_10_4_AND_LATER *) 639 640 641{ 642 * HIComboBoxSetListVisible() 643 * 644 * Summary: 645 * Hides or shows the combo box list. 646 * 647 * Mac OS X threading: 648 * Not thread safe 649 * 650 * Parameters: 651 * 652 * inComboBox: 653 * The combo box whose list will be hidden or shown. 654 * 655 * inVisible: 656 * A boolean value indicating whether you wish to hide the list 657 * (false) or show the list (true). 658 * 659 * Result: 660 * An operating system result code. 661 * 662 * Availability: 663 * Mac OS X: in version 10.4 and later in Carbon.framework [32-bit only] 664 * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.4 and later 665 * Non-Carbon CFM: not available 666 } 667function HIComboBoxSetListVisible( inComboBox: HIViewRef; inVisible: Boolean ): OSStatus; external name '_HIComboBoxSetListVisible'; 668(* AVAILABLE_MAC_OS_X_VERSION_10_4_AND_LATER *) 669 670 671{$endc} {not TARGET_CPU_64} 672 673{$endc} {TARGET_OS_MAC} 674{$ifc not defined MACOSALLINCLUDE or not MACOSALLINCLUDE} 675 676end. 677{$endc} {not MACOSALLINCLUDE}