Lists.pas 45 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360
  1. {
  2. File: HIToolbox/Lists.h
  3. Contains: List Manager Interfaces.
  4. Version: HIToolbox-624~3
  5. Copyright: © 1985-2008 by Apple Computer, Inc., all rights reserved
  6. Bugs?: For bug reports, consult the following page on
  7. the World Wide Web:
  8. http://bugs.freepascal.org
  9. }
  10. { Pascal Translation Updated: Peter N Lewis, <[email protected]>, August 2005 }
  11. { Pascal Translation Updated: Jonas Maebe, <[email protected]>, October 2009 }
  12. { Pascal Translation Updated: Jonas Maebe, <[email protected]>, October 2012 }
  13. {
  14. Modified for use with Free Pascal
  15. Version 308
  16. Please report any bugs to <[email protected]>
  17. }
  18. {$ifc not defined MACOSALLINCLUDE or not MACOSALLINCLUDE}
  19. {$mode macpas}
  20. {$modeswitch cblocks}
  21. {$packenum 1}
  22. {$macro on}
  23. {$inline on}
  24. {$calling mwpascal}
  25. {$IFNDEF FPC_DOTTEDUNITS}
  26. unit Lists;
  27. {$ENDIF FPC_DOTTEDUNITS}
  28. interface
  29. {$setc UNIVERSAL_INTERFACES_VERSION := $0400}
  30. {$setc GAP_INTERFACES_VERSION := $0308}
  31. {$ifc not defined USE_CFSTR_CONSTANT_MACROS}
  32. {$setc USE_CFSTR_CONSTANT_MACROS := TRUE}
  33. {$endc}
  34. {$ifc defined CPUPOWERPC and defined CPUI386}
  35. {$error Conflicting initial definitions for CPUPOWERPC and CPUI386}
  36. {$endc}
  37. {$ifc defined FPC_BIG_ENDIAN and defined FPC_LITTLE_ENDIAN}
  38. {$error Conflicting initial definitions for FPC_BIG_ENDIAN and FPC_LITTLE_ENDIAN}
  39. {$endc}
  40. {$ifc not defined __ppc__ and defined CPUPOWERPC32}
  41. {$setc __ppc__ := 1}
  42. {$elsec}
  43. {$setc __ppc__ := 0}
  44. {$endc}
  45. {$ifc not defined __ppc64__ and defined CPUPOWERPC64}
  46. {$setc __ppc64__ := 1}
  47. {$elsec}
  48. {$setc __ppc64__ := 0}
  49. {$endc}
  50. {$ifc not defined __i386__ and defined CPUI386}
  51. {$setc __i386__ := 1}
  52. {$elsec}
  53. {$setc __i386__ := 0}
  54. {$endc}
  55. {$ifc not defined __x86_64__ and defined CPUX86_64}
  56. {$setc __x86_64__ := 1}
  57. {$elsec}
  58. {$setc __x86_64__ := 0}
  59. {$endc}
  60. {$ifc not defined __arm__ and defined CPUARM}
  61. {$setc __arm__ := 1}
  62. {$elsec}
  63. {$setc __arm__ := 0}
  64. {$endc}
  65. {$ifc not defined __arm64__ and defined CPUAARCH64}
  66. {$setc __arm64__ := 1}
  67. {$elsec}
  68. {$setc __arm64__ := 0}
  69. {$endc}
  70. {$ifc defined cpu64}
  71. {$setc __LP64__ := 1}
  72. {$elsec}
  73. {$setc __LP64__ := 0}
  74. {$endc}
  75. {$ifc defined __ppc__ and __ppc__ and defined __i386__ and __i386__}
  76. {$error Conflicting definitions for __ppc__ and __i386__}
  77. {$endc}
  78. {$ifc defined __ppc__ and __ppc__}
  79. {$setc TARGET_CPU_PPC := TRUE}
  80. {$setc TARGET_CPU_PPC64 := FALSE}
  81. {$setc TARGET_CPU_X86 := FALSE}
  82. {$setc TARGET_CPU_X86_64 := FALSE}
  83. {$setc TARGET_CPU_ARM := FALSE}
  84. {$setc TARGET_CPU_ARM64 := FALSE}
  85. {$setc TARGET_OS_MAC := TRUE}
  86. {$setc TARGET_OS_IPHONE := FALSE}
  87. {$setc TARGET_IPHONE_SIMULATOR := FALSE}
  88. {$setc TARGET_OS_EMBEDDED := FALSE}
  89. {$elifc defined __ppc64__ and __ppc64__}
  90. {$setc TARGET_CPU_PPC := FALSE}
  91. {$setc TARGET_CPU_PPC64 := TRUE}
  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 __i386__ and __i386__}
  101. {$setc TARGET_CPU_PPC := FALSE}
  102. {$setc TARGET_CPU_PPC64 := FALSE}
  103. {$setc TARGET_CPU_X86 := TRUE}
  104. {$setc TARGET_CPU_X86_64 := FALSE}
  105. {$setc TARGET_CPU_ARM := FALSE}
  106. {$setc TARGET_CPU_ARM64 := FALSE}
  107. {$ifc defined iphonesim}
  108. {$setc TARGET_OS_MAC := FALSE}
  109. {$setc TARGET_OS_IPHONE := TRUE}
  110. {$setc TARGET_IPHONE_SIMULATOR := TRUE}
  111. {$elsec}
  112. {$setc TARGET_OS_MAC := TRUE}
  113. {$setc TARGET_OS_IPHONE := FALSE}
  114. {$setc TARGET_IPHONE_SIMULATOR := FALSE}
  115. {$endc}
  116. {$setc TARGET_OS_EMBEDDED := FALSE}
  117. {$elifc defined __x86_64__ and __x86_64__}
  118. {$setc TARGET_CPU_PPC := FALSE}
  119. {$setc TARGET_CPU_PPC64 := FALSE}
  120. {$setc TARGET_CPU_X86 := FALSE}
  121. {$setc TARGET_CPU_X86_64 := TRUE}
  122. {$setc TARGET_CPU_ARM := FALSE}
  123. {$setc TARGET_CPU_ARM64 := FALSE}
  124. {$ifc defined iphonesim}
  125. {$setc TARGET_OS_MAC := FALSE}
  126. {$setc TARGET_OS_IPHONE := TRUE}
  127. {$setc TARGET_IPHONE_SIMULATOR := TRUE}
  128. {$elsec}
  129. {$setc TARGET_OS_MAC := TRUE}
  130. {$setc TARGET_OS_IPHONE := FALSE}
  131. {$setc TARGET_IPHONE_SIMULATOR := FALSE}
  132. {$endc}
  133. {$setc TARGET_OS_EMBEDDED := FALSE}
  134. {$elifc defined __arm__ and __arm__}
  135. {$setc TARGET_CPU_PPC := FALSE}
  136. {$setc TARGET_CPU_PPC64 := FALSE}
  137. {$setc TARGET_CPU_X86 := FALSE}
  138. {$setc TARGET_CPU_X86_64 := FALSE}
  139. {$setc TARGET_CPU_ARM := TRUE}
  140. {$setc TARGET_CPU_ARM64 := FALSE}
  141. {$setc TARGET_OS_MAC := FALSE}
  142. {$setc TARGET_OS_IPHONE := TRUE}
  143. {$setc TARGET_IPHONE_SIMULATOR := FALSE}
  144. {$setc TARGET_OS_EMBEDDED := TRUE}
  145. {$elifc defined __arm64__ and __arm64__}
  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 := FALSE}
  151. {$setc TARGET_CPU_ARM64 := TRUE}
  152. {$ifc defined ios}
  153. {$setc TARGET_OS_MAC := FALSE}
  154. {$setc TARGET_OS_IPHONE := TRUE}
  155. {$setc TARGET_OS_EMBEDDED := TRUE}
  156. {$elsec}
  157. {$setc TARGET_OS_MAC := TRUE}
  158. {$setc TARGET_OS_IPHONE := FALSE}
  159. {$setc TARGET_OS_EMBEDDED := FALSE}
  160. {$endc}
  161. {$setc TARGET_IPHONE_SIMULATOR := FALSE}
  162. {$elsec}
  163. {$error __ppc__ nor __ppc64__ nor __i386__ nor __x86_64__ nor __arm__ nor __arm64__ is defined.}
  164. {$endc}
  165. {$ifc defined __LP64__ and __LP64__ }
  166. {$setc TARGET_CPU_64 := TRUE}
  167. {$elsec}
  168. {$setc TARGET_CPU_64 := FALSE}
  169. {$endc}
  170. {$ifc defined FPC_BIG_ENDIAN}
  171. {$setc TARGET_RT_BIG_ENDIAN := TRUE}
  172. {$setc TARGET_RT_LITTLE_ENDIAN := FALSE}
  173. {$elifc defined FPC_LITTLE_ENDIAN}
  174. {$setc TARGET_RT_BIG_ENDIAN := FALSE}
  175. {$setc TARGET_RT_LITTLE_ENDIAN := TRUE}
  176. {$elsec}
  177. {$error Neither FPC_BIG_ENDIAN nor FPC_LITTLE_ENDIAN are defined.}
  178. {$endc}
  179. {$setc ACCESSOR_CALLS_ARE_FUNCTIONS := TRUE}
  180. {$setc CALL_NOT_IN_CARBON := FALSE}
  181. {$setc OLDROUTINENAMES := FALSE}
  182. {$setc OPAQUE_TOOLBOX_STRUCTS := TRUE}
  183. {$setc OPAQUE_UPP_TYPES := TRUE}
  184. {$setc OTCARBONAPPLICATION := TRUE}
  185. {$setc OTKERNEL := FALSE}
  186. {$setc PM_USE_SESSION_APIS := TRUE}
  187. {$setc TARGET_API_MAC_CARBON := TRUE}
  188. {$setc TARGET_API_MAC_OS8 := FALSE}
  189. {$setc TARGET_API_MAC_OSX := TRUE}
  190. {$setc TARGET_CARBON := TRUE}
  191. {$setc TARGET_CPU_68K := FALSE}
  192. {$setc TARGET_CPU_MIPS := FALSE}
  193. {$setc TARGET_CPU_SPARC := FALSE}
  194. {$setc TARGET_OS_UNIX := FALSE}
  195. {$setc TARGET_OS_WIN32 := FALSE}
  196. {$setc TARGET_RT_MAC_68881 := FALSE}
  197. {$setc TARGET_RT_MAC_CFM := FALSE}
  198. {$setc TARGET_RT_MAC_MACHO := TRUE}
  199. {$setc TYPED_FUNCTION_POINTERS := TRUE}
  200. {$setc TYPE_BOOL := FALSE}
  201. {$setc TYPE_EXTENDED := FALSE}
  202. {$setc TYPE_LONGLONG := TRUE}
  203. {$IFDEF FPC_DOTTEDUNITS}
  204. uses MacOsApi.MacTypes,MacOsApi.Events,MacOsApi.QuickdrawTypes,MacOsApi.Controls,MacOsApi.HIObject;
  205. {$ELSE FPC_DOTTEDUNITS}
  206. uses MacTypes,Events,QuickdrawTypes,Controls,HIObject;
  207. {$ENDIF FPC_DOTTEDUNITS}
  208. {$endc} {not MACOSALLINCLUDE}
  209. {$ifc TARGET_OS_MAC}
  210. {$ALIGN MAC68K}
  211. {
  212. * List Manager
  213. *
  214. * Discussion:
  215. * The List Manager is deprecated in Mac OS X 10.5 and later, and is
  216. * not included in the 64-bit version of HIToolbox. Applications
  217. * should use the Data Browser instead of the List Manager.
  218. }
  219. type
  220. Cell = Point;
  221. CellPtr = ^Cell;
  222. type
  223. ListBounds = Rect;
  224. ListBoundsPtr = ^ListBounds;
  225. DataArray = packed array [0..32000] of AnsiChar;
  226. type
  227. DataPtr = ^DataArray;
  228. DataHandle = ^DataPtr;
  229. ListSearchProcPtr = function( aPtr: Ptr; bPtr: Ptr; aLen: SInt16; bLen: SInt16 ): SInt16;
  230. ListClickLoopProcPtr = function: Boolean;
  231. ListSearchUPP = ListSearchProcPtr;
  232. ListClickLoopUPP = ListClickLoopProcPtr;
  233. ListRecPtr = ^ListRec;
  234. ListRec = record
  235. rView: Rect; { in Carbon use Get/SetListViewBounds}
  236. port: GrafPtr; { in Carbon use Get/SetListPort}
  237. indent: Point; { in Carbon use Get/SetListCellIndent}
  238. cellSize: Point; { in Carbon use Get/SetListCellSize}
  239. visible: ListBounds; { in Carbon use GetListVisibleCells}
  240. vScroll: ControlRef; { in Carbon use GetListVerticalScrollBar}
  241. hScroll: ControlRef; { in Carbon use GetListHorizontalScrollBar}
  242. selFlags: SInt8; { in Carbon use Get/SetListSelectionFlags}
  243. lActive: Boolean; { in Carbon use LActivate, GetListActive}
  244. lReserved: SInt8; { not supported in Carbon }
  245. listFlags: SInt8; { in Carbon use Get/SetListFlags }
  246. clikTime: SIGNEDLONG; { in Carbon use Get/SetListClickTime}
  247. clikLoc: Point; { in Carbon use GetListClickLocation}
  248. mouseLoc: Point; { in Carbon use GetListMouseLocation}
  249. lClickLoop: ListClickLoopUPP; { in Carbon use Get/SetListClickLoop}
  250. lastClick: Cell; { in Carbon use SetListLastClick}
  251. refCon: SIGNEDLONG; { in Carbon use Get/SetListRefCon}
  252. listDefProc: Handle; { not supported in Carbon }
  253. userHandle: Handle; { in Carbon use Get/SetListUserHandle}
  254. dataBounds: ListBounds; { in Carbon use GetListDataBounds}
  255. cells: DataHandle; { in Carbon use LGet/SetCell}
  256. maxIndex: SInt16; { in Carbon use LGet/SetCell}
  257. cellArray: array [0..0] of SInt16; { in Carbon use LGet/SetCell}
  258. end;
  259. type
  260. ListPtr = ListRecPtr;
  261. type
  262. ListHandle = ^ListPtr;
  263. { ListRef is obsolete. Use ListHandle. }
  264. type
  265. ListRef = ListHandle;
  266. const
  267. { ListRec.listFlags bits}
  268. lDrawingModeOffBit = 3;
  269. lDoVAutoscrollBit = 1;
  270. lDoHAutoscrollBit = 0;
  271. const
  272. { ListRec.listFlags masks}
  273. lDrawingModeOff = 8;
  274. lDoVAutoscroll = 2;
  275. lDoHAutoscroll = 1;
  276. const
  277. { ListRec.selFlags bits}
  278. lOnlyOneBit = 7;
  279. lExtendDragBit = 6;
  280. lNoDisjointBit = 5;
  281. lNoExtendBit = 4;
  282. lNoRectBit = 3;
  283. lUseSenseBit = 2;
  284. lNoNilHiliteBit = 1;
  285. const
  286. { ListRec.selFlags masks}
  287. lOnlyOne = $FFFFFF80; {-128}
  288. lExtendDrag = 64;
  289. lNoDisjoint = 32;
  290. lNoExtend = 16;
  291. lNoRect = 8;
  292. lUseSense = 4;
  293. lNoNilHilite = 2;
  294. const
  295. { LDEF messages}
  296. lInitMsg = 0;
  297. lDrawMsg = 1;
  298. lHiliteMsg = 2;
  299. lCloseMsg = 3;
  300. {
  301. StandardIconListCellDataRec is the cell data format for
  302. use with the standard icon list (kListDefStandardIconType).
  303. }
  304. type
  305. StandardIconListCellDataRec = record
  306. iconHandle: Handle;
  307. font: SInt16;
  308. face: SInt16;
  309. size: SInt16;
  310. name: Str255;
  311. end;
  312. StandardIconListCellDataPtr = ^StandardIconListCellDataRec;
  313. type
  314. ListDefProcPtr = procedure( lMessage: SInt16; lSelect: Boolean; var lRect: Rect; lCell: Cell; lDataOffset: SInt16; lDataLen: SInt16; lHandle: ListHandle );
  315. ListDefUPP = ListDefProcPtr;
  316. {
  317. * NewListSearchUPP()
  318. *
  319. * Availability:
  320. * Mac OS X: in version 10.0 and later in Carbon.framework
  321. * CarbonLib: in CarbonLib 1.0 and later
  322. * Non-Carbon CFM: available as macro/inline
  323. }
  324. function NewListSearchUPP( userRoutine: ListSearchProcPtr ): ListSearchUPP; external name '_NewListSearchUPP';
  325. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  326. {
  327. * NewListClickLoopUPP()
  328. *
  329. * Availability:
  330. * Mac OS X: in version 10.0 and later in Carbon.framework
  331. * CarbonLib: in CarbonLib 1.0 and later
  332. * Non-Carbon CFM: available as macro/inline
  333. }
  334. function NewListClickLoopUPP( userRoutine: ListClickLoopProcPtr ): ListClickLoopUPP; external name '_NewListClickLoopUPP';
  335. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  336. {
  337. * NewListDefUPP()
  338. *
  339. * Availability:
  340. * Mac OS X: in version 10.0 and later in Carbon.framework
  341. * CarbonLib: in CarbonLib 1.0 and later
  342. * Non-Carbon CFM: available as macro/inline
  343. }
  344. function NewListDefUPP( userRoutine: ListDefProcPtr ): ListDefUPP; external name '_NewListDefUPP';
  345. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  346. {
  347. * DisposeListSearchUPP()
  348. *
  349. * Availability:
  350. * Mac OS X: in version 10.0 and later in Carbon.framework
  351. * CarbonLib: in CarbonLib 1.0 and later
  352. * Non-Carbon CFM: available as macro/inline
  353. }
  354. procedure DisposeListSearchUPP( userUPP: ListSearchUPP ); external name '_DisposeListSearchUPP';
  355. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  356. {
  357. * DisposeListClickLoopUPP()
  358. *
  359. * Availability:
  360. * Mac OS X: in version 10.0 and later in Carbon.framework
  361. * CarbonLib: in CarbonLib 1.0 and later
  362. * Non-Carbon CFM: available as macro/inline
  363. }
  364. procedure DisposeListClickLoopUPP( userUPP: ListClickLoopUPP ); external name '_DisposeListClickLoopUPP';
  365. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  366. {
  367. * DisposeListDefUPP()
  368. *
  369. * Availability:
  370. * Mac OS X: in version 10.0 and later in Carbon.framework
  371. * CarbonLib: in CarbonLib 1.0 and later
  372. * Non-Carbon CFM: available as macro/inline
  373. }
  374. procedure DisposeListDefUPP( userUPP: ListDefUPP ); external name '_DisposeListDefUPP';
  375. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  376. {
  377. * InvokeListSearchUPP()
  378. *
  379. * Availability:
  380. * Mac OS X: in version 10.0 and later in Carbon.framework
  381. * CarbonLib: in CarbonLib 1.0 and later
  382. * Non-Carbon CFM: available as macro/inline
  383. }
  384. function InvokeListSearchUPP( aPtr: Ptr; bPtr: Ptr; aLen: SInt16; bLen: SInt16; userUPP: ListSearchUPP ): SInt16; external name '_InvokeListSearchUPP';
  385. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  386. {
  387. * InvokeListClickLoopUPP()
  388. *
  389. * Availability:
  390. * Mac OS X: in version 10.0 and later in Carbon.framework
  391. * CarbonLib: in CarbonLib 1.0 and later
  392. * Non-Carbon CFM: available as macro/inline
  393. }
  394. function InvokeListClickLoopUPP( userUPP: ListClickLoopUPP ): Boolean; external name '_InvokeListClickLoopUPP';
  395. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  396. {
  397. * InvokeListDefUPP()
  398. *
  399. * Availability:
  400. * Mac OS X: in version 10.0 and later in Carbon.framework
  401. * CarbonLib: in CarbonLib 1.0 and later
  402. * Non-Carbon CFM: available as macro/inline
  403. }
  404. procedure InvokeListDefUPP( lMessage: SInt16; lSelect: Boolean; var lRect: Rect; lCell: Cell; lDataOffset: SInt16; lDataLen: SInt16; lHandle: ListHandle; userUPP: ListDefUPP ); external name '_InvokeListDefUPP';
  405. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  406. const
  407. kListDefProcPtr = 0;
  408. kListDefUserProcType = kListDefProcPtr;
  409. kListDefStandardTextType = 1;
  410. kListDefStandardIconType = 2;
  411. type
  412. ListDefType = UInt32;
  413. ListDefSpec = record
  414. defType: ListDefType;
  415. case SInt16 of
  416. 0: (
  417. userProc: ListDefUPP;
  418. );
  419. end;
  420. type
  421. ListDefSpecPtr = ^ListDefSpec;
  422. {$ifc not TARGET_CPU_64}
  423. {
  424. * CreateCustomList() *** DEPRECATED ***
  425. *
  426. * Mac OS X threading:
  427. * Not thread safe
  428. *
  429. * Availability:
  430. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  431. * CarbonLib: in CarbonLib 1.0 and later
  432. * Non-Carbon CFM: not available
  433. }
  434. function CreateCustomList( const (*var*) rView: Rect; const (*var*) dataBounds: ListBounds; cellSize: Point; const (*var*) theSpec: ListDefSpec; theWindow: WindowRef; drawIt: Boolean; hasGrow: Boolean; scrollHoriz: Boolean; scrollVert: Boolean; var outList: ListHandle ): OSStatus; external name '_CreateCustomList';
  435. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  436. {$endc} {not TARGET_CPU_64}
  437. {$ifc not TARGET_CPU_64}
  438. {
  439. * LNew() *** DEPRECATED ***
  440. *
  441. * Mac OS X threading:
  442. * Not thread safe
  443. *
  444. * Availability:
  445. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  446. * CarbonLib: in CarbonLib 1.0 and later
  447. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  448. }
  449. function LNew( const (*var*) rView: Rect; const (*var*) dataBounds: ListBounds; cSize: Point; theProc: SInt16; theWindow: WindowRef; drawIt: Boolean; hasGrow: Boolean; scrollHoriz: Boolean; scrollVert: Boolean ): ListHandle; external name '_LNew';
  450. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  451. {
  452. * LDispose() *** DEPRECATED ***
  453. *
  454. * Mac OS X threading:
  455. * Not thread safe
  456. *
  457. * Availability:
  458. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  459. * CarbonLib: in CarbonLib 1.0 and later
  460. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  461. }
  462. procedure LDispose( lHandle: ListHandle ); external name '_LDispose';
  463. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  464. {
  465. * LAddColumn() *** DEPRECATED ***
  466. *
  467. * Mac OS X threading:
  468. * Not thread safe
  469. *
  470. * Availability:
  471. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  472. * CarbonLib: in CarbonLib 1.0 and later
  473. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  474. }
  475. function LAddColumn( count: SInt16; colNum: SInt16; lHandle: ListHandle ): SInt16; external name '_LAddColumn';
  476. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  477. {
  478. * LAddRow() *** DEPRECATED ***
  479. *
  480. * Mac OS X threading:
  481. * Not thread safe
  482. *
  483. * Availability:
  484. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  485. * CarbonLib: in CarbonLib 1.0 and later
  486. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  487. }
  488. function LAddRow( count: SInt16; rowNum: SInt16; lHandle: ListHandle ): SInt16; external name '_LAddRow';
  489. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  490. {
  491. * LDelColumn() *** DEPRECATED ***
  492. *
  493. * Mac OS X threading:
  494. * Not thread safe
  495. *
  496. * Availability:
  497. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  498. * CarbonLib: in CarbonLib 1.0 and later
  499. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  500. }
  501. procedure LDelColumn( count: SInt16; colNum: SInt16; lHandle: ListHandle ); external name '_LDelColumn';
  502. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  503. {
  504. * LDelRow() *** DEPRECATED ***
  505. *
  506. * Mac OS X threading:
  507. * Not thread safe
  508. *
  509. * Availability:
  510. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  511. * CarbonLib: in CarbonLib 1.0 and later
  512. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  513. }
  514. procedure LDelRow( count: SInt16; rowNum: SInt16; lHandle: ListHandle ); external name '_LDelRow';
  515. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  516. {
  517. * LGetSelect() *** DEPRECATED ***
  518. *
  519. * Mac OS X threading:
  520. * Not thread safe
  521. *
  522. * Availability:
  523. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  524. * CarbonLib: in CarbonLib 1.0 and later
  525. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  526. }
  527. function LGetSelect( next: Boolean; var theCell: Cell; lHandle: ListHandle ): Boolean; external name '_LGetSelect';
  528. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  529. {
  530. * LLastClick() *** DEPRECATED ***
  531. *
  532. * Mac OS X threading:
  533. * Not thread safe
  534. *
  535. * Availability:
  536. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  537. * CarbonLib: in CarbonLib 1.0 and later
  538. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  539. }
  540. function LLastClick( lHandle: ListHandle ): Cell; external name '_LLastClick';
  541. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  542. {
  543. * LNextCell() *** DEPRECATED ***
  544. *
  545. * Mac OS X threading:
  546. * Not thread safe
  547. *
  548. * Availability:
  549. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  550. * CarbonLib: in CarbonLib 1.0 and later
  551. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  552. }
  553. function LNextCell( hNext: Boolean; vNext: Boolean; var theCell: Cell; lHandle: ListHandle ): Boolean; external name '_LNextCell';
  554. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  555. {
  556. * LSearch() *** DEPRECATED ***
  557. *
  558. * Mac OS X threading:
  559. * Not thread safe
  560. *
  561. * Availability:
  562. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  563. * CarbonLib: in CarbonLib 1.0 and later
  564. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  565. }
  566. function LSearch( dataPtr: {const} UnivPtr; dataLen: SInt16; searchProc: ListSearchUPP; var theCell: Cell; lHandle: ListHandle ): Boolean; external name '_LSearch';
  567. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  568. {
  569. * LSize() *** DEPRECATED ***
  570. *
  571. * Mac OS X threading:
  572. * Not thread safe
  573. *
  574. * Availability:
  575. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  576. * CarbonLib: in CarbonLib 1.0 and later
  577. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  578. }
  579. procedure LSize( listWidth: SInt16; listHeight: SInt16; lHandle: ListHandle ); external name '_LSize';
  580. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  581. {
  582. * LSetDrawingMode() *** DEPRECATED ***
  583. *
  584. * Mac OS X threading:
  585. * Not thread safe
  586. *
  587. * Availability:
  588. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  589. * CarbonLib: in CarbonLib 1.0 and later
  590. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  591. }
  592. procedure LSetDrawingMode( drawIt: Boolean; lHandle: ListHandle ); external name '_LSetDrawingMode';
  593. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  594. {
  595. * LScroll() *** DEPRECATED ***
  596. *
  597. * Mac OS X threading:
  598. * Not thread safe
  599. *
  600. * Availability:
  601. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  602. * CarbonLib: in CarbonLib 1.0 and later
  603. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  604. }
  605. procedure LScroll( dCols: SInt16; dRows: SInt16; lHandle: ListHandle ); external name '_LScroll';
  606. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  607. {
  608. * LAutoScroll() *** DEPRECATED ***
  609. *
  610. * Mac OS X threading:
  611. * Not thread safe
  612. *
  613. * Availability:
  614. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  615. * CarbonLib: in CarbonLib 1.0 and later
  616. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  617. }
  618. procedure LAutoScroll( lHandle: ListHandle ); external name '_LAutoScroll';
  619. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  620. {
  621. * LUpdate() *** DEPRECATED ***
  622. *
  623. * Mac OS X threading:
  624. * Not thread safe
  625. *
  626. * Availability:
  627. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  628. * CarbonLib: in CarbonLib 1.0 and later
  629. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  630. }
  631. procedure LUpdate( theRgn: RgnHandle; lHandle: ListHandle ); external name '_LUpdate';
  632. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  633. {
  634. * LActivate() *** DEPRECATED ***
  635. *
  636. * Mac OS X threading:
  637. * Not thread safe
  638. *
  639. * Availability:
  640. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  641. * CarbonLib: in CarbonLib 1.0 and later
  642. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  643. }
  644. procedure LActivate( act: Boolean; lHandle: ListHandle ); external name '_LActivate';
  645. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  646. {
  647. * LCellSize() *** DEPRECATED ***
  648. *
  649. * Mac OS X threading:
  650. * Not thread safe
  651. *
  652. * Availability:
  653. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  654. * CarbonLib: in CarbonLib 1.0 and later
  655. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  656. }
  657. procedure LCellSize( cSize: Point; lHandle: ListHandle ); external name '_LCellSize';
  658. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  659. {
  660. * LClick() *** DEPRECATED ***
  661. *
  662. * Mac OS X threading:
  663. * Not thread safe
  664. *
  665. * Availability:
  666. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  667. * CarbonLib: in CarbonLib 1.0 and later
  668. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  669. }
  670. function LClick( pt: Point; modifiers: EventModifiers; lHandle: ListHandle ): Boolean; external name '_LClick';
  671. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  672. {
  673. * LAddToCell() *** DEPRECATED ***
  674. *
  675. * Mac OS X threading:
  676. * Not thread safe
  677. *
  678. * Availability:
  679. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  680. * CarbonLib: in CarbonLib 1.0 and later
  681. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  682. }
  683. procedure LAddToCell( dataPtr: {const} UnivPtr; dataLen: SInt16; theCell: Cell; lHandle: ListHandle ); external name '_LAddToCell';
  684. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  685. {
  686. * LClrCell() *** DEPRECATED ***
  687. *
  688. * Mac OS X threading:
  689. * Not thread safe
  690. *
  691. * Availability:
  692. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  693. * CarbonLib: in CarbonLib 1.0 and later
  694. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  695. }
  696. procedure LClrCell( theCell: Cell; lHandle: ListHandle ); external name '_LClrCell';
  697. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  698. {
  699. * LGetCell() *** DEPRECATED ***
  700. *
  701. * Mac OS X threading:
  702. * Not thread safe
  703. *
  704. * Availability:
  705. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  706. * CarbonLib: in CarbonLib 1.0 and later
  707. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  708. }
  709. procedure LGetCell( dataPtr: UnivPtr; var dataLen: SInt16; theCell: Cell; lHandle: ListHandle ); external name '_LGetCell';
  710. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  711. {
  712. * LRect() *** DEPRECATED ***
  713. *
  714. * Mac OS X threading:
  715. * Not thread safe
  716. *
  717. * Availability:
  718. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  719. * CarbonLib: in CarbonLib 1.0 and later
  720. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  721. }
  722. procedure LRect( var cellRect: Rect; theCell: Cell; lHandle: ListHandle ); external name '_LRect';
  723. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  724. {
  725. * LSetCell() *** DEPRECATED ***
  726. *
  727. * Mac OS X threading:
  728. * Not thread safe
  729. *
  730. * Availability:
  731. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  732. * CarbonLib: in CarbonLib 1.0 and later
  733. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  734. }
  735. procedure LSetCell( dataPtr: {const} UnivPtr; dataLen: SInt16; theCell: Cell; lHandle: ListHandle ); external name '_LSetCell';
  736. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  737. {
  738. * LSetSelect() *** DEPRECATED ***
  739. *
  740. * Mac OS X threading:
  741. * Not thread safe
  742. *
  743. * Availability:
  744. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  745. * CarbonLib: in CarbonLib 1.0 and later
  746. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  747. }
  748. procedure LSetSelect( setIt: Boolean; theCell: Cell; lHandle: ListHandle ); external name '_LSetSelect';
  749. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  750. {
  751. * LDraw() *** DEPRECATED ***
  752. *
  753. * Mac OS X threading:
  754. * Not thread safe
  755. *
  756. * Availability:
  757. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  758. * CarbonLib: in CarbonLib 1.0 and later
  759. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  760. }
  761. procedure LDraw( theCell: Cell; lHandle: ListHandle ); external name '_LDraw';
  762. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  763. {
  764. * LGetCellDataLocation() *** DEPRECATED ***
  765. *
  766. * Mac OS X threading:
  767. * Not thread safe
  768. *
  769. * Availability:
  770. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  771. * CarbonLib: in CarbonLib 1.0 and later
  772. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  773. }
  774. procedure LGetCellDataLocation( var offset: SInt16; var len: SInt16; theCell: Cell; lHandle: ListHandle ); external name '_LGetCellDataLocation';
  775. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  776. { Routines available in Carbon only}
  777. {
  778. * RegisterListDefinition() *** DEPRECATED ***
  779. *
  780. * Summary:
  781. * Registers a binding between a resource ID and a list definition
  782. * function.
  783. *
  784. * Discussion:
  785. * In the Mac OS 8.x List Manager, a 'ldes' resource can contain an
  786. * embedded LDEF procID that is used by the List Manager as the
  787. * resource ID of an 'LDEF' resource to measure and draw the list.
  788. * Since LDEFs can no longer be packaged as code resources on
  789. * Carbon, the procID can no longer refer directly to an LDEF
  790. * resource. However, using RegisterListDefinition you can instead
  791. * specify a UniversalProcPtr pointing to code in your application
  792. * code fragment.
  793. *
  794. * Mac OS X threading:
  795. * Not thread safe
  796. *
  797. * Parameters:
  798. *
  799. * inResID:
  800. * An LDEF proc ID, as used in a 'ldes' resource.
  801. *
  802. * inDefSpec:
  803. * Specifies the ListDefUPP that should be used for lists with the
  804. * given LDEF procID.
  805. *
  806. * Availability:
  807. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  808. * CarbonLib: in CarbonLib 1.5 and later
  809. * Non-Carbon CFM: not available
  810. }
  811. function RegisterListDefinition( inResID: SInt16; inDefSpec: ListDefSpecPtr ): OSStatus; external name '_RegisterListDefinition';
  812. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  813. {$endc} {not TARGET_CPU_64}
  814. { Getters }
  815. {$ifc not TARGET_CPU_64}
  816. {
  817. * GetListViewBounds() *** DEPRECATED ***
  818. *
  819. * Mac OS X threading:
  820. * Not thread safe
  821. *
  822. * Availability:
  823. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  824. * CarbonLib: in CarbonLib 1.0 and later
  825. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  826. }
  827. function GetListViewBounds( list: ListHandle; var view: Rect ): RectPtr; external name '_GetListViewBounds';
  828. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  829. {
  830. * GetListPort() *** DEPRECATED ***
  831. *
  832. * Mac OS X threading:
  833. * Not thread safe
  834. *
  835. * Availability:
  836. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  837. * CarbonLib: in CarbonLib 1.0 and later
  838. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  839. }
  840. function GetListPort( list: ListHandle ): CGrafPtr; external name '_GetListPort';
  841. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  842. {
  843. * GetListCellIndent() *** DEPRECATED ***
  844. *
  845. * Mac OS X threading:
  846. * Not thread safe
  847. *
  848. * Availability:
  849. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  850. * CarbonLib: in CarbonLib 1.0 and later
  851. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  852. }
  853. function GetListCellIndent( list: ListHandle; var indent: Point ): PointPtr; external name '_GetListCellIndent';
  854. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  855. {
  856. * GetListCellSize() *** DEPRECATED ***
  857. *
  858. * Mac OS X threading:
  859. * Not thread safe
  860. *
  861. * Availability:
  862. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  863. * CarbonLib: in CarbonLib 1.0 and later
  864. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  865. }
  866. function GetListCellSize( list: ListHandle; var size: Point ): PointPtr; external name '_GetListCellSize';
  867. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  868. {
  869. * GetListVisibleCells() *** DEPRECATED ***
  870. *
  871. * Mac OS X threading:
  872. * Not thread safe
  873. *
  874. * Availability:
  875. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  876. * CarbonLib: in CarbonLib 1.0 and later
  877. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  878. }
  879. function GetListVisibleCells( list: ListHandle; var visible: ListBounds ): ListBoundsPtr; external name '_GetListVisibleCells';
  880. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  881. {
  882. * GetListVerticalScrollBar() *** DEPRECATED ***
  883. *
  884. * Mac OS X threading:
  885. * Not thread safe
  886. *
  887. * Availability:
  888. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  889. * CarbonLib: in CarbonLib 1.0 and later
  890. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  891. }
  892. function GetListVerticalScrollBar( list: ListHandle ): ControlRef; external name '_GetListVerticalScrollBar';
  893. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  894. {
  895. * GetListHorizontalScrollBar() *** DEPRECATED ***
  896. *
  897. * Mac OS X threading:
  898. * Not thread safe
  899. *
  900. * Availability:
  901. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  902. * CarbonLib: in CarbonLib 1.0 and later
  903. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  904. }
  905. function GetListHorizontalScrollBar( list: ListHandle ): ControlRef; external name '_GetListHorizontalScrollBar';
  906. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  907. {
  908. * GetListActive() *** DEPRECATED ***
  909. *
  910. * Mac OS X threading:
  911. * Not thread safe
  912. *
  913. * Availability:
  914. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  915. * CarbonLib: in CarbonLib 1.0 and later
  916. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  917. }
  918. function GetListActive( list: ListHandle ): Boolean; external name '_GetListActive';
  919. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  920. {
  921. * GetListClickTime() *** DEPRECATED ***
  922. *
  923. * Mac OS X threading:
  924. * Not thread safe
  925. *
  926. * Availability:
  927. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  928. * CarbonLib: in CarbonLib 1.0 and later
  929. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  930. }
  931. function GetListClickTime( list: ListHandle ): SInt32; external name '_GetListClickTime';
  932. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  933. {
  934. * GetListClickLocation() *** DEPRECATED ***
  935. *
  936. * Mac OS X threading:
  937. * Not thread safe
  938. *
  939. * Availability:
  940. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  941. * CarbonLib: in CarbonLib 1.0 and later
  942. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  943. }
  944. function GetListClickLocation( list: ListHandle; var click: Point ): PointPtr; external name '_GetListClickLocation';
  945. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  946. {
  947. * GetListMouseLocation() *** DEPRECATED ***
  948. *
  949. * Mac OS X threading:
  950. * Not thread safe
  951. *
  952. * Availability:
  953. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  954. * CarbonLib: in CarbonLib 1.0 and later
  955. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  956. }
  957. function GetListMouseLocation( list: ListHandle; var mouse: Point ): PointPtr; external name '_GetListMouseLocation';
  958. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  959. {
  960. * GetListClickLoop() *** DEPRECATED ***
  961. *
  962. * Mac OS X threading:
  963. * Not thread safe
  964. *
  965. * Availability:
  966. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  967. * CarbonLib: in CarbonLib 1.0 and later
  968. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  969. }
  970. function GetListClickLoop( list: ListHandle ): ListClickLoopUPP; external name '_GetListClickLoop';
  971. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  972. {
  973. * GetListRefCon() *** DEPRECATED ***
  974. *
  975. * Mac OS X threading:
  976. * Not thread safe
  977. *
  978. * Availability:
  979. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  980. * CarbonLib: in CarbonLib 1.0 and later
  981. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  982. }
  983. function GetListRefCon( list: ListHandle ): SInt32; external name '_GetListRefCon';
  984. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  985. {
  986. * GetListDefinition() *** DEPRECATED ***
  987. *
  988. * Mac OS X threading:
  989. * Not thread safe
  990. *
  991. * Availability:
  992. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  993. * CarbonLib: in CarbonLib 1.0 and later
  994. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  995. }
  996. function GetListDefinition( list: ListHandle ): Handle; external name '_GetListDefinition';
  997. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  998. {
  999. * GetListUserHandle() *** DEPRECATED ***
  1000. *
  1001. * Mac OS X threading:
  1002. * Not thread safe
  1003. *
  1004. * Availability:
  1005. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1006. * CarbonLib: in CarbonLib 1.0 and later
  1007. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1008. }
  1009. function GetListUserHandle( list: ListHandle ): Handle; external name '_GetListUserHandle';
  1010. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1011. {
  1012. * GetListDataBounds() *** DEPRECATED ***
  1013. *
  1014. * Mac OS X threading:
  1015. * Not thread safe
  1016. *
  1017. * Availability:
  1018. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1019. * CarbonLib: in CarbonLib 1.0 and later
  1020. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1021. }
  1022. function GetListDataBounds( list: ListHandle; var bounds: ListBounds ): ListBoundsPtr; external name '_GetListDataBounds';
  1023. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1024. {
  1025. * GetListDataHandle() *** DEPRECATED ***
  1026. *
  1027. * Mac OS X threading:
  1028. * Not thread safe
  1029. *
  1030. * Availability:
  1031. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1032. * CarbonLib: in CarbonLib 1.0 and later
  1033. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1034. }
  1035. function GetListDataHandle( list: ListHandle ): DataHandle; external name '_GetListDataHandle';
  1036. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1037. {
  1038. * GetListFlags() *** DEPRECATED ***
  1039. *
  1040. * Mac OS X threading:
  1041. * Not thread safe
  1042. *
  1043. * Availability:
  1044. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1045. * CarbonLib: in CarbonLib 1.0 and later
  1046. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1047. }
  1048. function GetListFlags( list: ListHandle ): OptionBits; external name '_GetListFlags';
  1049. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1050. {
  1051. * GetListSelectionFlags() *** DEPRECATED ***
  1052. *
  1053. * Mac OS X threading:
  1054. * Not thread safe
  1055. *
  1056. * Availability:
  1057. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1058. * CarbonLib: in CarbonLib 1.0 and later
  1059. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1060. }
  1061. function GetListSelectionFlags( list: ListHandle ): OptionBits; external name '_GetListSelectionFlags';
  1062. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1063. { Setters }
  1064. {
  1065. * SetListViewBounds() *** DEPRECATED ***
  1066. *
  1067. * Mac OS X threading:
  1068. * Not thread safe
  1069. *
  1070. * Availability:
  1071. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1072. * CarbonLib: in CarbonLib 1.0 and later
  1073. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1074. }
  1075. procedure SetListViewBounds( list: ListHandle; const (*var*) view: Rect ); external name '_SetListViewBounds';
  1076. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1077. {
  1078. * SetListPort() *** DEPRECATED ***
  1079. *
  1080. * Mac OS X threading:
  1081. * Not thread safe
  1082. *
  1083. * Availability:
  1084. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1085. * CarbonLib: in CarbonLib 1.0 and later
  1086. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1087. }
  1088. procedure SetListPort( list: ListHandle; port: CGrafPtr ); external name '_SetListPort';
  1089. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1090. {
  1091. * SetListCellIndent() *** DEPRECATED ***
  1092. *
  1093. * Mac OS X threading:
  1094. * Not thread safe
  1095. *
  1096. * Availability:
  1097. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1098. * CarbonLib: in CarbonLib 1.0 and later
  1099. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1100. }
  1101. procedure SetListCellIndent( list: ListHandle; var indent: Point ); external name '_SetListCellIndent';
  1102. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1103. {
  1104. * SetListClickTime() *** DEPRECATED ***
  1105. *
  1106. * Mac OS X threading:
  1107. * Not thread safe
  1108. *
  1109. * Availability:
  1110. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1111. * CarbonLib: in CarbonLib 1.0 and later
  1112. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1113. }
  1114. procedure SetListClickTime( list: ListHandle; time: SInt32 ); external name '_SetListClickTime';
  1115. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1116. {
  1117. * SetListClickLoop() *** DEPRECATED ***
  1118. *
  1119. * Mac OS X threading:
  1120. * Not thread safe
  1121. *
  1122. * Availability:
  1123. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1124. * CarbonLib: in CarbonLib 1.0 and later
  1125. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1126. }
  1127. procedure SetListClickLoop( list: ListHandle; clickLoop: ListClickLoopUPP ); external name '_SetListClickLoop';
  1128. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1129. {
  1130. * SetListLastClick() *** DEPRECATED ***
  1131. *
  1132. * Mac OS X threading:
  1133. * Not thread safe
  1134. *
  1135. * Availability:
  1136. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1137. * CarbonLib: in CarbonLib 1.0 and later
  1138. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1139. }
  1140. procedure SetListLastClick( list: ListHandle; var lastClick: Cell ); external name '_SetListLastClick';
  1141. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1142. {
  1143. * SetListRefCon() *** DEPRECATED ***
  1144. *
  1145. * Mac OS X threading:
  1146. * Not thread safe
  1147. *
  1148. * Availability:
  1149. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1150. * CarbonLib: in CarbonLib 1.0 and later
  1151. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1152. }
  1153. procedure SetListRefCon( list: ListHandle; refCon: SInt32 ); external name '_SetListRefCon';
  1154. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1155. {
  1156. * SetListUserHandle() *** DEPRECATED ***
  1157. *
  1158. * Mac OS X threading:
  1159. * Not thread safe
  1160. *
  1161. * Availability:
  1162. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1163. * CarbonLib: in CarbonLib 1.0 and later
  1164. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1165. }
  1166. procedure SetListUserHandle( list: ListHandle; userHandle: Handle ); external name '_SetListUserHandle';
  1167. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1168. {
  1169. * SetListFlags() *** DEPRECATED ***
  1170. *
  1171. * Mac OS X threading:
  1172. * Not thread safe
  1173. *
  1174. * Availability:
  1175. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1176. * CarbonLib: in CarbonLib 1.0 and later
  1177. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1178. }
  1179. procedure SetListFlags( list: ListHandle; listFlags: OptionBits ); external name '_SetListFlags';
  1180. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1181. {
  1182. * SetListSelectionFlags() *** DEPRECATED ***
  1183. *
  1184. * Mac OS X threading:
  1185. * Not thread safe
  1186. *
  1187. * Availability:
  1188. * Mac OS X: in version 10.0 and later in Carbon.framework [32-bit only] but deprecated in 10.5
  1189. * CarbonLib: in CarbonLib 1.0 and later
  1190. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  1191. }
  1192. procedure SetListSelectionFlags( list: ListHandle; selectionFlags: OptionBits ); external name '_SetListSelectionFlags';
  1193. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_5 *)
  1194. {$endc} {not TARGET_CPU_64}
  1195. {$endc} {TARGET_OS_MAC}
  1196. {$ifc not defined MACOSALLINCLUDE or not MACOSALLINCLUDE}
  1197. end.
  1198. {$endc} {not MACOSALLINCLUDE}