TextEdit.pas 64 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844
  1. {
  2. File: HIToolbox/TextEdit.h
  3. Contains: TextEdit Interfaces.
  4. Version: HIToolbox-219.4.81~2
  5. Copyright: © 1985-2005 by Apple Computer, Inc., all rights reserved
  6. Bugs?: For bug reports, consult the following page on
  7. the World Wide Web:
  8. http://www.freepascal.org/bugs.html
  9. }
  10. { Pascal Translation Updated: Peter N Lewis, <[email protected]>, August 2005 }
  11. {
  12. Modified for use with Free Pascal
  13. Version 200
  14. Please report any bugs to <[email protected]>
  15. }
  16. {$mode macpas}
  17. {$packenum 1}
  18. {$macro on}
  19. {$inline on}
  20. {$CALLING MWPASCAL}
  21. unit TextEdit;
  22. interface
  23. {$setc UNIVERSAL_INTERFACES_VERSION := $0342}
  24. {$setc GAP_INTERFACES_VERSION := $0200}
  25. {$ifc not defined USE_CFSTR_CONSTANT_MACROS}
  26. {$setc USE_CFSTR_CONSTANT_MACROS := TRUE}
  27. {$endc}
  28. {$ifc defined CPUPOWERPC and defined CPUI386}
  29. {$error Conflicting initial definitions for CPUPOWERPC and CPUI386}
  30. {$endc}
  31. {$ifc defined FPC_BIG_ENDIAN and defined FPC_LITTLE_ENDIAN}
  32. {$error Conflicting initial definitions for FPC_BIG_ENDIAN and FPC_LITTLE_ENDIAN}
  33. {$endc}
  34. {$ifc not defined __ppc__ and defined CPUPOWERPC}
  35. {$setc __ppc__ := 1}
  36. {$elsec}
  37. {$setc __ppc__ := 0}
  38. {$endc}
  39. {$ifc not defined __i386__ and defined CPUI386}
  40. {$setc __i386__ := 1}
  41. {$elsec}
  42. {$setc __i386__ := 0}
  43. {$endc}
  44. {$ifc defined __ppc__ and __ppc__ and defined __i386__ and __i386__}
  45. {$error Conflicting definitions for __ppc__ and __i386__}
  46. {$endc}
  47. {$ifc defined __ppc__ and __ppc__}
  48. {$setc TARGET_CPU_PPC := TRUE}
  49. {$setc TARGET_CPU_X86 := FALSE}
  50. {$elifc defined __i386__ and __i386__}
  51. {$setc TARGET_CPU_PPC := FALSE}
  52. {$setc TARGET_CPU_X86 := TRUE}
  53. {$elsec}
  54. {$error Neither __ppc__ nor __i386__ is defined.}
  55. {$endc}
  56. {$setc TARGET_CPU_PPC_64 := FALSE}
  57. {$ifc defined FPC_BIG_ENDIAN}
  58. {$setc TARGET_RT_BIG_ENDIAN := TRUE}
  59. {$setc TARGET_RT_LITTLE_ENDIAN := FALSE}
  60. {$elifc defined FPC_LITTLE_ENDIAN}
  61. {$setc TARGET_RT_BIG_ENDIAN := FALSE}
  62. {$setc TARGET_RT_LITTLE_ENDIAN := TRUE}
  63. {$elsec}
  64. {$error Neither FPC_BIG_ENDIAN nor FPC_LITTLE_ENDIAN are defined.}
  65. {$endc}
  66. {$setc ACCESSOR_CALLS_ARE_FUNCTIONS := TRUE}
  67. {$setc CALL_NOT_IN_CARBON := FALSE}
  68. {$setc OLDROUTINENAMES := FALSE}
  69. {$setc OPAQUE_TOOLBOX_STRUCTS := TRUE}
  70. {$setc OPAQUE_UPP_TYPES := TRUE}
  71. {$setc OTCARBONAPPLICATION := TRUE}
  72. {$setc OTKERNEL := FALSE}
  73. {$setc PM_USE_SESSION_APIS := TRUE}
  74. {$setc TARGET_API_MAC_CARBON := TRUE}
  75. {$setc TARGET_API_MAC_OS8 := FALSE}
  76. {$setc TARGET_API_MAC_OSX := TRUE}
  77. {$setc TARGET_CARBON := TRUE}
  78. {$setc TARGET_CPU_68K := FALSE}
  79. {$setc TARGET_CPU_MIPS := FALSE}
  80. {$setc TARGET_CPU_SPARC := FALSE}
  81. {$setc TARGET_OS_MAC := TRUE}
  82. {$setc TARGET_OS_UNIX := FALSE}
  83. {$setc TARGET_OS_WIN32 := FALSE}
  84. {$setc TARGET_RT_MAC_68881 := FALSE}
  85. {$setc TARGET_RT_MAC_CFM := FALSE}
  86. {$setc TARGET_RT_MAC_MACHO := TRUE}
  87. {$setc TYPED_FUNCTION_POINTERS := TRUE}
  88. {$setc TYPE_BOOL := FALSE}
  89. {$setc TYPE_EXTENDED := FALSE}
  90. {$setc TYPE_LONGLONG := TRUE}
  91. uses MacTypes,Quickdraw,MixedMode;
  92. {***********************************************************************************************
  93. All functions in this file are deprecated for Mac OS 10.4. The Multilingual Text Engine (MLTE)
  94. API is recommended instead. Although there is no one-to-one correspondence between the two API,
  95. MLTE should be used instead of TE since it provides support for Unicode text. MLTE uses ATSUI
  96. for text layout and Quartz for text rendering. Please see MacTextEditor.h for a description of
  97. the MLTE API.
  98. *************************************************************************************************}
  99. {$ALIGN MAC68K}
  100. type
  101. TERecPtr = ^TERec;
  102. TEPtr = TERecPtr;
  103. TEHandle = ^TEPtr;
  104. HighHookProcPtr = procedure( const (*var*) r: Rect; pTE: TEPtr );
  105. EOLHookProcPtr = function( theChar: ByteParameter; pTE: TEPtr; hTE: TEHandle ): Boolean;
  106. CaretHookProcPtr = procedure( const (*var*) r: Rect; pTE: TEPtr );
  107. WidthHookProcPtr = function( textLen: UInt16; textOffset: UInt16; textBufferPtr: UnivPtr; pTE: TEPtr; hTE: TEHandle ): UInt16;
  108. TextWidthHookProcPtr = function( textLen: UInt16; textOffset: UInt16; textBufferPtr: UnivPtr; pTE: TEPtr; hTE: TEHandle ): UInt16;
  109. NWidthHookProcPtr = function( styleRunLen: UInt16; styleRunOffset: UInt16; slop: SInt16; direction: SInt16; textBufferPtr: UnivPtr; var lineStart: SInt16; pTE: TEPtr; hTE: TEHandle ): UInt16;
  110. DrawHookProcPtr = procedure( textOffset: UInt16; drawLen: UInt16; textBufferPtr: UnivPtr; pTE: TEPtr; hTE: TEHandle );
  111. HitTestHookProcPtr = function( styleRunLen: UInt16; styleRunOffset: UInt16; slop: UInt16; textBufferPtr: UnivPtr; pTE: TEPtr; hTE: TEHandle; var pixelWidth: UInt16; var charOffset: UInt16; var pixelInChar: Boolean ): Boolean;
  112. TEFindWordProcPtr = procedure( currentPos: UInt16; caller: SInt16; pTE: TEPtr; hTE: TEHandle; var wordStart: UInt16; var wordEnd: UInt16 );
  113. TERecalcProcPtr = procedure( pTE: TEPtr; changeLength: UInt16; var lineStart: UInt16; var firstChar: UInt16; var lastChar: UInt16 );
  114. TEDoTextProcPtr = procedure( pTE: TEPtr; firstChar: UInt16; lastChar: UInt16; selector: SInt16; var currentGrafPort: GrafPtr; var charPosition: SInt16 );
  115. TEClickLoopProcPtr = function( pTE: TEPtr ): Boolean;
  116. WordBreakProcPtr = function( text: Ptr; charPos: SInt16 ): Boolean;
  117. {
  118. Important note about TEClickLoopProcPtr and WordBreakProcPtr
  119. At one point these were defined as returning the function result in the
  120. condition code Z-bit. This was correct, in that it was what the 68K
  121. implementation of TextEdit actually tested. But, MixedMode had a different
  122. idea of what returning a boolean in the Z-bit meant. MixedMode was setting
  123. the Z-bit the complement of what was wanted.
  124. Therefore, these ProcPtrs have been changed (back) to return the result in
  125. register D0. It turns out that for register based routines,
  126. MixedMode sets the Z-bit of the 68K emulator based on the contents
  127. of the return result register. Thus we can get the Z-bit set correctly.
  128. But, when TextEdit is recoded in PowerPC, if it calls a 68K ClickLoop
  129. or WordBreak routine, register D0 had better have the result (in addition
  130. to the Z-bit). Therefore all 68K apps should make sure their ClickLoop or
  131. WordBreak routines set register D0 at the end.
  132. }
  133. {
  134. There is no function to get/set the low-mem for FindWordHook at 0x07F8.
  135. This is because it is not a low-mem ProcPtr. That address is the entry
  136. in the OS TrapTable for trap 0xA0FE. You can use Get/SetTrapAddress to
  137. acccess it.
  138. }
  139. {
  140. The following ProcPtrs cannot be written in or called from a high-level
  141. language without the help of mixed mode or assembly glue because they
  142. use the following parameter-passing conventions:
  143. typedef pascal void (*HighHookProcPtr)(const Rect *r, TEPtr pTE);
  144. typedef pascal void (*CaretHookProcPtr)(const Rect *r, TEPtr pTE);
  145. In:
  146. => r on stack
  147. => pTE A3.L
  148. Out:
  149. none
  150. typedef pascal Boolean (*EOLHookProcPtr)(char theChar, TEPtr pTE, TEHandle hTE);
  151. In:
  152. => theChar D0.B
  153. => pTE A3.L
  154. => hTE A4.L
  155. Out:
  156. <= Boolean Z bit of the CCR
  157. typedef pascal unsigned short (*WidthHookProcPtr)(unsigned short textLen,
  158. unsigned short textOffset, void *textBufferPtr, TEPtr pTE, TEHandle hTE);
  159. typedef pascal unsigned short (*TextWidthHookProcPtr)(unsigned short textLen,
  160. unsigned short textOffset, void *textBufferPtr, TEPtr pTE, TEHandle hTE);
  161. In:
  162. => textLen D0.W
  163. => textOffset D1.W
  164. => textBufferPtr A0.L
  165. => pTE A3.L
  166. => hTE A4.L
  167. Out:
  168. <= unsigned short D1.W
  169. typedef pascal unsigned short (*NWidthHookProcPtr)(unsigned short styleRunLen,
  170. unsigned short styleRunOffset, short slop, short direction, void *textBufferPtr,
  171. short *lineStart, TEPtr pTE, TEHandle hTE);
  172. In:
  173. => styleRunLen D0.W
  174. => styleRunOffset D1.W
  175. => slop D2.W (low)
  176. => direction D2.W (high)
  177. => textBufferPtr A0.L
  178. => lineStart A2.L
  179. => pTE A3.L
  180. => hTE A4.L
  181. Out:
  182. <= unsigned short D1.W
  183. typedef pascal void (*DrawHookProcPtr)(unsigned short textOffset, unsigned short drawLen,
  184. void *textBufferPtr, TEPtr pTE, TEHandle hTE);
  185. In:
  186. => textOffset D0.W
  187. => drawLen D1.W
  188. => textBufferPtr A0.L
  189. => pTE A3.L
  190. => hTE A4.L
  191. Out:
  192. none
  193. typedef pascal Boolean (*HitTestHookProcPtr)(unsigned short styleRunLen,
  194. unsigned short styleRunOffset, unsigned short slop, void *textBufferPtr,
  195. TEPtr pTE, TEHandle hTE, unsigned short *pixelWidth, unsigned short *charOffset,
  196. Boolean *pixelInChar);
  197. In:
  198. => styleRunLen D0.W
  199. => styleRunOffset D1.W
  200. => slop D2.W
  201. => textBufferPtr A0.L
  202. => pTE A3.L
  203. => hTE A4.L
  204. Out:
  205. <= pixelWidth D0.W (low)
  206. <= Boolean D0.W (high)
  207. <= charOffset D1.W
  208. <= pixelInChar D2.W
  209. typedef pascal void (*TEFindWordProcPtr)(unsigned short currentPos, short caller,
  210. TEPtr pTE, TEHandle hTE, unsigned short *wordStart, unsigned short *wordEnd);
  211. In:
  212. => currentPos D0.W
  213. => caller D2.W
  214. => pTE A3.L
  215. => hTE A4.L
  216. Out:
  217. <= wordStart D0.W
  218. <= wordEnd D1.W
  219. typedef pascal void (*TERecalcProcPtr)(TEPtr pTE, unsigned short changeLength,
  220. unsigned short *lineStart, unsigned short *firstChar, unsigned short *lastChar);
  221. In:
  222. => pTE A3.L
  223. => changeLength D7.W
  224. Out:
  225. <= lineStart D2.W
  226. <= firstChar D3.W
  227. <= lastChar D4.W
  228. typedef pascal void (*TEDoTextProcPtr)(TEPtr pTE, unsigned short firstChar, unsigned short lastChar,
  229. short selector, GrafPtr *currentGrafPort, short *charPosition);
  230. In:
  231. => pTE A3.L
  232. => firstChar D3.W
  233. => lastChar D4.W
  234. => selector D7.W
  235. Out:
  236. <= currentGrafPort A0.L
  237. <= charPosition D0.W
  238. }
  239. HighHookUPP = HighHookProcPtr;
  240. EOLHookUPP = EOLHookProcPtr;
  241. CaretHookUPP = CaretHookProcPtr;
  242. WidthHookUPP = WidthHookProcPtr;
  243. TextWidthHookUPP = TextWidthHookProcPtr;
  244. NWidthHookUPP = NWidthHookProcPtr;
  245. DrawHookUPP = DrawHookProcPtr;
  246. HitTestHookUPP = HitTestHookProcPtr;
  247. TEFindWordUPP = TEFindWordProcPtr;
  248. TERecalcUPP = TERecalcProcPtr;
  249. TEDoTextUPP = TEDoTextProcPtr;
  250. TEClickLoopUPP = TEClickLoopProcPtr;
  251. WordBreakUPP = WordBreakProcPtr;
  252. TERec = record
  253. destRect: Rect;
  254. viewRect: Rect;
  255. selRect: Rect;
  256. lineHeight: SInt16;
  257. fontAscent: SInt16;
  258. selPoint: Point;
  259. selStart: SInt16;
  260. selEnd: SInt16;
  261. active: SInt16;
  262. wordBreak: WordBreakUPP; { NOTE: This field is ignored on non-Roman systems and on Carbon (see IM-Text 2-60) }
  263. clickLoop: TEClickLoopUPP;
  264. clickTime: SInt32;
  265. clickLoc: SInt16;
  266. caretTime: SInt32;
  267. caretState: SInt16;
  268. just: SInt16;
  269. teLength: SInt16;
  270. hText: Handle;
  271. hDispatchRec: SInt32; { added to replace recalBack & recalLines. it's a handle anyway }
  272. clikStuff: SInt16;
  273. crOnly: SInt16;
  274. txFont: SInt16;
  275. txFace: StyleField; {StyleField occupies 16-bits, but only first 8-bits are used}
  276. txMode: SInt16;
  277. txSize: SInt16;
  278. inPort: GrafPtr;
  279. highHook: HighHookUPP;
  280. caretHook: CaretHookUPP;
  281. nLines: SInt16;
  282. lineStarts: array[0..16000] of SInt16;
  283. end;
  284. const
  285. { Justification (word alignment) styles }
  286. teJustLeft = 0;
  287. teJustCenter = 1;
  288. teJustRight = -1;
  289. teForceLeft = -2; { new names for the Justification (word alignment) styles }
  290. teFlushDefault = 0; {flush according to the line direction }
  291. teCenter = 1; {center justify (word alignment) }
  292. teFlushRight = -1; {flush right for all scripts }
  293. teFlushLeft = -2; {flush left for all scripts }
  294. const
  295. { Set/Replace style modes }
  296. fontBit = 0; {set font}
  297. faceBit = 1; {set face}
  298. sizeBit = 2; {set size}
  299. clrBit = 3; {set color}
  300. addSizeBit = 4; {add size mode}
  301. toggleBit = 5; {set faces in toggle mode}
  302. const
  303. { TESetStyle/TEContinuousStyle modes }
  304. doFont = 1; { set font (family) number}
  305. doFace = 2; {set character style}
  306. doSize = 4; {set type size}
  307. doColor = 8; {set color}
  308. doAll = 15; {set all attributes}
  309. addSize = 16; {adjust type size}
  310. doToggle = 32; {toggle mode for TESetStyle}
  311. const
  312. { offsets into TEDispatchRec }
  313. EOLHook = 0; {[UniversalProcPtr] TEEOLHook}
  314. DRAWHook = 4; {[UniversalProcPtr] TEWidthHook}
  315. WIDTHHook = 8; {[UniversalProcPtr] TEDrawHook}
  316. HITTESTHook = 12; {[UniversalProcPtr] TEHitTestHook}
  317. nWIDTHHook = 24; {[UniversalProcPtr] nTEWidthHook}
  318. TextWidthHook = 28; {[UniversalProcPtr] TETextWidthHook}
  319. const
  320. { selectors for TECustomHook }
  321. intEOLHook = 0; {TEIntHook value}
  322. intDrawHook = 1; {TEIntHook value}
  323. intWidthHook = 2; {TEIntHook value}
  324. intHitTestHook = 3; {TEIntHook value}
  325. intNWidthHook = 6; {TEIntHook value for new version of WidthHook}
  326. intTextWidthHook = 7; {TEIntHook value for new TextWidthHook}
  327. intInlineInputTSMTEPreUpdateHook = 8; {TEIntHook value for TSMTEPreUpdateProcPtr callback}
  328. intInlineInputTSMTEPostUpdateHook = 9; {TEIntHook value for TSMTEPostUpdateProcPtr callback}
  329. const
  330. { feature or bit definitions for TEFeatureFlag }
  331. teFAutoScroll = 0; {00000001b}
  332. teFTextBuffering = 1; {00000010b}
  333. teFOutlineHilite = 2; {00000100b}
  334. teFInlineInput = 3; {00001000b }
  335. teFUseWhiteBackground = 4; {00010000b }
  336. teFUseInlineInput = 5; {00100000b }
  337. teFInlineInputAutoScroll = 6; {01000000b }
  338. const
  339. { feature or bit definitions for TEFeatureFlag -- Carbon only }
  340. { To avoid having to call TEIdle in Carbon apps, automatic idling can be activated }
  341. { via the following feature flag, but you must ensure that the destRect and/or }
  342. { GrafPort's origin be setup properly for drawing in a given TERec when }
  343. { the timer fires. When this feature flag is set, TEIdle is a noop. }
  344. { Activate this feature flag before calling TEActivate. }
  345. teFIdleWithEventLoopTimer = 7; {10000000b }
  346. const
  347. { action for the new "bit (un)set" interface, TEFeatureFlag }
  348. teBitClear = 0;
  349. teBitSet = 1; {set the selector bit}
  350. teBitTest = -1; {no change; just return the current setting}
  351. const
  352. {constants for identifying the routine that called FindWord }
  353. teWordSelect = 4; {clickExpand to select word}
  354. teWordDrag = 8; {clickExpand to drag new word}
  355. teFromFind = 12; {FindLine called it ($0C)}
  356. teFromRecal = 16; {RecalLines called it ($10) obsolete }
  357. const
  358. {constants for identifying TEDoText selectors }
  359. teFind = 0; {TEDoText called for searching}
  360. teHighlight = 1; {TEDoText called for highlighting}
  361. teDraw = -1; {TEDoText called for drawing text}
  362. teCaret = -2; {TEDoText called for drawing the caret}
  363. type
  364. Chars = packed array [0..32000] of char;
  365. CharsPtr = ^Chars;
  366. CharsHandle = ^CharsPtr;
  367. StyleRunPtr = ^StyleRun;
  368. StyleRun = record
  369. startChar: SInt16; {starting character position}
  370. styleIndex: SInt16; {index in style table}
  371. end;
  372. type
  373. STElementPtr = ^STElement;
  374. STElement = record
  375. stCount: SInt16; {number of runs in this style}
  376. stHeight: SInt16; {line height}
  377. stAscent: SInt16; {font ascent}
  378. stFont: SInt16; {font (family) number}
  379. stFace: StyleField; {StyleField occupies 16-bits, but only first 8-bits are used }
  380. stSize: SInt16; {size in points}
  381. stColor: RGBColor; {absolute (RGB) color}
  382. end;
  383. TEStyleTable = array [0..1776] of STElement;
  384. type
  385. STPtr = ^TEStyleTable;
  386. STHandle = ^STPtr;
  387. LHElementPtr = ^LHElement;
  388. LHElement = record
  389. lhHeight: SInt16; {maximum height in line}
  390. lhAscent: SInt16; {maximum ascent in line}
  391. end;
  392. LHTable = array [0..8000] of LHElement;
  393. LHPtr = ^LHTable;
  394. LHHandle = ^LHPtr;
  395. ScrpSTElementPtr = ^ScrpSTElement;
  396. ScrpSTElement = record
  397. scrpStartChar: SInt32; {starting character position}
  398. scrpHeight: SInt16;
  399. scrpAscent: SInt16;
  400. scrpFont: SInt16;
  401. scrpFace: StyleField; {StyleField occupies 16-bits, but only first 8-bits are used}
  402. scrpSize: SInt16;
  403. scrpColor: RGBColor;
  404. end;
  405. { ARRAY [0..1600] OF ScrpSTElement }
  406. ScrpSTTable = array [0..1600] of ScrpSTElement;
  407. type
  408. StScrpRecPtr = ^StScrpRec;
  409. StScrpRec = record
  410. scrpNStyles: SInt16; {number of styles in scrap}
  411. scrpStyleTab: ScrpSTTable; {table of styles for scrap}
  412. end;
  413. type
  414. StScrpPtr = StScrpRecPtr;
  415. StScrpHandle = ^StScrpPtr;
  416. NullStRecPtr = ^NullStRec;
  417. NullStRec = record
  418. teReserved: SInt32; {reserved for future expansion}
  419. nullScrap: StScrpHandle; {handle to scrap style table}
  420. end;
  421. type
  422. NullStPtr = NullStRecPtr;
  423. NullStHandle = ^NullStPtr;
  424. TEStyleRecPtr = ^TEStyleRec;
  425. TEStyleRec = record
  426. nRuns: SInt16; {number of style runs}
  427. nStyles: SInt16; {size of style table}
  428. styleTab: STHandle; {handle to style table}
  429. lhTab: LHHandle; {handle to line-height table}
  430. teRefCon: SInt32; {reserved for application use}
  431. nullStyle: NullStHandle; {Handle to style set at null selection}
  432. runs: array [0..8000] of StyleRun; { array [0..8000] of StyleRun }
  433. end;
  434. type
  435. TEStylePtr = TEStyleRecPtr;
  436. TEStyleHandle = ^TEStylePtr;
  437. TextStyle = record
  438. tsFont: SInt16; {font (family) number}
  439. tsFace: StyleField; {StyleField occupies 16-bits, but only first 8-bits are used}
  440. tsSize: SInt16; {size in point}
  441. tsColor: RGBColor; {absolute (RGB) color}
  442. end;
  443. TextStylePtr = ^TextStyle;
  444. type
  445. TextStyleHandle = ^TextStylePtr;
  446. TEIntHook = SInt16;
  447. {
  448. * NewHighHookUPP()
  449. *
  450. * Availability:
  451. * Mac OS X: in version 10.0 and later in Carbon.framework
  452. * CarbonLib: in CarbonLib 1.0 and later
  453. * Non-Carbon CFM: available as macro/inline
  454. }
  455. function NewHighHookUPP( userRoutine: HighHookProcPtr ): HighHookUPP; external name '_NewHighHookUPP';
  456. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  457. {
  458. * NewEOLHookUPP()
  459. *
  460. * Availability:
  461. * Mac OS X: in version 10.0 and later in Carbon.framework
  462. * CarbonLib: in CarbonLib 1.0 and later
  463. * Non-Carbon CFM: available as macro/inline
  464. }
  465. function NewEOLHookUPP( userRoutine: EOLHookProcPtr ): EOLHookUPP; external name '_NewEOLHookUPP';
  466. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  467. {
  468. * NewCaretHookUPP()
  469. *
  470. * Availability:
  471. * Mac OS X: in version 10.0 and later in Carbon.framework
  472. * CarbonLib: in CarbonLib 1.0 and later
  473. * Non-Carbon CFM: available as macro/inline
  474. }
  475. function NewCaretHookUPP( userRoutine: CaretHookProcPtr ): CaretHookUPP; external name '_NewCaretHookUPP';
  476. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  477. {
  478. * NewWidthHookUPP()
  479. *
  480. * Availability:
  481. * Mac OS X: in version 10.0 and later in Carbon.framework
  482. * CarbonLib: in CarbonLib 1.0 and later
  483. * Non-Carbon CFM: available as macro/inline
  484. }
  485. function NewWidthHookUPP( userRoutine: WidthHookProcPtr ): WidthHookUPP; external name '_NewWidthHookUPP';
  486. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  487. {
  488. * NewTextWidthHookUPP()
  489. *
  490. * Availability:
  491. * Mac OS X: in version 10.0 and later in Carbon.framework
  492. * CarbonLib: in CarbonLib 1.0 and later
  493. * Non-Carbon CFM: available as macro/inline
  494. }
  495. function NewTextWidthHookUPP( userRoutine: TextWidthHookProcPtr ): TextWidthHookUPP; external name '_NewTextWidthHookUPP';
  496. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  497. {
  498. * NewNWidthHookUPP()
  499. *
  500. * Availability:
  501. * Mac OS X: in version 10.0 and later in Carbon.framework
  502. * CarbonLib: in CarbonLib 1.0 and later
  503. * Non-Carbon CFM: available as macro/inline
  504. }
  505. function NewNWidthHookUPP( userRoutine: NWidthHookProcPtr ): NWidthHookUPP; external name '_NewNWidthHookUPP';
  506. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  507. {
  508. * NewDrawHookUPP()
  509. *
  510. * Availability:
  511. * Mac OS X: in version 10.0 and later in Carbon.framework
  512. * CarbonLib: in CarbonLib 1.0 and later
  513. * Non-Carbon CFM: available as macro/inline
  514. }
  515. function NewDrawHookUPP( userRoutine: DrawHookProcPtr ): DrawHookUPP; external name '_NewDrawHookUPP';
  516. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  517. {
  518. * NewHitTestHookUPP()
  519. *
  520. * Availability:
  521. * Mac OS X: in version 10.0 and later in Carbon.framework
  522. * CarbonLib: in CarbonLib 1.0 and later
  523. * Non-Carbon CFM: available as macro/inline
  524. }
  525. function NewHitTestHookUPP( userRoutine: HitTestHookProcPtr ): HitTestHookUPP; external name '_NewHitTestHookUPP';
  526. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  527. {
  528. * NewTEFindWordUPP()
  529. *
  530. * Availability:
  531. * Mac OS X: in version 10.0 and later in Carbon.framework
  532. * CarbonLib: in CarbonLib 1.0 and later
  533. * Non-Carbon CFM: available as macro/inline
  534. }
  535. function NewTEFindWordUPP( userRoutine: TEFindWordProcPtr ): TEFindWordUPP; external name '_NewTEFindWordUPP';
  536. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  537. {
  538. * NewTERecalcUPP()
  539. *
  540. * Availability:
  541. * Mac OS X: in version 10.0 and later in Carbon.framework
  542. * CarbonLib: in CarbonLib 1.0 and later
  543. * Non-Carbon CFM: available as macro/inline
  544. }
  545. function NewTERecalcUPP( userRoutine: TERecalcProcPtr ): TERecalcUPP; external name '_NewTERecalcUPP';
  546. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  547. {
  548. * NewTEDoTextUPP()
  549. *
  550. * Availability:
  551. * Mac OS X: in version 10.0 and later in Carbon.framework
  552. * CarbonLib: in CarbonLib 1.0 and later
  553. * Non-Carbon CFM: available as macro/inline
  554. }
  555. function NewTEDoTextUPP( userRoutine: TEDoTextProcPtr ): TEDoTextUPP; external name '_NewTEDoTextUPP';
  556. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  557. {
  558. * NewTEClickLoopUPP()
  559. *
  560. * Availability:
  561. * Mac OS X: in version 10.0 and later in Carbon.framework
  562. * CarbonLib: in CarbonLib 1.0 and later
  563. * Non-Carbon CFM: available as macro/inline
  564. }
  565. function NewTEClickLoopUPP( userRoutine: TEClickLoopProcPtr ): TEClickLoopUPP; external name '_NewTEClickLoopUPP';
  566. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  567. {
  568. * NewWordBreakUPP()
  569. *
  570. * Availability:
  571. * Mac OS X: not available
  572. * CarbonLib: not available
  573. * Non-Carbon CFM: available as macro/inline
  574. }
  575. {
  576. * DisposeHighHookUPP()
  577. *
  578. * Availability:
  579. * Mac OS X: in version 10.0 and later in Carbon.framework
  580. * CarbonLib: in CarbonLib 1.0 and later
  581. * Non-Carbon CFM: available as macro/inline
  582. }
  583. procedure DisposeHighHookUPP( userUPP: HighHookUPP ); external name '_DisposeHighHookUPP';
  584. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  585. {
  586. * DisposeEOLHookUPP()
  587. *
  588. * Availability:
  589. * Mac OS X: in version 10.0 and later in Carbon.framework
  590. * CarbonLib: in CarbonLib 1.0 and later
  591. * Non-Carbon CFM: available as macro/inline
  592. }
  593. procedure DisposeEOLHookUPP( userUPP: EOLHookUPP ); external name '_DisposeEOLHookUPP';
  594. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  595. {
  596. * DisposeCaretHookUPP()
  597. *
  598. * Availability:
  599. * Mac OS X: in version 10.0 and later in Carbon.framework
  600. * CarbonLib: in CarbonLib 1.0 and later
  601. * Non-Carbon CFM: available as macro/inline
  602. }
  603. procedure DisposeCaretHookUPP( userUPP: CaretHookUPP ); external name '_DisposeCaretHookUPP';
  604. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  605. {
  606. * DisposeWidthHookUPP()
  607. *
  608. * Availability:
  609. * Mac OS X: in version 10.0 and later in Carbon.framework
  610. * CarbonLib: in CarbonLib 1.0 and later
  611. * Non-Carbon CFM: available as macro/inline
  612. }
  613. procedure DisposeWidthHookUPP( userUPP: WidthHookUPP ); external name '_DisposeWidthHookUPP';
  614. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  615. {
  616. * DisposeTextWidthHookUPP()
  617. *
  618. * Availability:
  619. * Mac OS X: in version 10.0 and later in Carbon.framework
  620. * CarbonLib: in CarbonLib 1.0 and later
  621. * Non-Carbon CFM: available as macro/inline
  622. }
  623. procedure DisposeTextWidthHookUPP( userUPP: TextWidthHookUPP ); external name '_DisposeTextWidthHookUPP';
  624. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  625. {
  626. * DisposeNWidthHookUPP()
  627. *
  628. * Availability:
  629. * Mac OS X: in version 10.0 and later in Carbon.framework
  630. * CarbonLib: in CarbonLib 1.0 and later
  631. * Non-Carbon CFM: available as macro/inline
  632. }
  633. procedure DisposeNWidthHookUPP( userUPP: NWidthHookUPP ); external name '_DisposeNWidthHookUPP';
  634. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  635. {
  636. * DisposeDrawHookUPP()
  637. *
  638. * Availability:
  639. * Mac OS X: in version 10.0 and later in Carbon.framework
  640. * CarbonLib: in CarbonLib 1.0 and later
  641. * Non-Carbon CFM: available as macro/inline
  642. }
  643. procedure DisposeDrawHookUPP( userUPP: DrawHookUPP ); external name '_DisposeDrawHookUPP';
  644. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  645. {
  646. * DisposeHitTestHookUPP()
  647. *
  648. * Availability:
  649. * Mac OS X: in version 10.0 and later in Carbon.framework
  650. * CarbonLib: in CarbonLib 1.0 and later
  651. * Non-Carbon CFM: available as macro/inline
  652. }
  653. procedure DisposeHitTestHookUPP( userUPP: HitTestHookUPP ); external name '_DisposeHitTestHookUPP';
  654. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  655. {
  656. * DisposeTEFindWordUPP()
  657. *
  658. * Availability:
  659. * Mac OS X: in version 10.0 and later in Carbon.framework
  660. * CarbonLib: in CarbonLib 1.0 and later
  661. * Non-Carbon CFM: available as macro/inline
  662. }
  663. procedure DisposeTEFindWordUPP( userUPP: TEFindWordUPP ); external name '_DisposeTEFindWordUPP';
  664. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  665. {
  666. * DisposeTERecalcUPP()
  667. *
  668. * Availability:
  669. * Mac OS X: in version 10.0 and later in Carbon.framework
  670. * CarbonLib: in CarbonLib 1.0 and later
  671. * Non-Carbon CFM: available as macro/inline
  672. }
  673. procedure DisposeTERecalcUPP( userUPP: TERecalcUPP ); external name '_DisposeTERecalcUPP';
  674. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  675. {
  676. * DisposeTEDoTextUPP()
  677. *
  678. * Availability:
  679. * Mac OS X: in version 10.0 and later in Carbon.framework
  680. * CarbonLib: in CarbonLib 1.0 and later
  681. * Non-Carbon CFM: available as macro/inline
  682. }
  683. procedure DisposeTEDoTextUPP( userUPP: TEDoTextUPP ); external name '_DisposeTEDoTextUPP';
  684. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  685. {
  686. * DisposeTEClickLoopUPP()
  687. *
  688. * Availability:
  689. * Mac OS X: in version 10.0 and later in Carbon.framework
  690. * CarbonLib: in CarbonLib 1.0 and later
  691. * Non-Carbon CFM: available as macro/inline
  692. }
  693. procedure DisposeTEClickLoopUPP( userUPP: TEClickLoopUPP ); external name '_DisposeTEClickLoopUPP';
  694. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  695. {
  696. * DisposeWordBreakUPP()
  697. *
  698. * Availability:
  699. * Mac OS X: not available
  700. * CarbonLib: not available
  701. * Non-Carbon CFM: available as macro/inline
  702. }
  703. {
  704. * InvokeHighHookUPP()
  705. *
  706. * Availability:
  707. * Mac OS X: in version 10.0 and later in Carbon.framework
  708. * CarbonLib: in CarbonLib 1.0 and later
  709. * Non-Carbon CFM: available as macro/inline
  710. }
  711. procedure InvokeHighHookUPP( const (*var*) r: Rect; pTE: TEPtr; userUPP: HighHookUPP ); external name '_InvokeHighHookUPP';
  712. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  713. {
  714. * InvokeEOLHookUPP()
  715. *
  716. * Availability:
  717. * Mac OS X: in version 10.0 and later in Carbon.framework
  718. * CarbonLib: in CarbonLib 1.0 and later
  719. * Non-Carbon CFM: available as macro/inline
  720. }
  721. function InvokeEOLHookUPP( theChar: ByteParameter; pTE: TEPtr; hTE: TEHandle; userUPP: EOLHookUPP ): Boolean; external name '_InvokeEOLHookUPP';
  722. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  723. {
  724. * InvokeCaretHookUPP()
  725. *
  726. * Availability:
  727. * Mac OS X: in version 10.0 and later in Carbon.framework
  728. * CarbonLib: in CarbonLib 1.0 and later
  729. * Non-Carbon CFM: available as macro/inline
  730. }
  731. procedure InvokeCaretHookUPP( const (*var*) r: Rect; pTE: TEPtr; userUPP: CaretHookUPP ); external name '_InvokeCaretHookUPP';
  732. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  733. {
  734. * InvokeWidthHookUPP()
  735. *
  736. * Availability:
  737. * Mac OS X: in version 10.0 and later in Carbon.framework
  738. * CarbonLib: in CarbonLib 1.0 and later
  739. * Non-Carbon CFM: available as macro/inline
  740. }
  741. function InvokeWidthHookUPP( textLen: UInt16; textOffset: UInt16; textBufferPtr: UnivPtr; pTE: TEPtr; hTE: TEHandle; userUPP: WidthHookUPP ): UInt16; external name '_InvokeWidthHookUPP';
  742. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  743. {
  744. * InvokeTextWidthHookUPP()
  745. *
  746. * Availability:
  747. * Mac OS X: in version 10.0 and later in Carbon.framework
  748. * CarbonLib: in CarbonLib 1.0 and later
  749. * Non-Carbon CFM: available as macro/inline
  750. }
  751. function InvokeTextWidthHookUPP( textLen: UInt16; textOffset: UInt16; textBufferPtr: UnivPtr; pTE: TEPtr; hTE: TEHandle; userUPP: TextWidthHookUPP ): UInt16; external name '_InvokeTextWidthHookUPP';
  752. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  753. {
  754. * InvokeNWidthHookUPP()
  755. *
  756. * Availability:
  757. * Mac OS X: in version 10.0 and later in Carbon.framework
  758. * CarbonLib: in CarbonLib 1.0 and later
  759. * Non-Carbon CFM: available as macro/inline
  760. }
  761. function InvokeNWidthHookUPP( styleRunLen: UInt16; styleRunOffset: UInt16; slop: SInt16; direction: SInt16; textBufferPtr: UnivPtr; var lineStart: SInt16; pTE: TEPtr; hTE: TEHandle; userUPP: NWidthHookUPP ): UInt16; external name '_InvokeNWidthHookUPP';
  762. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  763. {
  764. * InvokeDrawHookUPP()
  765. *
  766. * Availability:
  767. * Mac OS X: in version 10.0 and later in Carbon.framework
  768. * CarbonLib: in CarbonLib 1.0 and later
  769. * Non-Carbon CFM: available as macro/inline
  770. }
  771. procedure InvokeDrawHookUPP( textOffset: UInt16; drawLen: UInt16; textBufferPtr: UnivPtr; pTE: TEPtr; hTE: TEHandle; userUPP: DrawHookUPP ); external name '_InvokeDrawHookUPP';
  772. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  773. {
  774. * InvokeHitTestHookUPP()
  775. *
  776. * Availability:
  777. * Mac OS X: in version 10.0 and later in Carbon.framework
  778. * CarbonLib: in CarbonLib 1.0 and later
  779. * Non-Carbon CFM: available as macro/inline
  780. }
  781. function InvokeHitTestHookUPP( styleRunLen: UInt16; styleRunOffset: UInt16; slop: UInt16; textBufferPtr: UnivPtr; pTE: TEPtr; hTE: TEHandle; var pixelWidth: UInt16; var charOffset: UInt16; var pixelInChar: Boolean; userUPP: HitTestHookUPP ): Boolean; external name '_InvokeHitTestHookUPP';
  782. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  783. {
  784. * InvokeTEFindWordUPP()
  785. *
  786. * Availability:
  787. * Mac OS X: in version 10.0 and later in Carbon.framework
  788. * CarbonLib: in CarbonLib 1.0 and later
  789. * Non-Carbon CFM: available as macro/inline
  790. }
  791. procedure InvokeTEFindWordUPP( currentPos: UInt16; caller: SInt16; pTE: TEPtr; hTE: TEHandle; var wordStart: UInt16; var wordEnd: UInt16; userUPP: TEFindWordUPP ); external name '_InvokeTEFindWordUPP';
  792. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  793. {
  794. * InvokeTERecalcUPP()
  795. *
  796. * Availability:
  797. * Mac OS X: in version 10.0 and later in Carbon.framework
  798. * CarbonLib: in CarbonLib 1.0 and later
  799. * Non-Carbon CFM: available as macro/inline
  800. }
  801. procedure InvokeTERecalcUPP( pTE: TEPtr; changeLength: UInt16; var lineStart: UInt16; var firstChar: UInt16; var lastChar: UInt16; userUPP: TERecalcUPP ); external name '_InvokeTERecalcUPP';
  802. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  803. {
  804. * InvokeTEDoTextUPP()
  805. *
  806. * Availability:
  807. * Mac OS X: in version 10.0 and later in Carbon.framework
  808. * CarbonLib: in CarbonLib 1.0 and later
  809. * Non-Carbon CFM: available as macro/inline
  810. }
  811. procedure InvokeTEDoTextUPP( pTE: TEPtr; firstChar: UInt16; lastChar: UInt16; selector: SInt16; var currentGrafPort: GrafPtr; var charPosition: SInt16; userUPP: TEDoTextUPP ); external name '_InvokeTEDoTextUPP';
  812. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  813. {
  814. * InvokeTEClickLoopUPP()
  815. *
  816. * Availability:
  817. * Mac OS X: in version 10.0 and later in Carbon.framework
  818. * CarbonLib: in CarbonLib 1.0 and later
  819. * Non-Carbon CFM: available as macro/inline
  820. }
  821. function InvokeTEClickLoopUPP( pTE: TEPtr; userUPP: TEClickLoopUPP ): Boolean; external name '_InvokeTEClickLoopUPP';
  822. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  823. {
  824. * InvokeWordBreakUPP()
  825. *
  826. * Availability:
  827. * Mac OS X: not available
  828. * CarbonLib: not available
  829. * Non-Carbon CFM: available as macro/inline
  830. }
  831. const
  832. { feature bit 4 for TEFeatureFlag no longer in use }
  833. teFUseTextServices = 4; {00010000b }
  834. {
  835. * TEScrapHandle() *** DEPRECATED ***
  836. *
  837. * Mac OS X threading:
  838. * Not thread safe
  839. *
  840. * Availability:
  841. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  842. * CarbonLib: in CarbonLib 1.0 and later
  843. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  844. }
  845. function TEScrapHandle: Handle; external name '_TEScrapHandle';
  846. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  847. {
  848. * TEGetScrapLength() *** DEPRECATED ***
  849. *
  850. * Mac OS X threading:
  851. * Not thread safe
  852. *
  853. * Availability:
  854. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  855. * CarbonLib: in CarbonLib 1.0 and later
  856. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  857. }
  858. function TEGetScrapLength: SInt32; external name '_TEGetScrapLength';
  859. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  860. {
  861. * TEInit()
  862. *
  863. * Availability:
  864. * Mac OS X: not available
  865. * CarbonLib: not available
  866. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  867. }
  868. {
  869. * TENew() *** 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 but deprecated in 10.4
  876. * CarbonLib: in CarbonLib 1.0 and later
  877. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  878. }
  879. function TENew( const (*var*) destRect: Rect; const (*var*) viewRect: Rect ): TEHandle; external name '_TENew';
  880. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  881. {
  882. * TEDispose() *** 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 but deprecated in 10.4
  889. * CarbonLib: in CarbonLib 1.0 and later
  890. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  891. }
  892. procedure TEDispose( hTE: TEHandle ); external name '_TEDispose';
  893. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  894. {
  895. * TESetText() *** 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 but deprecated in 10.4
  902. * CarbonLib: in CarbonLib 1.0 and later
  903. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  904. }
  905. procedure TESetText( text: {const} UnivPtr; length: SInt32; hTE: TEHandle ); external name '_TESetText';
  906. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  907. {
  908. * TEGetText() *** 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 but deprecated in 10.4
  915. * CarbonLib: in CarbonLib 1.0 and later
  916. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  917. }
  918. function TEGetText( hTE: TEHandle ): CharsHandle; external name '_TEGetText';
  919. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  920. {
  921. * TEIdle() *** 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 but deprecated in 10.4
  928. * CarbonLib: in CarbonLib 1.0 and later
  929. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  930. }
  931. procedure TEIdle( hTE: TEHandle ); external name '_TEIdle';
  932. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  933. {
  934. * TESetSelect() *** 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 but deprecated in 10.4
  941. * CarbonLib: in CarbonLib 1.0 and later
  942. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  943. }
  944. procedure TESetSelect( selStart: SInt32; selEnd: SInt32; hTE: TEHandle ); external name '_TESetSelect';
  945. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  946. {
  947. * TEActivate() *** 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 but deprecated in 10.4
  954. * CarbonLib: in CarbonLib 1.0 and later
  955. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  956. }
  957. procedure TEActivate( hTE: TEHandle ); external name '_TEActivate';
  958. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  959. {
  960. * TEDeactivate() *** 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 but deprecated in 10.4
  967. * CarbonLib: in CarbonLib 1.0 and later
  968. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  969. }
  970. procedure TEDeactivate( hTE: TEHandle ); external name '_TEDeactivate';
  971. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  972. {
  973. * TEKey() *** 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 but deprecated in 10.4
  980. * CarbonLib: in CarbonLib 1.0 and later
  981. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  982. }
  983. procedure TEKey( key: CharParameter; hTE: TEHandle ); external name '_TEKey';
  984. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  985. {
  986. * TECut() *** 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 but deprecated in 10.4
  993. * CarbonLib: in CarbonLib 1.0 and later
  994. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  995. }
  996. procedure TECut( hTE: TEHandle ); external name '_TECut';
  997. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  998. {
  999. * TECopy() *** 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 but deprecated in 10.4
  1006. * CarbonLib: in CarbonLib 1.0 and later
  1007. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1008. }
  1009. procedure TECopy( hTE: TEHandle ); external name '_TECopy';
  1010. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1011. {
  1012. * TEPaste() *** 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 but deprecated in 10.4
  1019. * CarbonLib: in CarbonLib 1.0 and later
  1020. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1021. }
  1022. procedure TEPaste( hTE: TEHandle ); external name '_TEPaste';
  1023. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1024. {
  1025. * TEDelete() *** 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 but deprecated in 10.4
  1032. * CarbonLib: in CarbonLib 1.0 and later
  1033. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1034. }
  1035. procedure TEDelete( hTE: TEHandle ); external name '_TEDelete';
  1036. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1037. {
  1038. * TEInsert() *** 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 but deprecated in 10.4
  1045. * CarbonLib: in CarbonLib 1.0 and later
  1046. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1047. }
  1048. procedure TEInsert( text: {const} UnivPtr; length: SInt32; hTE: TEHandle ); external name '_TEInsert';
  1049. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1050. {
  1051. * TESetAlignment() *** 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 but deprecated in 10.4
  1058. * CarbonLib: in CarbonLib 1.0 and later
  1059. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1060. }
  1061. procedure TESetAlignment( just: SInt16; hTE: TEHandle ); external name '_TESetAlignment';
  1062. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1063. {
  1064. * TEUpdate() *** DEPRECATED ***
  1065. *
  1066. * Mac OS X threading:
  1067. * Not thread safe
  1068. *
  1069. * Availability:
  1070. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1071. * CarbonLib: in CarbonLib 1.0 and later
  1072. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1073. }
  1074. procedure TEUpdate( const (*var*) rUpdate: Rect; hTE: TEHandle ); external name '_TEUpdate';
  1075. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1076. {
  1077. * TETextBox() *** DEPRECATED ***
  1078. *
  1079. * Mac OS X threading:
  1080. * Not thread safe
  1081. *
  1082. * Availability:
  1083. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1084. * CarbonLib: in CarbonLib 1.0 and later
  1085. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1086. }
  1087. procedure TETextBox( text: {const} UnivPtr; length: SInt32; const (*var*) box: Rect; just: SInt16 ); external name '_TETextBox';
  1088. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1089. {
  1090. * TEScroll() *** DEPRECATED ***
  1091. *
  1092. * Mac OS X threading:
  1093. * Not thread safe
  1094. *
  1095. * Availability:
  1096. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1097. * CarbonLib: in CarbonLib 1.0 and later
  1098. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1099. }
  1100. procedure TEScroll( dh: SInt16; dv: SInt16; hTE: TEHandle ); external name '_TEScroll';
  1101. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1102. {
  1103. * TESelView() *** DEPRECATED ***
  1104. *
  1105. * Mac OS X threading:
  1106. * Not thread safe
  1107. *
  1108. * Availability:
  1109. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1110. * CarbonLib: in CarbonLib 1.0 and later
  1111. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1112. }
  1113. procedure TESelView( hTE: TEHandle ); external name '_TESelView';
  1114. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1115. {
  1116. * TEPinScroll() *** DEPRECATED ***
  1117. *
  1118. * Mac OS X threading:
  1119. * Not thread safe
  1120. *
  1121. * Availability:
  1122. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1123. * CarbonLib: in CarbonLib 1.0 and later
  1124. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1125. }
  1126. procedure TEPinScroll( dh: SInt16; dv: SInt16; hTE: TEHandle ); external name '_TEPinScroll';
  1127. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1128. {
  1129. * TEAutoView() *** DEPRECATED ***
  1130. *
  1131. * Mac OS X threading:
  1132. * Not thread safe
  1133. *
  1134. * Availability:
  1135. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1136. * CarbonLib: in CarbonLib 1.0 and later
  1137. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1138. }
  1139. procedure TEAutoView( fAuto: Boolean; hTE: TEHandle ); external name '_TEAutoView';
  1140. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1141. {
  1142. * TECalText() *** DEPRECATED ***
  1143. *
  1144. * Mac OS X threading:
  1145. * Not thread safe
  1146. *
  1147. * Availability:
  1148. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1149. * CarbonLib: in CarbonLib 1.0 and later
  1150. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1151. }
  1152. procedure TECalText( hTE: TEHandle ); external name '_TECalText';
  1153. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1154. {
  1155. * TEGetOffset() *** DEPRECATED ***
  1156. *
  1157. * Mac OS X threading:
  1158. * Not thread safe
  1159. *
  1160. * Availability:
  1161. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1162. * CarbonLib: in CarbonLib 1.0 and later
  1163. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1164. }
  1165. function TEGetOffset( pt: Point; hTE: TEHandle ): SInt16; external name '_TEGetOffset';
  1166. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1167. {
  1168. * TEGetPoint() *** DEPRECATED ***
  1169. *
  1170. * Mac OS X threading:
  1171. * Not thread safe
  1172. *
  1173. * Availability:
  1174. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1175. * CarbonLib: in CarbonLib 1.0 and later
  1176. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1177. }
  1178. function TEGetPoint( offset: SInt16; hTE: TEHandle ): Point; external name '_TEGetPoint';
  1179. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1180. {
  1181. * TEClick() *** DEPRECATED ***
  1182. *
  1183. * Mac OS X threading:
  1184. * Not thread safe
  1185. *
  1186. * Availability:
  1187. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1188. * CarbonLib: in CarbonLib 1.0 and later
  1189. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1190. }
  1191. procedure TEClick( pt: Point; fExtend: Boolean; h: TEHandle ); external name '_TEClick';
  1192. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1193. {
  1194. * TEStyleNew() *** DEPRECATED ***
  1195. *
  1196. * Mac OS X threading:
  1197. * Not thread safe
  1198. *
  1199. * Availability:
  1200. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1201. * CarbonLib: in CarbonLib 1.0 and later
  1202. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1203. }
  1204. function TEStyleNew( const (*var*) destRect: Rect; const (*var*) viewRect: Rect ): TEHandle; external name '_TEStyleNew';
  1205. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1206. {
  1207. * TESetStyleHandle() *** DEPRECATED ***
  1208. *
  1209. * Mac OS X threading:
  1210. * Not thread safe
  1211. *
  1212. * Availability:
  1213. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1214. * CarbonLib: in CarbonLib 1.0 and later
  1215. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1216. }
  1217. procedure TESetStyleHandle( theHandle: TEStyleHandle; hTE: TEHandle ); external name '_TESetStyleHandle';
  1218. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1219. {
  1220. * TEGetStyleHandle() *** DEPRECATED ***
  1221. *
  1222. * Mac OS X threading:
  1223. * Not thread safe
  1224. *
  1225. * Availability:
  1226. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1227. * CarbonLib: in CarbonLib 1.0 and later
  1228. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1229. }
  1230. function TEGetStyleHandle( hTE: TEHandle ): TEStyleHandle; external name '_TEGetStyleHandle';
  1231. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1232. {
  1233. * TEGetStyle() *** DEPRECATED ***
  1234. *
  1235. * Mac OS X threading:
  1236. * Not thread safe
  1237. *
  1238. * Availability:
  1239. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1240. * CarbonLib: in CarbonLib 1.0 and later
  1241. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1242. }
  1243. procedure TEGetStyle( offset: SInt16; var theStyle: TextStyle; var lineHeight: SInt16; var fontAscent: SInt16; hTE: TEHandle ); external name '_TEGetStyle';
  1244. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1245. {
  1246. * TEStylePaste() *** DEPRECATED ***
  1247. *
  1248. * Mac OS X threading:
  1249. * Not thread safe
  1250. *
  1251. * Availability:
  1252. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1253. * CarbonLib: in CarbonLib 1.0 and later
  1254. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1255. }
  1256. procedure TEStylePaste( hTE: TEHandle ); external name '_TEStylePaste';
  1257. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1258. {
  1259. * TESetStyle() *** DEPRECATED ***
  1260. *
  1261. * Mac OS X threading:
  1262. * Not thread safe
  1263. *
  1264. * Availability:
  1265. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1266. * CarbonLib: in CarbonLib 1.0 and later
  1267. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1268. }
  1269. procedure TESetStyle( mode: SInt16; const (*var*) newStyle: TextStyle; fRedraw: Boolean; hTE: TEHandle ); external name '_TESetStyle';
  1270. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1271. {
  1272. * TEReplaceStyle() *** DEPRECATED ***
  1273. *
  1274. * Mac OS X threading:
  1275. * Not thread safe
  1276. *
  1277. * Availability:
  1278. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1279. * CarbonLib: in CarbonLib 1.0 and later
  1280. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1281. }
  1282. procedure TEReplaceStyle( mode: SInt16; const (*var*) oldStyle: TextStyle; const (*var*) newStyle: TextStyle; fRedraw: Boolean; hTE: TEHandle ); external name '_TEReplaceStyle';
  1283. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1284. {
  1285. * TEGetStyleScrapHandle() *** DEPRECATED ***
  1286. *
  1287. * Mac OS X threading:
  1288. * Not thread safe
  1289. *
  1290. * Availability:
  1291. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1292. * CarbonLib: in CarbonLib 1.0 and later
  1293. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1294. }
  1295. function TEGetStyleScrapHandle( hTE: TEHandle ): StScrpHandle; external name '_TEGetStyleScrapHandle';
  1296. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1297. {
  1298. * TEStyleInsert() *** DEPRECATED ***
  1299. *
  1300. * Mac OS X threading:
  1301. * Not thread safe
  1302. *
  1303. * Availability:
  1304. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1305. * CarbonLib: in CarbonLib 1.0 and later
  1306. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1307. }
  1308. procedure TEStyleInsert( text: {const} UnivPtr; length: SInt32; hST: StScrpHandle; hTE: TEHandle ); external name '_TEStyleInsert';
  1309. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1310. {
  1311. * TEGetHeight() *** DEPRECATED ***
  1312. *
  1313. * Mac OS X threading:
  1314. * Not thread safe
  1315. *
  1316. * Availability:
  1317. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1318. * CarbonLib: in CarbonLib 1.0 and later
  1319. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1320. }
  1321. function TEGetHeight( endLine: SInt32; startLine: SInt32; hTE: TEHandle ): SInt32; external name '_TEGetHeight';
  1322. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1323. {
  1324. * TEContinuousStyle() *** DEPRECATED ***
  1325. *
  1326. * Mac OS X threading:
  1327. * Not thread safe
  1328. *
  1329. * Availability:
  1330. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1331. * CarbonLib: in CarbonLib 1.0 and later
  1332. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1333. }
  1334. function TEContinuousStyle( var mode: SInt16; var aStyle: TextStyle; hTE: TEHandle ): Boolean; external name '_TEContinuousStyle';
  1335. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1336. {
  1337. * TEUseStyleScrap() *** DEPRECATED ***
  1338. *
  1339. * Mac OS X threading:
  1340. * Not thread safe
  1341. *
  1342. * Availability:
  1343. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1344. * CarbonLib: in CarbonLib 1.0 and later
  1345. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1346. }
  1347. procedure TEUseStyleScrap( rangeStart: SInt32; rangeEnd: SInt32; newStyles: StScrpHandle; fRedraw: Boolean; hTE: TEHandle ); external name '_TEUseStyleScrap';
  1348. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1349. {
  1350. * TECustomHook() *** DEPRECATED ***
  1351. *
  1352. * Mac OS X threading:
  1353. * Not thread safe
  1354. *
  1355. * Availability:
  1356. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1357. * CarbonLib: in CarbonLib 1.0 and later
  1358. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1359. }
  1360. procedure TECustomHook( which: TEIntHook; var addr: UniversalProcPtr; hTE: TEHandle ); external name '_TECustomHook';
  1361. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1362. {
  1363. * TENumStyles() *** DEPRECATED ***
  1364. *
  1365. * Mac OS X threading:
  1366. * Not thread safe
  1367. *
  1368. * Availability:
  1369. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1370. * CarbonLib: in CarbonLib 1.0 and later
  1371. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1372. }
  1373. function TENumStyles( rangeStart: SInt32; rangeEnd: SInt32; hTE: TEHandle ): SInt32; external name '_TENumStyles';
  1374. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1375. {
  1376. * TEFeatureFlag() *** DEPRECATED ***
  1377. *
  1378. * Mac OS X threading:
  1379. * Not thread safe
  1380. *
  1381. * Availability:
  1382. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1383. * CarbonLib: in CarbonLib 1.0 and later
  1384. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1385. }
  1386. function TEFeatureFlag( feature: SInt16; action: SInt16; hTE: TEHandle ): SInt16; external name '_TEFeatureFlag';
  1387. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1388. {
  1389. * TEGetHiliteRgn() *** DEPRECATED ***
  1390. *
  1391. * Mac OS X threading:
  1392. * Not thread safe
  1393. *
  1394. * Availability:
  1395. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1396. * CarbonLib: in CarbonLib 1.0 and later
  1397. * Non-Carbon CFM: in DragLib 1.1 and later
  1398. }
  1399. function TEGetHiliteRgn( region: RgnHandle; hTE: TEHandle ): OSErr; external name '_TEGetHiliteRgn';
  1400. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1401. {
  1402. * TESetInlineInputContextPtr()
  1403. *
  1404. * Availability:
  1405. * Mac OS X: not available
  1406. * CarbonLib: not available
  1407. * Non-Carbon CFM: not available
  1408. }
  1409. {
  1410. * TEConfirmInlineInput()
  1411. *
  1412. * Availability:
  1413. * Mac OS X: not available
  1414. * CarbonLib: not available
  1415. * Non-Carbon CFM: not available
  1416. }
  1417. {
  1418. * TESetScrapLength() *** DEPRECATED ***
  1419. *
  1420. * Mac OS X threading:
  1421. * Not thread safe
  1422. *
  1423. * Availability:
  1424. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1425. * CarbonLib: in CarbonLib 1.0 and later
  1426. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1427. }
  1428. procedure TESetScrapLength( length: SInt32 ); external name '_TESetScrapLength';
  1429. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1430. {
  1431. * TEFromScrap() *** DEPRECATED ***
  1432. *
  1433. * Mac OS X threading:
  1434. * Not thread safe
  1435. *
  1436. * Availability:
  1437. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1438. * CarbonLib: in CarbonLib 1.0 and later
  1439. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1440. }
  1441. function TEFromScrap: OSErr; external name '_TEFromScrap';
  1442. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1443. {
  1444. * TEToScrap() *** DEPRECATED ***
  1445. *
  1446. * Mac OS X threading:
  1447. * Not thread safe
  1448. *
  1449. * Availability:
  1450. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1451. * CarbonLib: in CarbonLib 1.0 and later
  1452. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1453. }
  1454. function TEToScrap: OSErr; external name '_TEToScrap';
  1455. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1456. {
  1457. * TESetClickLoop() *** DEPRECATED ***
  1458. *
  1459. * Mac OS X threading:
  1460. * Not thread safe
  1461. *
  1462. * Availability:
  1463. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1464. * CarbonLib: in CarbonLib 1.0 and later
  1465. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1466. }
  1467. procedure TESetClickLoop( clikProc: TEClickLoopUPP; hTE: TEHandle ); external name '_TESetClickLoop';
  1468. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1469. { check}
  1470. {
  1471. * TESetWordBreak()
  1472. *
  1473. * Availability:
  1474. * Mac OS X: not available
  1475. * CarbonLib: not available
  1476. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1477. }
  1478. {
  1479. * TEGetDoTextHook() *** DEPRECATED ***
  1480. *
  1481. * Mac OS X threading:
  1482. * Not thread safe
  1483. *
  1484. * Availability:
  1485. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1486. * CarbonLib: in CarbonLib 1.0 and later
  1487. * Non-Carbon CFM: not available
  1488. }
  1489. function TEGetDoTextHook: TEDoTextUPP; external name '_TEGetDoTextHook';
  1490. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1491. {
  1492. * TESetDoTextHook() *** DEPRECATED ***
  1493. *
  1494. * Mac OS X threading:
  1495. * Not thread safe
  1496. *
  1497. * Availability:
  1498. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1499. * CarbonLib: in CarbonLib 1.0 and later
  1500. * Non-Carbon CFM: not available
  1501. }
  1502. procedure TESetDoTextHook( value: TEDoTextUPP ); external name '_TESetDoTextHook';
  1503. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1504. {
  1505. * TEGetRecalcHook() *** DEPRECATED ***
  1506. *
  1507. * Mac OS X threading:
  1508. * Not thread safe
  1509. *
  1510. * Availability:
  1511. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1512. * CarbonLib: in CarbonLib 1.0 and later
  1513. * Non-Carbon CFM: not available
  1514. }
  1515. function TEGetRecalcHook: TERecalcUPP; external name '_TEGetRecalcHook';
  1516. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1517. {
  1518. * TESetRecalcHook() *** DEPRECATED ***
  1519. *
  1520. * Mac OS X threading:
  1521. * Not thread safe
  1522. *
  1523. * Availability:
  1524. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1525. * CarbonLib: in CarbonLib 1.0 and later
  1526. * Non-Carbon CFM: not available
  1527. }
  1528. procedure TESetRecalcHook( value: TERecalcUPP ); external name '_TESetRecalcHook';
  1529. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1530. {
  1531. * TEGetFindWordHook() *** DEPRECATED ***
  1532. *
  1533. * Mac OS X threading:
  1534. * Not thread safe
  1535. *
  1536. * Availability:
  1537. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1538. * CarbonLib: in CarbonLib 1.0 and later
  1539. * Non-Carbon CFM: not available
  1540. }
  1541. function TEGetFindWordHook: TEFindWordUPP; external name '_TEGetFindWordHook';
  1542. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1543. {
  1544. * TESetFindWordHook() *** DEPRECATED ***
  1545. *
  1546. * Mac OS X threading:
  1547. * Not thread safe
  1548. *
  1549. * Availability:
  1550. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1551. * CarbonLib: in CarbonLib 1.0 and later
  1552. * Non-Carbon CFM: not available
  1553. }
  1554. procedure TESetFindWordHook( value: TEFindWordUPP ); external name '_TESetFindWordHook';
  1555. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1556. {
  1557. * TEGetScrapHandle() *** DEPRECATED ***
  1558. *
  1559. * Mac OS X threading:
  1560. * Not thread safe
  1561. *
  1562. * Availability:
  1563. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1564. * CarbonLib: in CarbonLib 1.0 and later
  1565. * Non-Carbon CFM: not available
  1566. }
  1567. function TEGetScrapHandle: Handle; external name '_TEGetScrapHandle';
  1568. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1569. {
  1570. * TESetScrapHandle() *** DEPRECATED ***
  1571. *
  1572. * Mac OS X threading:
  1573. * Not thread safe
  1574. *
  1575. * Availability:
  1576. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1577. * CarbonLib: in CarbonLib 1.0 and later
  1578. * Non-Carbon CFM: not available
  1579. }
  1580. procedure TESetScrapHandle( value: Handle ); external name '_TESetScrapHandle';
  1581. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1582. { LMGetWordRedraw and LMSetWordRedraw were previously in LowMem.h }
  1583. { Deprecated for Carbon on MacOS X }
  1584. { This lomem is no longer used by the implementation of TextEdit }
  1585. { on MacOS X, so setting it will have no effect. }
  1586. {
  1587. * LMGetWordRedraw() *** DEPRECATED ***
  1588. *
  1589. * Mac OS X threading:
  1590. * Not thread safe
  1591. *
  1592. * Availability:
  1593. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1594. * CarbonLib: in CarbonLib 1.0 and later
  1595. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1596. }
  1597. function LMGetWordRedraw: UInt8; external name '_LMGetWordRedraw';
  1598. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1599. {
  1600. * LMSetWordRedraw() *** DEPRECATED ***
  1601. *
  1602. * Mac OS X threading:
  1603. * Not thread safe
  1604. *
  1605. * Availability:
  1606. * Mac OS X: in version 10.0 and later in Carbon.framework but deprecated in 10.4
  1607. * CarbonLib: in CarbonLib 1.0 and later
  1608. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1609. }
  1610. procedure LMSetWordRedraw( value: UInt8 ); external name '_LMSetWordRedraw';
  1611. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  1612. {
  1613. * teclick()
  1614. *
  1615. * Availability:
  1616. * Mac OS X: not available
  1617. * CarbonLib: not available
  1618. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1619. }
  1620. end.