Quickdraw.pas 274 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525252625272528252925302531253225332534253525362537253825392540254125422543254425452546254725482549255025512552255325542555255625572558255925602561256225632564256525662567256825692570257125722573257425752576257725782579258025812582258325842585258625872588258925902591259225932594259525962597259825992600260126022603260426052606260726082609261026112612261326142615261626172618261926202621262226232624262526262627262826292630263126322633263426352636263726382639264026412642264326442645264626472648264926502651265226532654265526562657265826592660266126622663266426652666266726682669267026712672267326742675267626772678267926802681268226832684268526862687268826892690269126922693269426952696269726982699270027012702270327042705270627072708270927102711271227132714271527162717271827192720272127222723272427252726272727282729273027312732273327342735273627372738273927402741274227432744274527462747274827492750275127522753275427552756275727582759276027612762276327642765276627672768276927702771277227732774277527762777277827792780278127822783278427852786278727882789279027912792279327942795279627972798279928002801280228032804280528062807280828092810281128122813281428152816281728182819282028212822282328242825282628272828282928302831283228332834283528362837283828392840284128422843284428452846284728482849285028512852285328542855285628572858285928602861286228632864286528662867286828692870287128722873287428752876287728782879288028812882288328842885288628872888288928902891289228932894289528962897289828992900290129022903290429052906290729082909291029112912291329142915291629172918291929202921292229232924292529262927292829292930293129322933293429352936293729382939294029412942294329442945294629472948294929502951295229532954295529562957295829592960296129622963296429652966296729682969297029712972297329742975297629772978297929802981298229832984298529862987298829892990299129922993299429952996299729982999300030013002300330043005300630073008300930103011301230133014301530163017301830193020302130223023302430253026302730283029303030313032303330343035303630373038303930403041304230433044304530463047304830493050305130523053305430553056305730583059306030613062306330643065306630673068306930703071307230733074307530763077307830793080308130823083308430853086308730883089309030913092309330943095309630973098309931003101310231033104310531063107310831093110311131123113311431153116311731183119312031213122312331243125312631273128312931303131313231333134313531363137313831393140314131423143314431453146314731483149315031513152315331543155315631573158315931603161316231633164316531663167316831693170317131723173317431753176317731783179318031813182318331843185318631873188318931903191319231933194319531963197319831993200320132023203320432053206320732083209321032113212321332143215321632173218321932203221322232233224322532263227322832293230323132323233323432353236323732383239324032413242324332443245324632473248324932503251325232533254325532563257325832593260326132623263326432653266326732683269327032713272327332743275327632773278327932803281328232833284328532863287328832893290329132923293329432953296329732983299330033013302330333043305330633073308330933103311331233133314331533163317331833193320332133223323332433253326332733283329333033313332333333343335333633373338333933403341334233433344334533463347334833493350335133523353335433553356335733583359336033613362336333643365336633673368336933703371337233733374337533763377337833793380338133823383338433853386338733883389339033913392339333943395339633973398339934003401340234033404340534063407340834093410341134123413341434153416341734183419342034213422342334243425342634273428342934303431343234333434343534363437343834393440344134423443344434453446344734483449345034513452345334543455345634573458345934603461346234633464346534663467346834693470347134723473347434753476347734783479348034813482348334843485348634873488348934903491349234933494349534963497349834993500350135023503350435053506350735083509351035113512351335143515351635173518351935203521352235233524352535263527352835293530353135323533353435353536353735383539354035413542354335443545354635473548354935503551355235533554355535563557355835593560356135623563356435653566356735683569357035713572357335743575357635773578357935803581358235833584358535863587358835893590359135923593359435953596359735983599360036013602360336043605360636073608360936103611361236133614361536163617361836193620362136223623362436253626362736283629363036313632363336343635363636373638363936403641364236433644364536463647364836493650365136523653365436553656365736583659366036613662366336643665366636673668366936703671367236733674367536763677367836793680368136823683368436853686368736883689369036913692369336943695369636973698369937003701370237033704370537063707370837093710371137123713371437153716371737183719372037213722372337243725372637273728372937303731373237333734373537363737373837393740374137423743374437453746374737483749375037513752375337543755375637573758375937603761376237633764376537663767376837693770377137723773377437753776377737783779378037813782378337843785378637873788378937903791379237933794379537963797379837993800380138023803380438053806380738083809381038113812381338143815381638173818381938203821382238233824382538263827382838293830383138323833383438353836383738383839384038413842384338443845384638473848384938503851385238533854385538563857385838593860386138623863386438653866386738683869387038713872387338743875387638773878387938803881388238833884388538863887388838893890389138923893389438953896389738983899390039013902390339043905390639073908390939103911391239133914391539163917391839193920392139223923392439253926392739283929393039313932393339343935393639373938393939403941394239433944394539463947394839493950395139523953395439553956395739583959396039613962396339643965396639673968396939703971397239733974397539763977397839793980398139823983398439853986398739883989399039913992399339943995399639973998399940004001400240034004400540064007400840094010401140124013401440154016401740184019402040214022402340244025402640274028402940304031403240334034403540364037403840394040404140424043404440454046404740484049405040514052405340544055405640574058405940604061406240634064406540664067406840694070407140724073407440754076407740784079408040814082408340844085408640874088408940904091409240934094409540964097409840994100410141024103410441054106410741084109411041114112411341144115411641174118411941204121412241234124412541264127412841294130413141324133413441354136413741384139414041414142414341444145414641474148414941504151415241534154415541564157415841594160416141624163416441654166416741684169417041714172417341744175417641774178417941804181418241834184418541864187418841894190419141924193419441954196419741984199420042014202420342044205420642074208420942104211421242134214421542164217421842194220422142224223422442254226422742284229423042314232423342344235423642374238423942404241424242434244424542464247424842494250425142524253425442554256425742584259426042614262426342644265426642674268426942704271427242734274427542764277427842794280428142824283428442854286428742884289429042914292429342944295429642974298429943004301430243034304430543064307430843094310431143124313431443154316431743184319432043214322432343244325432643274328432943304331433243334334433543364337433843394340434143424343434443454346434743484349435043514352435343544355435643574358435943604361436243634364436543664367436843694370437143724373437443754376437743784379438043814382438343844385438643874388438943904391439243934394439543964397439843994400440144024403440444054406440744084409441044114412441344144415441644174418441944204421442244234424442544264427442844294430443144324433443444354436443744384439444044414442444344444445444644474448444944504451445244534454445544564457445844594460446144624463446444654466446744684469447044714472447344744475447644774478447944804481448244834484448544864487448844894490449144924493449444954496449744984499450045014502450345044505450645074508450945104511451245134514451545164517451845194520452145224523452445254526452745284529453045314532453345344535453645374538453945404541454245434544454545464547454845494550455145524553455445554556455745584559456045614562456345644565456645674568456945704571457245734574457545764577457845794580458145824583458445854586458745884589459045914592459345944595459645974598459946004601460246034604460546064607460846094610461146124613461446154616461746184619462046214622462346244625462646274628462946304631463246334634463546364637463846394640464146424643464446454646464746484649465046514652465346544655465646574658465946604661466246634664466546664667466846694670467146724673467446754676467746784679468046814682468346844685468646874688468946904691469246934694469546964697469846994700470147024703470447054706470747084709471047114712471347144715471647174718471947204721472247234724472547264727472847294730473147324733473447354736473747384739474047414742474347444745474647474748474947504751475247534754475547564757475847594760476147624763476447654766476747684769477047714772477347744775477647774778477947804781478247834784478547864787478847894790479147924793479447954796479747984799480048014802480348044805480648074808480948104811481248134814481548164817481848194820482148224823482448254826482748284829483048314832483348344835483648374838483948404841484248434844484548464847484848494850485148524853485448554856485748584859486048614862486348644865486648674868486948704871487248734874487548764877487848794880488148824883488448854886488748884889489048914892489348944895489648974898489949004901490249034904490549064907490849094910491149124913491449154916491749184919492049214922492349244925492649274928492949304931493249334934493549364937493849394940494149424943494449454946494749484949495049514952495349544955495649574958495949604961496249634964496549664967496849694970497149724973497449754976497749784979498049814982498349844985498649874988498949904991499249934994499549964997499849995000500150025003500450055006500750085009501050115012501350145015501650175018501950205021502250235024502550265027502850295030503150325033503450355036503750385039504050415042504350445045504650475048504950505051505250535054505550565057505850595060506150625063506450655066506750685069507050715072507350745075507650775078507950805081508250835084508550865087508850895090509150925093509450955096509750985099510051015102510351045105510651075108510951105111511251135114511551165117511851195120512151225123512451255126512751285129513051315132513351345135513651375138513951405141514251435144514551465147514851495150515151525153515451555156515751585159516051615162516351645165516651675168516951705171517251735174517551765177517851795180518151825183518451855186518751885189519051915192519351945195519651975198519952005201520252035204520552065207520852095210521152125213521452155216521752185219522052215222522352245225522652275228522952305231523252335234523552365237523852395240524152425243524452455246524752485249525052515252525352545255525652575258525952605261526252635264526552665267526852695270527152725273527452755276527752785279528052815282528352845285528652875288528952905291529252935294529552965297529852995300530153025303530453055306530753085309531053115312531353145315531653175318531953205321532253235324532553265327532853295330533153325333533453355336533753385339534053415342534353445345534653475348534953505351535253535354535553565357535853595360536153625363536453655366536753685369537053715372537353745375537653775378537953805381538253835384538553865387538853895390539153925393539453955396539753985399540054015402540354045405540654075408540954105411541254135414541554165417541854195420542154225423542454255426542754285429543054315432543354345435543654375438543954405441544254435444544554465447544854495450545154525453545454555456545754585459546054615462546354645465546654675468546954705471547254735474547554765477547854795480548154825483548454855486548754885489549054915492549354945495549654975498549955005501550255035504550555065507550855095510551155125513551455155516551755185519552055215522552355245525552655275528552955305531553255335534553555365537553855395540554155425543554455455546554755485549555055515552555355545555555655575558555955605561556255635564556555665567556855695570557155725573557455755576557755785579558055815582558355845585558655875588558955905591559255935594559555965597559855995600560156025603560456055606560756085609561056115612561356145615561656175618561956205621562256235624562556265627562856295630563156325633563456355636563756385639564056415642564356445645564656475648564956505651565256535654565556565657565856595660566156625663566456655666566756685669567056715672567356745675567656775678567956805681568256835684568556865687568856895690569156925693569456955696569756985699570057015702570357045705570657075708570957105711571257135714571557165717571857195720572157225723572457255726572757285729573057315732573357345735573657375738573957405741574257435744574557465747574857495750575157525753575457555756575757585759576057615762576357645765576657675768576957705771577257735774577557765777577857795780578157825783578457855786578757885789579057915792579357945795579657975798579958005801580258035804580558065807580858095810581158125813581458155816581758185819582058215822582358245825582658275828582958305831583258335834583558365837583858395840584158425843584458455846584758485849585058515852585358545855585658575858585958605861586258635864586558665867586858695870587158725873587458755876587758785879588058815882588358845885588658875888588958905891589258935894589558965897589858995900590159025903590459055906590759085909591059115912591359145915591659175918591959205921592259235924592559265927592859295930593159325933593459355936593759385939594059415942594359445945594659475948594959505951595259535954595559565957595859595960596159625963596459655966596759685969597059715972597359745975597659775978597959805981598259835984598559865987598859895990599159925993599459955996599759985999600060016002600360046005600660076008600960106011601260136014601560166017601860196020602160226023602460256026602760286029603060316032603360346035603660376038603960406041604260436044604560466047604860496050605160526053605460556056605760586059606060616062606360646065606660676068606960706071607260736074607560766077607860796080608160826083608460856086608760886089609060916092609360946095609660976098609961006101610261036104610561066107610861096110611161126113611461156116611761186119612061216122612361246125612661276128612961306131613261336134613561366137613861396140614161426143614461456146614761486149615061516152615361546155615661576158615961606161616261636164616561666167616861696170617161726173617461756176617761786179618061816182618361846185618661876188618961906191619261936194619561966197619861996200620162026203620462056206620762086209621062116212621362146215621662176218621962206221622262236224622562266227622862296230623162326233623462356236623762386239624062416242624362446245624662476248624962506251625262536254625562566257625862596260626162626263626462656266626762686269627062716272627362746275627662776278627962806281628262836284628562866287628862896290629162926293629462956296629762986299630063016302630363046305630663076308630963106311631263136314631563166317631863196320632163226323632463256326632763286329633063316332633363346335633663376338633963406341634263436344634563466347634863496350635163526353635463556356635763586359636063616362636363646365636663676368636963706371637263736374637563766377637863796380638163826383638463856386638763886389639063916392639363946395639663976398639964006401640264036404640564066407640864096410641164126413641464156416641764186419642064216422642364246425642664276428642964306431643264336434643564366437643864396440644164426443644464456446644764486449645064516452645364546455645664576458645964606461646264636464646564666467646864696470647164726473647464756476647764786479648064816482648364846485648664876488648964906491649264936494649564966497649864996500650165026503650465056506650765086509651065116512651365146515651665176518651965206521652265236524652565266527652865296530653165326533653465356536653765386539654065416542654365446545654665476548654965506551655265536554655565566557655865596560656165626563656465656566656765686569657065716572657365746575657665776578657965806581658265836584658565866587658865896590659165926593659465956596659765986599660066016602660366046605660666076608660966106611661266136614661566166617661866196620662166226623662466256626662766286629663066316632663366346635663666376638663966406641664266436644664566466647664866496650665166526653665466556656665766586659666066616662666366646665666666676668666966706671667266736674667566766677667866796680668166826683668466856686668766886689669066916692669366946695669666976698669967006701670267036704670567066707670867096710671167126713671467156716671767186719672067216722672367246725672667276728672967306731673267336734673567366737673867396740674167426743674467456746674767486749675067516752675367546755675667576758675967606761676267636764676567666767676867696770677167726773677467756776677767786779678067816782678367846785678667876788678967906791679267936794679567966797679867996800680168026803680468056806680768086809681068116812681368146815681668176818681968206821682268236824682568266827682868296830683168326833683468356836683768386839684068416842684368446845684668476848684968506851685268536854685568566857685868596860686168626863686468656866686768686869687068716872687368746875687668776878687968806881688268836884688568866887688868896890689168926893689468956896689768986899690069016902690369046905690669076908690969106911691269136914691569166917691869196920692169226923692469256926692769286929693069316932693369346935693669376938693969406941694269436944694569466947694869496950695169526953695469556956695769586959696069616962696369646965696669676968696969706971697269736974697569766977697869796980698169826983698469856986698769886989699069916992699369946995699669976998699970007001700270037004700570067007700870097010701170127013701470157016701770187019702070217022702370247025702670277028702970307031703270337034703570367037703870397040704170427043704470457046704770487049705070517052705370547055705670577058705970607061706270637064706570667067706870697070707170727073707470757076707770787079708070817082708370847085708670877088708970907091709270937094709570967097709870997100710171027103710471057106710771087109711071117112711371147115711671177118711971207121712271237124712571267127712871297130713171327133713471357136713771387139714071417142714371447145714671477148714971507151715271537154715571567157715871597160716171627163716471657166716771687169717071717172717371747175717671777178717971807181718271837184718571867187718871897190719171927193719471957196719771987199720072017202720372047205720672077208720972107211721272137214721572167217721872197220722172227223722472257226722772287229723072317232723372347235723672377238723972407241724272437244724572467247724872497250725172527253725472557256725772587259726072617262726372647265726672677268726972707271727272737274727572767277727872797280728172827283728472857286728772887289729072917292729372947295729672977298729973007301730273037304730573067307730873097310731173127313731473157316731773187319732073217322732373247325732673277328732973307331733273337334733573367337733873397340734173427343734473457346734773487349735073517352735373547355735673577358735973607361736273637364736573667367736873697370737173727373737473757376737773787379738073817382738373847385738673877388738973907391739273937394739573967397739873997400740174027403740474057406740774087409741074117412741374147415741674177418741974207421742274237424742574267427742874297430743174327433743474357436743774387439744074417442744374447445744674477448744974507451745274537454745574567457745874597460746174627463746474657466746774687469747074717472747374747475747674777478747974807481748274837484748574867487748874897490749174927493749474957496749774987499750075017502750375047505750675077508750975107511751275137514751575167517751875197520752175227523752475257526752775287529753075317532753375347535753675377538753975407541754275437544754575467547754875497550755175527553755475557556755775587559756075617562756375647565756675677568756975707571757275737574757575767577757875797580758175827583758475857586758775887589759075917592759375947595759675977598759976007601760276037604760576067607760876097610761176127613761476157616761776187619762076217622762376247625762676277628762976307631763276337634763576367637763876397640764176427643764476457646764776487649765076517652765376547655765676577658765976607661766276637664766576667667766876697670767176727673767476757676767776787679768076817682768376847685768676877688768976907691769276937694769576967697769876997700770177027703770477057706770777087709771077117712771377147715771677177718771977207721772277237724772577267727772877297730773177327733773477357736773777387739774077417742774377447745774677477748774977507751775277537754775577567757775877597760776177627763776477657766776777687769777077717772777377747775777677777778777977807781778277837784778577867787778877897790779177927793779477957796779777987799780078017802780378047805780678077808780978107811781278137814781578167817781878197820782178227823782478257826782778287829783078317832783378347835783678377838783978407841784278437844784578467847784878497850785178527853785478557856785778587859786078617862786378647865786678677868786978707871787278737874787578767877787878797880788178827883788478857886788778887889789078917892789378947895789678977898789979007901
  1. {
  2. File: QD/Quickdraw.h
  3. Contains: Interface to Quickdraw Graphics
  4. Version: Quickdraw-192.20~75
  5. Copyright: © 1985-2006 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: Gale R Paeper, <[email protected]>, 2007 }
  11. {
  12. Modified for use with Free Pascal
  13. Version 210
  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 Quickdraw;
  22. interface
  23. {$setc UNIVERSAL_INTERFACES_VERSION := $0342}
  24. {$setc GAP_INTERFACES_VERSION := $0210}
  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,CMTypes,CGDirectDisplay,Components,MixedMode,QuickdrawText,CGContext;
  92. {$ALIGN MAC68K}
  93. {*********************************************************************************
  94. // NOTE: Quickdraw has been deprecated for deployment targets 10.4 and later.
  95. // The replacement API is Quartz (CoreGraphics).
  96. // Because of the fundamental differences in the imaging models and design
  97. // goals between Quickdraw and Quartz, there is no direct correspondence
  98. // possible (or even desirable) between Quickdraw and Quartz APIs and concepts.
  99. // For certain purposes, some Quickdraw functions may even still be needed during
  100. // a transition period; nevertheless, they have all been tagged as deprecated
  101. // to express the overriding goal of eliminating all Quickdraw usage in the future.
  102. |********************************************************************************}
  103. const
  104. invalColReq = -1; { invalid color table request }
  105. { transfer modes }
  106. srcCopy = 0; { the 16 transfer modes }
  107. srcOr = 1;
  108. srcXor = 2;
  109. srcBic = 3;
  110. notSrcCopy = 4;
  111. notSrcOr = 5;
  112. notSrcXor = 6;
  113. notSrcBic = 7;
  114. patCopy = 8;
  115. patOr = 9;
  116. patXor = 10;
  117. patBic = 11;
  118. notPatCopy = 12;
  119. notPatOr = 13;
  120. notPatXor = 14;
  121. notPatBic = 15; { Special Text Transfer Mode }
  122. grayishTextOr = 49;
  123. hilitetransfermode = 50;
  124. hilite = 50; { Arithmetic transfer modes }
  125. blend = 32;
  126. addPin = 33;
  127. addOver = 34;
  128. subPin = 35;
  129. addMax = 37;
  130. adMax = 37;
  131. subOver = 38;
  132. adMin = 39;
  133. ditherCopy = 64; { Transparent mode constant }
  134. transparent = 36;
  135. italicBit = 1;
  136. ulineBit = 2;
  137. outlineBit = 3;
  138. shadowBit = 4;
  139. condenseBit = 5;
  140. extendBit = 6;
  141. { QuickDraw color separation constants }
  142. normalBit = 0; { normal screen mapping }
  143. inverseBit = 1; { inverse screen mapping }
  144. redBit = 4; { RGB additive mapping }
  145. greenBit = 3;
  146. blueBit = 2;
  147. cyanBit = 8; { CMYBk subtractive mapping }
  148. magentaBit = 7;
  149. yellowBit = 6;
  150. blackBit = 5;
  151. blackColor = 33; { colors expressed in these mappings }
  152. whiteColor = 30;
  153. redColor = 205;
  154. greenColor = 341;
  155. blueColor = 409;
  156. cyanColor = 273;
  157. magentaColor = 137;
  158. yellowColor = 69;
  159. picLParen = 0; { standard picture comments }
  160. picRParen = 1;
  161. clutType = 0; { 0 if lookup table }
  162. fixedType = 1; { 1 if fixed table }
  163. directType = 2; { 2 if direct values }
  164. { gdFlags bits. Bits 1..10 are legacy, and currently unused }
  165. gdDevType = 0; { 0 = monochrome 1 = color }
  166. interlacedDevice = 2; { 1 if single pixel lines look bad }
  167. hwMirroredDevice = 4; { 1 if device is HW mirrored }
  168. roundedDevice = 5; { 1 if device has been ÒroundedÓ into the GrayRgn }
  169. hasAuxMenuBar = 6; { 1 if device has an aux menu bar on it }
  170. burstDevice = 7;
  171. ext32Device = 8;
  172. ramInit = 10; { 1 if initialized from 'scrn' resource }
  173. mainScreen = 11; { 1 if main screen }
  174. allInit = 12; { 1 if all devices initialized }
  175. screenDevice = 13; { 1 if screen device [not used] }
  176. noDriver = 14; { 1 if no driver for this GDevice }
  177. screenActive = 15; { 1 if in use }
  178. hiliteBit = 7; { flag bit in LMGet/SetHiliteMode }
  179. pHiliteBit = 0; { flag bit in LMGet/SetHiliteMode when used with BitClr }
  180. { miscellaneous constants }
  181. defQDColors = 127; { resource ID of clut for default QDColors } { (legacy - now unused) }
  182. { pixel type }
  183. RGBDirect = 16; { 16 & 32 bits/pixel pixelType value }
  184. { pmVersion values }
  185. baseAddr32 = 4; { pixmap base address is 32-bit address }
  186. sysPatListID = 0;
  187. iBeamCursor = 1;
  188. crossCursor = 2;
  189. plusCursor = 3;
  190. watchCursor = 4;
  191. kQDGrafVerbFrame = 0;
  192. kQDGrafVerbPaint = 1;
  193. kQDGrafVerbErase = 2;
  194. kQDGrafVerbInvert = 3;
  195. kQDGrafVerbFill = 4;
  196. {$ifc OLDROUTINENAMES}
  197. frame = kQDGrafVerbFrame;
  198. paint = kQDGrafVerbPaint;
  199. erase = kQDGrafVerbErase;
  200. invert = kQDGrafVerbInvert;
  201. fill = kQDGrafVerbFill;
  202. {$endc} {OLDROUTINENAMES}
  203. type
  204. GrafVerb = SInt8;
  205. const
  206. chunky = 0;
  207. chunkyPlanar = 1;
  208. planar = 2;
  209. type
  210. PixelType = SInt8;
  211. Bits16 = array [0..15] of SInt16;
  212. { ************** IMPORTANT NOTE REGARDING Pattern **************************************
  213. Patterns were originally defined as:
  214. C: typedef unsigned char Pattern[8];
  215. Pascal: Pattern = packed array [0..7] of 0..255;
  216. The old array definition of Pattern would cause 68000 based CPU's to crash in certain circum-
  217. stances. The new struct definition is safe, but may require source code changes to compile.
  218. ******************************************************************************************** }
  219. PatternPtr = ^Pattern;
  220. Pattern = record
  221. pat: packed array [0..7] of UInt8;
  222. end;
  223. {
  224. ConstPatternParam is no longer needed. It was first created when Pattern was an array.
  225. Now that Pattern is a struct, it is more straight forward to just add the "const" qualifier
  226. on the parameter type (e.g. "const Pattern * pat" instead of "ConstPatternParam pat").
  227. ConstPatternParam = PatternPtr;
  228. }
  229. PatPtr = ^Pattern;
  230. PatHandle = ^PatPtr;
  231. QDByte = SignedByte;
  232. QDPtr = Ptr;
  233. QDHandle = Handle;
  234. QDErr = SInt16;
  235. const
  236. singleDevicesBit = 0;
  237. dontMatchSeedsBit = 1;
  238. allDevicesBit = 2;
  239. singleDevices = $01;
  240. dontMatchSeeds = $02;
  241. allDevices = $04;
  242. type
  243. DeviceLoopFlags = UInt32;
  244. {
  245. PrinterStatusOpcode. For communication with downloading and printing services.
  246. }
  247. PrinterStatusOpcode = SInt32;
  248. const
  249. kPrinterFontStatus = 0;
  250. kPrinterScalingStatus = 1;
  251. type
  252. PrinterFontStatusPtr = ^PrinterFontStatus;
  253. PrinterFontStatus = record
  254. oResult: SInt32;
  255. iFondID: SInt16;
  256. iStyle: Style;
  257. end;
  258. PrinterScalingStatusPtr = ^PrinterScalingStatus;
  259. PrinterScalingStatus = record
  260. oScalingFactors: Point;
  261. end;
  262. BitMapPtr = ^BitMap;
  263. BitMap = record
  264. baseAddr: Ptr;
  265. rowBytes: SInt16;
  266. bounds: Rect;
  267. end;
  268. BitMapHandle = ^BitMapPtr;
  269. CursorPtr = ^Cursor;
  270. Cursor = record
  271. data: Bits16;
  272. mask: Bits16;
  273. hotSpot: Point;
  274. end;
  275. CursPtr = ^Cursor;
  276. CursHandle = ^CursPtr;
  277. PenStatePtr = ^PenState;
  278. PenState = record
  279. pnLoc: Point;
  280. pnSize: Point;
  281. pnMode: SInt16;
  282. pnPat: Pattern;
  283. end;
  284. {$ifc NOT OPAQUE_TOOLBOX_STRUCTS}
  285. MacRegionPtr = ^MacRegion;
  286. MacRegion = record
  287. rgnSize: UInt16; { size in bytes; don't rely on it }
  288. rgnBBox: Rect; { enclosing rectangle; in Carbon use GetRegionBounds }
  289. end;
  290. {
  291. The type name "Region" has a name space collision on Win32.
  292. Use MacRegion to be cross-platfrom safe.
  293. }
  294. {$ifc TARGET_OS_MAC}
  295. Region = MacRegion;
  296. RegionPtr = ^Region;
  297. {$endc} {TARGET_OS_MAC}
  298. RgnPtr = ^MacRegion;
  299. RgnHandle = ^RgnPtr;
  300. {$elsec}
  301. RgnHandle = ^SInt32; { an opaque 32-bit type }
  302. RgnHandlePtr = ^RgnHandle; { when a var xx:RgnHandle parameter can be nil, it is changed to xx: RgnHandlePtr }
  303. {$endc}
  304. PicturePtr = ^Picture;
  305. Picture = record
  306. picSize: SInt16;
  307. picFrame: Rect;
  308. end;
  309. PicPtr = ^Picture;
  310. PicHandle = ^PicPtr;
  311. MacPolygonPtr = ^MacPolygon;
  312. MacPolygon = record
  313. polySize: SInt16;
  314. polyBBox: Rect;
  315. polyPoints: array [0..0] of Point;
  316. end;
  317. {
  318. The type name "Polygon" has a name space collision on Win32.
  319. Use MacPolygon to be cross-platfrom safe.
  320. }
  321. {$ifc TARGET_OS_MAC}
  322. Polygon = MacPolygon;
  323. PolygonPtr = ^Polygon;
  324. {$endc} {TARGET_OS_MAC}
  325. PolyPtr = ^MacPolygon;
  326. PolyHandle = ^PolyPtr;
  327. {$ifc TYPED_FUNCTION_POINTERS}
  328. QDTextProcPtr = procedure(byteCount: SInt16; textBuf: UnivPtr; numer: Point; denom: Point);
  329. {$elsec}
  330. QDTextProcPtr = ProcPtr;
  331. {$endc}
  332. {$ifc TYPED_FUNCTION_POINTERS}
  333. QDLineProcPtr = procedure(newPt: Point);
  334. {$elsec}
  335. QDLineProcPtr = ProcPtr;
  336. {$endc}
  337. {$ifc TYPED_FUNCTION_POINTERS}
  338. QDRectProcPtr = procedure(verb: GrafVerb; const (*var*) r: Rect);
  339. {$elsec}
  340. QDRectProcPtr = ProcPtr;
  341. {$endc}
  342. {$ifc TYPED_FUNCTION_POINTERS}
  343. QDRRectProcPtr = procedure(verb: GrafVerb; const (*var*) r: Rect; ovalWidth: SInt16; ovalHeight: SInt16);
  344. {$elsec}
  345. QDRRectProcPtr = ProcPtr;
  346. {$endc}
  347. {$ifc TYPED_FUNCTION_POINTERS}
  348. QDOvalProcPtr = procedure(verb: GrafVerb; const (*var*) r: Rect);
  349. {$elsec}
  350. QDOvalProcPtr = ProcPtr;
  351. {$endc}
  352. {$ifc TYPED_FUNCTION_POINTERS}
  353. QDArcProcPtr = procedure(verb: GrafVerb; const (*var*) r: Rect; startAngle: SInt16; arcAngle: SInt16);
  354. {$elsec}
  355. QDArcProcPtr = ProcPtr;
  356. {$endc}
  357. {$ifc TYPED_FUNCTION_POINTERS}
  358. QDPolyProcPtr = procedure(verb: GrafVerb; poly: PolyHandle);
  359. {$elsec}
  360. QDPolyProcPtr = ProcPtr;
  361. {$endc}
  362. {$ifc TYPED_FUNCTION_POINTERS}
  363. QDRgnProcPtr = procedure(verb: GrafVerb; rgn: RgnHandle);
  364. {$elsec}
  365. QDRgnProcPtr = ProcPtr;
  366. {$endc}
  367. {$ifc TYPED_FUNCTION_POINTERS}
  368. QDBitsProcPtr = procedure(const (*var*) srcBits: BitMap; const (*var*) srcRect: Rect; const (*var*) dstRect: Rect; mode: SInt16; maskRgn: RgnHandle);
  369. {$elsec}
  370. QDBitsProcPtr = ProcPtr;
  371. {$endc}
  372. {$ifc TYPED_FUNCTION_POINTERS}
  373. QDCommentProcPtr = procedure(kind: SInt16; dataSize: SInt16; dataHandle: Handle);
  374. {$elsec}
  375. QDCommentProcPtr = ProcPtr;
  376. {$endc}
  377. {$ifc TYPED_FUNCTION_POINTERS}
  378. QDTxMeasProcPtr = function(byteCount: SInt16; textAddr: UnivPtr; var numer: Point; var denom: Point; var info: FontInfo): SInt16;
  379. {$elsec}
  380. QDTxMeasProcPtr = ProcPtr;
  381. {$endc}
  382. {$ifc TYPED_FUNCTION_POINTERS}
  383. QDGetPicProcPtr = procedure(dataPtr: UnivPtr; byteCount: SInt16);
  384. {$elsec}
  385. QDGetPicProcPtr = ProcPtr;
  386. {$endc}
  387. {$ifc TYPED_FUNCTION_POINTERS}
  388. QDPutPicProcPtr = procedure(dataPtr: UnivPtr; byteCount: SInt16);
  389. {$elsec}
  390. QDPutPicProcPtr = ProcPtr;
  391. {$endc}
  392. {$ifc TYPED_FUNCTION_POINTERS}
  393. QDOpcodeProcPtr = procedure(const (*var*) fromRect: Rect; const (*var*) toRect: Rect; opcode: UInt16; version: SInt16);
  394. {$elsec}
  395. QDOpcodeProcPtr = ProcPtr;
  396. {$endc}
  397. { The following is unused on Mac OS X - ignore it! }
  398. {$ifc TYPED_FUNCTION_POINTERS}
  399. QDStdGlyphsProcPtr = function(dataStream: UnivPtr; size: ByteCount): OSStatus;
  400. {$elsec}
  401. QDStdGlyphsProcPtr = ProcPtr;
  402. {$endc}
  403. {$ifc TYPED_FUNCTION_POINTERS}
  404. QDJShieldCursorProcPtr = procedure(left: SInt16; top: SInt16; right: SInt16; bottom: SInt16);
  405. {$elsec}
  406. QDJShieldCursorProcPtr = ProcPtr;
  407. {$endc}
  408. {$ifc OPAQUE_UPP_TYPES}
  409. QDTextUPP = ^SInt32; { an opaque UPP }
  410. {$elsec}
  411. QDTextUPP = UniversalProcPtr;
  412. {$endc}
  413. {$ifc OPAQUE_UPP_TYPES}
  414. QDLineUPP = ^SInt32; { an opaque UPP }
  415. {$elsec}
  416. QDLineUPP = UniversalProcPtr;
  417. {$endc}
  418. {$ifc OPAQUE_UPP_TYPES}
  419. QDRectUPP = ^SInt32; { an opaque UPP }
  420. {$elsec}
  421. QDRectUPP = UniversalProcPtr;
  422. {$endc}
  423. {$ifc OPAQUE_UPP_TYPES}
  424. QDRRectUPP = ^SInt32; { an opaque UPP }
  425. {$elsec}
  426. QDRRectUPP = UniversalProcPtr;
  427. {$endc}
  428. {$ifc OPAQUE_UPP_TYPES}
  429. QDOvalUPP = ^SInt32; { an opaque UPP }
  430. {$elsec}
  431. QDOvalUPP = UniversalProcPtr;
  432. {$endc}
  433. {$ifc OPAQUE_UPP_TYPES}
  434. QDArcUPP = ^SInt32; { an opaque UPP }
  435. {$elsec}
  436. QDArcUPP = UniversalProcPtr;
  437. {$endc}
  438. {$ifc OPAQUE_UPP_TYPES}
  439. QDPolyUPP = ^SInt32; { an opaque UPP }
  440. {$elsec}
  441. QDPolyUPP = UniversalProcPtr;
  442. {$endc}
  443. {$ifc OPAQUE_UPP_TYPES}
  444. QDRgnUPP = ^SInt32; { an opaque UPP }
  445. {$elsec}
  446. QDRgnUPP = UniversalProcPtr;
  447. {$endc}
  448. {$ifc OPAQUE_UPP_TYPES}
  449. QDBitsUPP = ^SInt32; { an opaque UPP }
  450. {$elsec}
  451. QDBitsUPP = UniversalProcPtr;
  452. {$endc}
  453. {$ifc OPAQUE_UPP_TYPES}
  454. QDCommentUPP = ^SInt32; { an opaque UPP }
  455. {$elsec}
  456. QDCommentUPP = UniversalProcPtr;
  457. {$endc}
  458. {$ifc OPAQUE_UPP_TYPES}
  459. QDTxMeasUPP = ^SInt32; { an opaque UPP }
  460. {$elsec}
  461. QDTxMeasUPP = UniversalProcPtr;
  462. {$endc}
  463. {$ifc OPAQUE_UPP_TYPES}
  464. QDGetPicUPP = ^SInt32; { an opaque UPP }
  465. {$elsec}
  466. QDGetPicUPP = UniversalProcPtr;
  467. {$endc}
  468. {$ifc OPAQUE_UPP_TYPES}
  469. QDPutPicUPP = ^SInt32; { an opaque UPP }
  470. {$elsec}
  471. QDPutPicUPP = UniversalProcPtr;
  472. {$endc}
  473. {$ifc OPAQUE_UPP_TYPES}
  474. QDOpcodeUPP = ^SInt32; { an opaque UPP }
  475. {$elsec}
  476. QDOpcodeUPP = UniversalProcPtr;
  477. {$endc}
  478. {$ifc OPAQUE_UPP_TYPES}
  479. QDStdGlyphsUPP = ^SInt32; { an opaque UPP }
  480. {$elsec}
  481. QDStdGlyphsUPP = UniversalProcPtr;
  482. {$endc}
  483. {$ifc OPAQUE_UPP_TYPES}
  484. QDJShieldCursorUPP = ^SInt32; { an opaque UPP }
  485. {$elsec}
  486. QDJShieldCursorUPP = UniversalProcPtr;
  487. {$endc}
  488. QDProcsPtr = ^QDProcs;
  489. QDProcs = record
  490. textProc: QDTextUPP;
  491. lineProc: QDLineUPP;
  492. rectProc: QDRectUPP;
  493. rRectProc: QDRRectUPP;
  494. ovalProc: QDOvalUPP;
  495. arcProc: QDArcUPP;
  496. polyProc: QDPolyUPP;
  497. rgnProc: QDRgnUPP;
  498. bitsProc: QDBitsUPP;
  499. commentProc: QDCommentUPP;
  500. txMeasProc: QDTxMeasUPP;
  501. getPicProc: QDGetPicUPP;
  502. putPicProc: QDPutPicUPP;
  503. end;
  504. const
  505. uppQDTextProcInfo = $00003F80;
  506. uppQDLineProcInfo = $000000C0;
  507. uppQDRectProcInfo = $00000340;
  508. uppQDRRectProcInfo = $00002B40;
  509. uppQDOvalProcInfo = $00000340;
  510. uppQDArcProcInfo = $00002B40;
  511. uppQDPolyProcInfo = $00000340;
  512. uppQDRgnProcInfo = $00000340;
  513. uppQDBitsProcInfo = $0000EFC0;
  514. uppQDCommentProcInfo = $00000E80;
  515. uppQDTxMeasProcInfo = $0000FFA0;
  516. uppQDGetPicProcInfo = $000002C0;
  517. uppQDPutPicProcInfo = $000002C0;
  518. uppQDOpcodeProcInfo = $00002BC0;
  519. uppQDStdGlyphsProcInfo = $000003F1;
  520. uppQDJShieldCursorProcInfo = $00002A80;
  521. {
  522. * NewQDTextUPP()
  523. *
  524. * Availability:
  525. * Non-Carbon CFM: available as macro/inline
  526. * CarbonLib: in CarbonLib 1.0 and later
  527. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  528. }
  529. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  530. function NewQDTextUPP(userRoutine: QDTextProcPtr): QDTextUPP; external name '_NewQDTextUPP'; { old name was NewQDTextProc }
  531. {
  532. * NewQDLineUPP()
  533. *
  534. * Availability:
  535. * Non-Carbon CFM: available as macro/inline
  536. * CarbonLib: in CarbonLib 1.0 and later
  537. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  538. }
  539. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4
  540. function NewQDLineUPP(userRoutine: QDLineProcPtr): QDLineUPP; external name '_NewQDLineUPP'; { old name was NewQDLineProc }
  541. {
  542. * NewQDRectUPP()
  543. *
  544. * Availability:
  545. * Non-Carbon CFM: available as macro/inline
  546. * CarbonLib: in CarbonLib 1.0 and later
  547. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  548. }
  549. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  550. function NewQDRectUPP(userRoutine: QDRectProcPtr): QDRectUPP; external name '_NewQDRectUPP'; { old name was NewQDRectProc }
  551. {
  552. * NewQDRRectUPP()
  553. *
  554. * Availability:
  555. * Non-Carbon CFM: available as macro/inline
  556. * CarbonLib: in CarbonLib 1.0 and later
  557. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  558. }
  559. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  560. function NewQDRRectUPP(userRoutine: QDRRectProcPtr): QDRRectUPP; external name '_NewQDRRectUPP'; { old name was NewQDRRectProc }
  561. {
  562. * NewQDOvalUPP()
  563. *
  564. * Availability:
  565. * Non-Carbon CFM: available as macro/inline
  566. * CarbonLib: in CarbonLib 1.0 and later
  567. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  568. }
  569. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  570. function NewQDOvalUPP(userRoutine: QDOvalProcPtr): QDOvalUPP; external name '_NewQDOvalUPP'; { old name was NewQDOvalProc }
  571. {
  572. * NewQDArcUPP()
  573. *
  574. * Availability:
  575. * Non-Carbon CFM: available as macro/inline
  576. * CarbonLib: in CarbonLib 1.0 and later
  577. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  578. }
  579. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  580. function NewQDArcUPP(userRoutine: QDArcProcPtr): QDArcUPP; external name '_NewQDArcUPP'; { old name was NewQDArcProc }
  581. {
  582. * NewQDPolyUPP()
  583. *
  584. * Availability:
  585. * Non-Carbon CFM: available as macro/inline
  586. * CarbonLib: in CarbonLib 1.0 and later
  587. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  588. }
  589. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  590. function NewQDPolyUPP(userRoutine: QDPolyProcPtr): QDPolyUPP; external name '_NewQDPolyUPP'; { old name was NewQDPolyProc }
  591. {
  592. * NewQDRgnUPP()
  593. *
  594. * Availability:
  595. * Non-Carbon CFM: available as macro/inline
  596. * CarbonLib: in CarbonLib 1.0 and later
  597. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  598. }
  599. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  600. function NewQDRgnUPP(userRoutine: QDRgnProcPtr): QDRgnUPP; external name '_NewQDRgnUPP'; { old name was NewQDRgnProc }
  601. {
  602. * NewQDBitsUPP()
  603. *
  604. * Availability:
  605. * Non-Carbon CFM: available as macro/inline
  606. * CarbonLib: in CarbonLib 1.0 and later
  607. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  608. }
  609. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  610. function NewQDBitsUPP(userRoutine: QDBitsProcPtr): QDBitsUPP; external name '_NewQDBitsUPP'; { old name was NewQDBitsProc }
  611. {
  612. * NewQDCommentUPP()
  613. *
  614. * Availability:
  615. * Non-Carbon CFM: available as macro/inline
  616. * CarbonLib: in CarbonLib 1.0 and later
  617. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  618. }
  619. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  620. function NewQDCommentUPP(userRoutine: QDCommentProcPtr): QDCommentUPP; external name '_NewQDCommentUPP'; { old name was NewQDCommentProc }
  621. {
  622. * NewQDTxMeasUPP()
  623. *
  624. * Availability:
  625. * Non-Carbon CFM: available as macro/inline
  626. * CarbonLib: in CarbonLib 1.0 and later
  627. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  628. }
  629. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  630. function NewQDTxMeasUPP(userRoutine: QDTxMeasProcPtr): QDTxMeasUPP; external name '_NewQDTxMeasUPP'; { old name was NewQDTxMeasProc }
  631. {
  632. * NewQDGetPicUPP()
  633. *
  634. * Availability:
  635. * Non-Carbon CFM: available as macro/inline
  636. * CarbonLib: in CarbonLib 1.0 and later
  637. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  638. }
  639. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  640. function NewQDGetPicUPP(userRoutine: QDGetPicProcPtr): QDGetPicUPP; external name '_NewQDGetPicUPP'; { old name was NewQDGetPicProc }
  641. {
  642. * NewQDPutPicUPP()
  643. *
  644. * Availability:
  645. * Non-Carbon CFM: available as macro/inline
  646. * CarbonLib: in CarbonLib 1.0 and later
  647. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  648. }
  649. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  650. function NewQDPutPicUPP(userRoutine: QDPutPicProcPtr): QDPutPicUPP; external name '_NewQDPutPicUPP'; { old name was NewQDPutPicProc }
  651. {
  652. * NewQDOpcodeUPP()
  653. *
  654. * Availability:
  655. * Non-Carbon CFM: available as macro/inline
  656. * CarbonLib: in CarbonLib 1.0 and later
  657. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  658. }
  659. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  660. function NewQDOpcodeUPP(userRoutine: QDOpcodeProcPtr): QDOpcodeUPP; external name '_NewQDOpcodeUPP'; { old name was NewQDOpcodeProc }
  661. {
  662. * NewQDStdGlyphsUPP()
  663. *
  664. * Availability:
  665. * Non-Carbon CFM: available as macro/inline
  666. * CarbonLib: in CarbonLib 1.0 and later
  667. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  668. }
  669. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  670. function NewQDStdGlyphsUPP(userRoutine: QDStdGlyphsProcPtr): QDStdGlyphsUPP; external name '_NewQDStdGlyphsUPP'; { old name was NewQDStdGlyphsProc }
  671. {
  672. * NewQDJShieldCursorUPP()
  673. *
  674. * Availability:
  675. * Non-Carbon CFM: available as macro/inline
  676. * CarbonLib: in CarbonLib 1.0 and later
  677. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  678. }
  679. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  680. function NewQDJShieldCursorUPP(userRoutine: QDJShieldCursorProcPtr): QDJShieldCursorUPP; external name '_NewQDJShieldCursorUPP'; { old name was NewQDJShieldCursorProc }
  681. {
  682. * DisposeQDTextUPP()
  683. *
  684. * Availability:
  685. * Non-Carbon CFM: available as macro/inline
  686. * CarbonLib: in CarbonLib 1.0 and later
  687. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  688. }
  689. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  690. procedure DisposeQDTextUPP(userUPP: QDTextUPP); external name '_DisposeQDTextUPP';
  691. {
  692. * DisposeQDLineUPP()
  693. *
  694. * Availability:
  695. * Non-Carbon CFM: available as macro/inline
  696. * CarbonLib: in CarbonLib 1.0 and later
  697. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  698. }
  699. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  700. procedure DisposeQDLineUPP(userUPP: QDLineUPP); external name '_DisposeQDLineUPP';
  701. {
  702. * DisposeQDRectUPP()
  703. *
  704. * Availability:
  705. * Non-Carbon CFM: available as macro/inline
  706. * CarbonLib: in CarbonLib 1.0 and later
  707. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  708. }
  709. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  710. procedure DisposeQDRectUPP(userUPP: QDRectUPP); external name '_DisposeQDRectUPP';
  711. {
  712. * DisposeQDRRectUPP()
  713. *
  714. * Availability:
  715. * Non-Carbon CFM: available as macro/inline
  716. * CarbonLib: in CarbonLib 1.0 and later
  717. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  718. }
  719. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  720. procedure DisposeQDRRectUPP(userUPP: QDRRectUPP); external name '_DisposeQDRRectUPP';
  721. {
  722. * DisposeQDOvalUPP()
  723. *
  724. * Availability:
  725. * Non-Carbon CFM: available as macro/inline
  726. * CarbonLib: in CarbonLib 1.0 and later
  727. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  728. }
  729. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  730. procedure DisposeQDOvalUPP(userUPP: QDOvalUPP); external name '_DisposeQDOvalUPP';
  731. {
  732. * DisposeQDArcUPP()
  733. *
  734. * Availability:
  735. * Non-Carbon CFM: available as macro/inline
  736. * CarbonLib: in CarbonLib 1.0 and later
  737. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  738. }
  739. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  740. procedure DisposeQDArcUPP(userUPP: QDArcUPP); external name '_DisposeQDArcUPP';
  741. {
  742. * DisposeQDPolyUPP()
  743. *
  744. * Availability:
  745. * Non-Carbon CFM: available as macro/inline
  746. * CarbonLib: in CarbonLib 1.0 and later
  747. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  748. }
  749. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  750. procedure DisposeQDPolyUPP(userUPP: QDPolyUPP); external name '_DisposeQDPolyUPP';
  751. {
  752. * DisposeQDRgnUPP()
  753. *
  754. * Availability:
  755. * Non-Carbon CFM: available as macro/inline
  756. * CarbonLib: in CarbonLib 1.0 and later
  757. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  758. }
  759. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  760. procedure DisposeQDRgnUPP(userUPP: QDRgnUPP); external name '_DisposeQDRgnUPP';
  761. {
  762. * DisposeQDBitsUPP()
  763. *
  764. * Availability:
  765. * Non-Carbon CFM: available as macro/inline
  766. * CarbonLib: in CarbonLib 1.0 and later
  767. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  768. }
  769. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  770. procedure DisposeQDBitsUPP(userUPP: QDBitsUPP); external name '_DisposeQDBitsUPP';
  771. {
  772. * DisposeQDCommentUPP()
  773. *
  774. * Availability:
  775. * Non-Carbon CFM: available as macro/inline
  776. * CarbonLib: in CarbonLib 1.0 and later
  777. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  778. }
  779. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  780. procedure DisposeQDCommentUPP(userUPP: QDCommentUPP); external name '_DisposeQDCommentUPP';
  781. {
  782. * DisposeQDTxMeasUPP()
  783. *
  784. * Availability:
  785. * Non-Carbon CFM: available as macro/inline
  786. * CarbonLib: in CarbonLib 1.0 and later
  787. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  788. }
  789. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  790. procedure DisposeQDTxMeasUPP(userUPP: QDTxMeasUPP); external name '_DisposeQDTxMeasUPP';
  791. {
  792. * DisposeQDGetPicUPP()
  793. *
  794. * Availability:
  795. * Non-Carbon CFM: available as macro/inline
  796. * CarbonLib: in CarbonLib 1.0 and later
  797. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  798. }
  799. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  800. procedure DisposeQDGetPicUPP(userUPP: QDGetPicUPP); external name '_DisposeQDGetPicUPP';
  801. {
  802. * DisposeQDPutPicUPP()
  803. *
  804. * Availability:
  805. * Non-Carbon CFM: available as macro/inline
  806. * CarbonLib: in CarbonLib 1.0 and later
  807. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  808. }
  809. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  810. procedure DisposeQDPutPicUPP(userUPP: QDPutPicUPP); external name '_DisposeQDPutPicUPP';
  811. {
  812. * DisposeQDOpcodeUPP()
  813. *
  814. * Availability:
  815. * Non-Carbon CFM: available as macro/inline
  816. * CarbonLib: in CarbonLib 1.0 and later
  817. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  818. }
  819. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  820. procedure DisposeQDOpcodeUPP(userUPP: QDOpcodeUPP); external name '_DisposeQDOpcodeUPP';
  821. {
  822. * DisposeQDStdGlyphsUPP()
  823. *
  824. * Availability:
  825. * Non-Carbon CFM: available as macro/inline
  826. * CarbonLib: in CarbonLib 1.0 and later
  827. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  828. }
  829. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  830. procedure DisposeQDStdGlyphsUPP(userUPP: QDStdGlyphsUPP); external name '_DisposeQDStdGlyphsUPP';
  831. {
  832. * DisposeQDJShieldCursorUPP()
  833. *
  834. * Availability:
  835. * Non-Carbon CFM: available as macro/inline
  836. * CarbonLib: in CarbonLib 1.0 and later
  837. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  838. }
  839. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  840. procedure DisposeQDJShieldCursorUPP(userUPP: QDJShieldCursorUPP); external name '_DisposeQDJShieldCursorUPP';
  841. {
  842. * InvokeQDTextUPP()
  843. *
  844. * Availability:
  845. * Non-Carbon CFM: available as macro/inline
  846. * CarbonLib: in CarbonLib 1.0 and later
  847. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  848. }
  849. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  850. procedure InvokeQDTextUPP(byteCount: SInt16; textBuf: UnivPtr; numer: Point; denom: Point; userRoutine: QDTextUPP); external name '_InvokeQDTextUPP'; { old name was CallQDTextProc }
  851. {
  852. * InvokeQDLineUPP()
  853. *
  854. * Availability:
  855. * Non-Carbon CFM: available as macro/inline
  856. * CarbonLib: in CarbonLib 1.0 and later
  857. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  858. }
  859. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  860. procedure InvokeQDLineUPP(newPt: Point; userRoutine: QDLineUPP); external name '_InvokeQDLineUPP'; { old name was CallQDLineProc }
  861. {
  862. * InvokeQDRectUPP()
  863. *
  864. * Availability:
  865. * Non-Carbon CFM: available as macro/inline
  866. * CarbonLib: in CarbonLib 1.0 and later
  867. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  868. }
  869. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  870. procedure InvokeQDRectUPP(verb: GrafVerb; const (*var*) r: Rect; userRoutine: QDRectUPP); external name '_InvokeQDRectUPP'; { old name was CallQDRectProc }
  871. {
  872. * InvokeQDRRectUPP()
  873. *
  874. * Availability:
  875. * Non-Carbon CFM: available as macro/inline
  876. * CarbonLib: in CarbonLib 1.0 and later
  877. * Mac OS X: in version 10.0 and later
  878. }
  879. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  880. procedure InvokeQDRRectUPP(verb: GrafVerb; const (*var*) r: Rect; ovalWidth: SInt16; ovalHeight: SInt16; userRoutine: QDRRectUPP); external name '_InvokeQDRRectUPP'; { old name was CallQDRRectProc }
  881. {
  882. * InvokeQDOvalUPP()
  883. *
  884. * Availability:
  885. * Non-Carbon CFM: available as macro/inline
  886. * CarbonLib: in CarbonLib 1.0 and later
  887. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  888. }
  889. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  890. procedure InvokeQDOvalUPP(verb: GrafVerb; const (*var*) r: Rect; userRoutine: QDOvalUPP); external name '_InvokeQDOvalUPP'; { old name was CallQDOvalProc }
  891. {
  892. * InvokeQDArcUPP()
  893. *
  894. * Availability:
  895. * Non-Carbon CFM: available as macro/inline
  896. * CarbonLib: in CarbonLib 1.0 and later
  897. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  898. }
  899. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  900. procedure InvokeQDArcUPP(verb: GrafVerb; const (*var*) r: Rect; startAngle: SInt16; arcAngle: SInt16; userRoutine: QDArcUPP); external name '_InvokeQDArcUPP'; { old name was CallQDArcProc }
  901. {
  902. * InvokeQDPolyUPP()
  903. *
  904. * Availability:
  905. * Non-Carbon CFM: available as macro/inline
  906. * CarbonLib: in CarbonLib 1.0 and later
  907. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  908. }
  909. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  910. procedure InvokeQDPolyUPP(verb: GrafVerb; poly: PolyHandle; userRoutine: QDPolyUPP); external name '_InvokeQDPolyUPP'; { old name was CallQDPolyProc }
  911. {
  912. * InvokeQDRgnUPP()
  913. *
  914. * Availability:
  915. * Non-Carbon CFM: available as macro/inline
  916. * CarbonLib: in CarbonLib 1.0 and later
  917. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  918. }
  919. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  920. procedure InvokeQDRgnUPP(verb: GrafVerb; rgn: RgnHandle; userRoutine: QDRgnUPP); external name '_InvokeQDRgnUPP'; { old name was CallQDRgnProc }
  921. {
  922. * InvokeQDBitsUPP()
  923. *
  924. * Availability:
  925. * Non-Carbon CFM: available as macro/inline
  926. * CarbonLib: in CarbonLib 1.0 and later
  927. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  928. }
  929. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  930. procedure InvokeQDBitsUPP(const (*var*) srcBits: BitMap; const (*var*) srcRect: Rect; const (*var*) dstRect: Rect; mode: SInt16; maskRgn: RgnHandle; userRoutine: QDBitsUPP); external name '_InvokeQDBitsUPP'; { old name was CallQDBitsProc }
  931. {
  932. * InvokeQDCommentUPP()
  933. *
  934. * Availability:
  935. * Non-Carbon CFM: available as macro/inline
  936. * CarbonLib: in CarbonLib 1.0 and later
  937. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  938. }
  939. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  940. procedure InvokeQDCommentUPP(kind: SInt16; dataSize: SInt16; dataHandle: Handle; userRoutine: QDCommentUPP); external name '_InvokeQDCommentUPP'; { old name was CallQDCommentProc }
  941. {
  942. * InvokeQDTxMeasUPP()
  943. *
  944. * Availability:
  945. * Non-Carbon CFM: available as macro/inline
  946. * CarbonLib: in CarbonLib 1.0 and later
  947. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  948. }
  949. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  950. function InvokeQDTxMeasUPP(byteCount: SInt16; textAddr: UnivPtr; var numer: Point; var denom: Point; var info: FontInfo; userRoutine: QDTxMeasUPP): SInt16; external name '_InvokeQDTxMeasUPP'; { old name was CallQDTxMeasProc }
  951. {
  952. * InvokeQDGetPicUPP()
  953. *
  954. * Availability:
  955. * Non-Carbon CFM: available as macro/inline
  956. * CarbonLib: in CarbonLib 1.0 and later
  957. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  958. }
  959. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  960. procedure InvokeQDGetPicUPP(dataPtr: UnivPtr; byteCount: SInt16; userRoutine: QDGetPicUPP); external name '_InvokeQDGetPicUPP'; { old name was CallQDGetPicProc }
  961. {
  962. * InvokeQDPutPicUPP()
  963. *
  964. * Availability:
  965. * Non-Carbon CFM: available as macro/inline
  966. * CarbonLib: in CarbonLib 1.0 and later
  967. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  968. }
  969. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  970. procedure InvokeQDPutPicUPP(dataPtr: UnivPtr; byteCount: SInt16; userRoutine: QDPutPicUPP); external name '_InvokeQDPutPicUPP'; { old name was CallQDPutPicProc }
  971. {
  972. * InvokeQDOpcodeUPP()
  973. *
  974. * Availability:
  975. * Non-Carbon CFM: available as macro/inline
  976. * CarbonLib: in CarbonLib 1.0 and later
  977. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  978. }
  979. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  980. procedure InvokeQDOpcodeUPP(const (*var*) fromRect: Rect; const (*var*) toRect: Rect; opcode: UInt16; version: SInt16; userRoutine: QDOpcodeUPP); external name '_InvokeQDOpcodeUPP'; { old name was CallQDOpcodeProc }
  981. {
  982. * InvokeQDStdGlyphsUPP()
  983. *
  984. * Availability:
  985. * Non-Carbon CFM: available as macro/inline
  986. * CarbonLib: in CarbonLib 1.0 and later
  987. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  988. }
  989. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  990. function InvokeQDStdGlyphsUPP(dataStream: UnivPtr; size: ByteCount; userRoutine: QDStdGlyphsUPP): OSStatus; external name '_InvokeQDStdGlyphsUPP'; { old name was CallQDStdGlyphsProc }
  991. {
  992. * InvokeQDJShieldCursorUPP()
  993. *
  994. * Availability:
  995. * Non-Carbon CFM: available as macro/inline
  996. * CarbonLib: in CarbonLib 1.0 and later
  997. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  998. }
  999. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1000. procedure InvokeQDJShieldCursorUPP(left: SInt16; top: SInt16; right: SInt16; bottom: SInt16; userRoutine: QDJShieldCursorUPP); external name '_InvokeQDJShieldCursorUPP'; { old name was CallQDJShieldCursorProc }
  1001. {$ifc NOT OPAQUE_TOOLBOX_STRUCTS}
  1002. type
  1003. GrafPortPtr = ^GrafPort;
  1004. GrafPort = record
  1005. device: SInt16; { not available in Carbon }
  1006. portBits: BitMap; { in Carbon use GetPortBitMapForCopyBits or IsPortColor }
  1007. portRect: Rect; { in Carbon use Get/SetPortBounds }
  1008. visRgn: RgnHandle; { in Carbon use Get/SetPortVisibleRegion }
  1009. clipRgn: RgnHandle; { in Carbon use Get/SetPortClipRegion }
  1010. bkPat: Pattern; { not available in Carbon all GrafPorts are CGrafPorts }
  1011. fillPat: Pattern; { not available in Carbon all GrafPorts are CGrafPorts }
  1012. pnLoc: Point; { in Carbon use GetPortPenLocation or MoveTo }
  1013. pnSize: Point; { in Carbon use Get/SetPortPenSize }
  1014. pnMode: SInt16; { in Carbon use Get/SetPortPenMode }
  1015. pnPat: Pattern; { not available in Carbon all GrafPorts are CGrafPorts }
  1016. pnVis: SInt16; { in Carbon use GetPortPenVisibility or Show/HidePen }
  1017. txFont: SInt16; { in Carbon use GetPortTextFont or TextFont }
  1018. txFace: StyleField; { in Carbon use GetPortTextFace or TextFace }
  1019. { StyleField occupies 16-bits, but only first 8-bits are used }
  1020. txMode: SInt16; { in Carbon use GetPortTextMode or TextMode }
  1021. txSize: SInt16; { in Carbon use GetPortTextSize or TextSize }
  1022. spExtra: Fixed; { in Carbon use GetPortSpExtra or SpaceExtra }
  1023. fgColor: SInt32; { not available in Carbon }
  1024. bkColor: SInt32; { not available in Carbon }
  1025. colrBit: SInt16; { not available in Carbon }
  1026. patStretch: SInt16; { not available in Carbon }
  1027. picSave: Handle; { in Carbon use IsPortPictureBeingDefined }
  1028. rgnSave: Handle; { not available in Carbon }
  1029. polySave: Handle; { not available in Carbon }
  1030. grafProcs: QDProcsPtr; { not available in Carbon all GrafPorts are CGrafPorts }
  1031. end;
  1032. GrafPtr = ^GrafPort;
  1033. {
  1034. * This set of definitions "belongs" in Windows.
  1035. * But, there is a circularity in the headers where Windows includes Controls and
  1036. * Controls includes Windows. To break the circle, the information
  1037. * needed by Controls is moved from Windows to Quickdraw.
  1038. }
  1039. WindowPtr = GrafPtr;
  1040. DialogPtr = WindowPtr;
  1041. {$elsec}
  1042. type
  1043. WindowPtr = ^SInt32; { an opaque 32-bit type }
  1044. WindowPtrPtr = ^WindowPtr; { when a var xx:WindowPtr parameter can be nil, it is changed to xx: WindowPtrPtr }
  1045. DialogPtr = ^SInt32; { an opaque 32-bit type }
  1046. DialogPtrPtr = ^DialogPtr; { when a var xx:DialogPtr parameter can be nil, it is changed to xx: DialogPtrPtr }
  1047. GrafPtr = ^SInt32; { an opaque 32-bit type }
  1048. GrafPtrPtr = ^GrafPtr; { when a var xx:GrafPtr parameter can be nil, it is changed to xx: GrafPtrPtr }
  1049. {$endc}
  1050. WindowRef = WindowPtr;
  1051. WindowRefPtr = ^WindowRef; { when a var xx:WindowRef parameter can be nil, it is changed to xx: WindowRefPtr }
  1052. { DragConstraint constants to pass to DragGray,DragTheRgn, or ConstrainedDragRgn }
  1053. DragConstraint = UInt16;
  1054. const
  1055. kNoConstraint = 0;
  1056. kVerticalConstraint = 1;
  1057. kHorizontalConstraint = 2;
  1058. type
  1059. {$ifc TYPED_FUNCTION_POINTERS}
  1060. DragGrayRgnProcPtr = procedure;
  1061. {$elsec}
  1062. DragGrayRgnProcPtr = ProcPtr;
  1063. {$endc}
  1064. {
  1065. * Here ends the list of things that "belong" in Windows.
  1066. }
  1067. RGBColorPtr = ^RGBColor;
  1068. RGBColor = record
  1069. red: UInt16; { magnitude of red component }
  1070. green: UInt16; { magnitude of green component }
  1071. blue: UInt16; { magnitude of blue component }
  1072. end;
  1073. RGBColorHdl = ^RGBColorPtr;
  1074. {$ifc TYPED_FUNCTION_POINTERS}
  1075. ColorSearchProcPtr = function(var rgb: RGBColor; var position: SInt32): boolean;
  1076. {$elsec}
  1077. ColorSearchProcPtr = ProcPtr;
  1078. {$endc}
  1079. {$ifc TYPED_FUNCTION_POINTERS}
  1080. ColorComplementProcPtr = function(var rgb: RGBColor): boolean;
  1081. {$elsec}
  1082. ColorComplementProcPtr = ProcPtr;
  1083. {$endc}
  1084. {$ifc OPAQUE_UPP_TYPES}
  1085. DragGrayRgnUPP = ^SInt32; { an opaque UPP }
  1086. {$elsec}
  1087. DragGrayRgnUPP = UniversalProcPtr;
  1088. {$endc}
  1089. {$ifc OPAQUE_UPP_TYPES}
  1090. ColorSearchUPP = ^SInt32; { an opaque UPP }
  1091. {$elsec}
  1092. ColorSearchUPP = UniversalProcPtr;
  1093. {$endc}
  1094. {$ifc OPAQUE_UPP_TYPES}
  1095. ColorComplementUPP = ^SInt32; { an opaque UPP }
  1096. {$elsec}
  1097. ColorComplementUPP = UniversalProcPtr;
  1098. {$endc}
  1099. const
  1100. uppDragGrayRgnProcInfo = $00000000;
  1101. uppColorSearchProcInfo = $000003D0;
  1102. uppColorComplementProcInfo = $000000D0;
  1103. {
  1104. * NewDragGrayRgnUPP()
  1105. *
  1106. * Availability:
  1107. * Non-Carbon CFM: available as macro/inline
  1108. * CarbonLib: in CarbonLib 1.0 and later
  1109. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1110. }
  1111. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1112. function NewDragGrayRgnUPP(userRoutine: DragGrayRgnProcPtr): DragGrayRgnUPP; external name '_NewDragGrayRgnUPP'; { old name was NewDragGrayRgnProc }
  1113. {
  1114. * NewColorSearchUPP()
  1115. *
  1116. * Availability:
  1117. * Non-Carbon CFM: available as macro/inline
  1118. * CarbonLib: in CarbonLib 1.0 and later
  1119. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1120. }
  1121. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1122. function NewColorSearchUPP(userRoutine: ColorSearchProcPtr): ColorSearchUPP; external name '_NewColorSearchUPP'; { old name was NewColorSearchProc }
  1123. {
  1124. * NewColorComplementUPP()
  1125. *
  1126. * Availability:
  1127. * Non-Carbon CFM: available as macro/inline
  1128. * CarbonLib: in CarbonLib 1.0 and later
  1129. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1130. }
  1131. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1132. function NewColorComplementUPP(userRoutine: ColorComplementProcPtr): ColorComplementUPP; external name '_NewColorComplementUPP'; { old name was NewColorComplementProc }
  1133. {
  1134. * DisposeDragGrayRgnUPP()
  1135. *
  1136. * Availability:
  1137. * Non-Carbon CFM: available as macro/inline
  1138. * CarbonLib: in CarbonLib 1.0 and later
  1139. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1140. }
  1141. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1142. procedure DisposeDragGrayRgnUPP(userUPP: DragGrayRgnUPP); external name '_DisposeDragGrayRgnUPP';
  1143. {
  1144. * DisposeColorSearchUPP()
  1145. *
  1146. * Availability:
  1147. * Non-Carbon CFM: available as macro/inline
  1148. * CarbonLib: in CarbonLib 1.0 and later
  1149. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1150. }
  1151. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1152. procedure DisposeColorSearchUPP(userUPP: ColorSearchUPP); external name '_DisposeColorSearchUPP';
  1153. {
  1154. * DisposeColorComplementUPP()
  1155. *
  1156. * Availability:
  1157. * Non-Carbon CFM: available as macro/inline
  1158. * CarbonLib: in CarbonLib 1.0 and later
  1159. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1160. }
  1161. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1162. procedure DisposeColorComplementUPP(userUPP: ColorComplementUPP); external name '_DisposeColorComplementUPP';
  1163. {
  1164. * InvokeDragGrayRgnUPP()
  1165. *
  1166. * Availability:
  1167. * Non-Carbon CFM: available as macro/inline
  1168. * CarbonLib: in CarbonLib 1.0 and later
  1169. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1170. }
  1171. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1172. procedure InvokeDragGrayRgnUPP(userRoutine: DragGrayRgnUPP); external name '_InvokeDragGrayRgnUPP'; { old name was CallDragGrayRgnProc }
  1173. {
  1174. * InvokeColorSearchUPP()
  1175. *
  1176. * Availability:
  1177. * Non-Carbon CFM: available as macro/inline
  1178. * CarbonLib: in CarbonLib 1.0 and later
  1179. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1180. }
  1181. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1182. function InvokeColorSearchUPP(var rgb: RGBColor; var position: SInt32; userRoutine: ColorSearchUPP): boolean; external name '_InvokeColorSearchUPP'; { old name was CallColorSearchProc }
  1183. {
  1184. * InvokeColorComplementUPP()
  1185. *
  1186. * Availability:
  1187. * Non-Carbon CFM: available as macro/inline
  1188. * CarbonLib: in CarbonLib 1.0 and later
  1189. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1190. }
  1191. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1192. function InvokeColorComplementUPP(var rgb: RGBColor; userRoutine: ColorComplementUPP): boolean; external name '_InvokeColorComplementUPP'; { old name was CallColorComplementProc }
  1193. type
  1194. ColorSpecPtr = ^ColorSpec;
  1195. ColorSpec = record
  1196. value: SInt16; { index or other value }
  1197. rgb: RGBColor; { true color }
  1198. end;
  1199. CSpecArray = array [0..0] of ColorSpec;
  1200. ColorTablePtr = ^ColorTable;
  1201. ColorTable = record
  1202. ctSeed: SInt32; { unique identifier for table }
  1203. ctFlags: SInt16; { high bit: 0 = PixMap; 1 = device }
  1204. ctSize: SInt16; { number of entries in CTTable }
  1205. ctTable: CSpecArray; { array [0..0] of ColorSpec }
  1206. end;
  1207. CTabPtr = ^ColorTable;
  1208. CTabHandle = ^CTabPtr;
  1209. xColorSpecPtr = ^xColorSpec;
  1210. xColorSpec = record
  1211. value: SInt16; { index or other value }
  1212. rgb: RGBColor; { true color }
  1213. xalpha: SInt16;
  1214. end;
  1215. xCSpecArray = array [0..0] of xColorSpec;
  1216. MatchRecPtr = ^MatchRec;
  1217. MatchRec = record
  1218. red: UInt16;
  1219. green: UInt16;
  1220. blue: UInt16;
  1221. matchData: SInt32;
  1222. end;
  1223. {
  1224. QuickTime 3.0 makes PixMap data structure available on non-Mac OS's.
  1225. In order to implement PixMap in these alternate environments, the PixMap
  1226. had to be extended. The pmReserved field was changed to pmExt which is
  1227. a Handle to extra info. The planeBytes field was changed to pixelFormat.
  1228. In OS X, Quickdraw also uses the new PixMap data structure.
  1229. }
  1230. {$ifc undefined OLDPIXMAPSTRUCT}
  1231. {$ifc TARGET_OS_MAC AND TARGET_API_MAC_OS8}
  1232. {$setc OLDPIXMAPSTRUCT := 1}
  1233. {$elsec}
  1234. {$setc OLDPIXMAPSTRUCT := 0}
  1235. {$endc}
  1236. {$endc}
  1237. { pixel formats }
  1238. const
  1239. k1MonochromePixelFormat = $00000001; { 1 bit indexed }
  1240. k2IndexedPixelFormat = $00000002; { 2 bit indexed }
  1241. k4IndexedPixelFormat = $00000004; { 4 bit indexed }
  1242. k8IndexedPixelFormat = $00000008; { 8 bit indexed }
  1243. k16BE555PixelFormat = $00000010; { 16 bit BE rgb 555 (Mac) }
  1244. k24RGBPixelFormat = $00000018; { 24 bit rgb }
  1245. k32ARGBPixelFormat = $00000020; { 32 bit argb (Mac) }
  1246. k1IndexedGrayPixelFormat = $00000021; { 1 bit indexed gray }
  1247. k2IndexedGrayPixelFormat = $00000022; { 2 bit indexed gray }
  1248. k4IndexedGrayPixelFormat = $00000024; { 4 bit indexed gray }
  1249. k8IndexedGrayPixelFormat = $00000028; { 8 bit indexed gray }
  1250. { values for PixMap.pixelFormat }
  1251. k16LE555PixelFormat = FourCharCode('L555'); { 16 bit LE rgb 555 (PC) }
  1252. k16LE5551PixelFormat = FourCharCode('5551'); { 16 bit LE rgb 5551 }
  1253. k16BE565PixelFormat = FourCharCode('B565'); { 16 bit BE rgb 565 }
  1254. k16LE565PixelFormat = FourCharCode('L565'); { 16 bit LE rgb 565 }
  1255. k24BGRPixelFormat = FourCharCode('24BG'); { 24 bit bgr }
  1256. k32BGRAPixelFormat = FourCharCode('BGRA'); { 32 bit bgra (Matrox) }
  1257. k32ABGRPixelFormat = FourCharCode('ABGR'); { 32 bit abgr }
  1258. k32RGBAPixelFormat = FourCharCode('RGBA'); { 32 bit rgba }
  1259. kYUVSPixelFormat = FourCharCode('yuvs'); { YUV 4:2:2 byte ordering 16-unsigned = 'YUY2' }
  1260. kYUVUPixelFormat = FourCharCode('yuvu'); { YUV 4:2:2 byte ordering 16-signed }
  1261. kYVU9PixelFormat = FourCharCode('YVU9'); { YVU9 Planar 9 }
  1262. kYUV411PixelFormat = FourCharCode('Y411'); { YUV 4:1:1 Interleaved 16 }
  1263. kYVYU422PixelFormat = FourCharCode('YVYU'); { YVYU 4:2:2 byte ordering 16 }
  1264. kUYVY422PixelFormat = FourCharCode('UYVY'); { UYVY 4:2:2 byte ordering 16 }
  1265. kYUV211PixelFormat = FourCharCode('Y211'); { YUV 2:1:1 Packed 8 }
  1266. k2vuyPixelFormat = FourCharCode('2vuy'); { UYVY 4:2:2 byte ordering 16 }
  1267. type
  1268. PixMapPtr = ^PixMap;
  1269. PixMap = record
  1270. baseAddr: Ptr; { pointer to pixels }
  1271. rowBytes: SInt16; { offset to next line } { Carbon: uses extended rowbytes in pmExt field pixMap extension. Use ImageCompression's (QTGet|QTSet)PixMap(Handle|Ptr)RowBytes functions }
  1272. bounds: Rect; { encloses bitmap }
  1273. pmVersion: SInt16; { pixMap version number }
  1274. packType: SInt16; { defines packing format }
  1275. packSize: SInt32; { length of pixel data }
  1276. hRes: Fixed; { horiz. resolution (ppi) }
  1277. vRes: Fixed; { vert. resolution (ppi) }
  1278. pixelType: SInt16; { defines pixel type }
  1279. pixelSize: SInt16; { # bits in pixel }
  1280. cmpCount: SInt16; { # components in pixel }
  1281. cmpSize: SInt16; { # bits per component }
  1282. {$ifc OLDPIXMAPSTRUCT}
  1283. planeBytes: SInt32; { offset to next plane }
  1284. pmTable: CTabHandle; { color map for this pixMap }
  1285. pmReserved: SInt32;
  1286. {$elsec}
  1287. pixelFormat: OSType; {fourCharCode representation}
  1288. pmTable: CTabHandle; {color map for this pixMap}
  1289. pmExt: Handle; {Handle to pixMap extension}
  1290. {$endc}
  1291. end;
  1292. PixMapHandle = ^PixMapPtr;
  1293. PixPatPtr = ^PixPat;
  1294. PixPat = record
  1295. patType: SInt16; { type of pattern }
  1296. patMap: PixMapHandle; { the pattern's pixMap }
  1297. patData: Handle; { pixmap's data }
  1298. patXData: Handle; { expanded Pattern data }
  1299. patXValid: SInt16; { flags whether expanded Pattern valid }
  1300. patXMap: Handle; { Handle to expanded Pattern data }
  1301. pat1Data: Pattern; { old-Style pattern/RGB color }
  1302. end;
  1303. PixPatHandle = ^PixPatPtr;
  1304. CCrsrPtr = ^CCrsr;
  1305. CCrsr = record
  1306. crsrType: SInt16; { type of cursor }
  1307. crsrMap: PixMapHandle; { the cursor's pixmap }
  1308. crsrData: Handle; { cursor's data }
  1309. crsrXData: Handle; { expanded cursor data }
  1310. crsrXValid: SInt16; { depth of expanded data (0 if none) }
  1311. crsrXHandle: Handle; { future use }
  1312. crsr1Data: Bits16; { one-bit cursor }
  1313. crsrMask: Bits16; { cursor's mask }
  1314. crsrHotSpot: Point; { cursor's hotspot }
  1315. crsrXTable: SInt32; { private }
  1316. crsrID: SInt32; { private }
  1317. end;
  1318. CCrsrHandle = ^CCrsrPtr;
  1319. GammaTblPtr = ^GammaTbl;
  1320. GammaTbl = record
  1321. gVersion: SInt16; { gamma version number }
  1322. gType: SInt16; { gamma data type }
  1323. gFormulaSize: SInt16; { Formula data size }
  1324. gChanCnt: SInt16; { number of channels of data }
  1325. gDataCnt: SInt16; { number of values/channel }
  1326. gDataWidth: SInt16; { bits/corrected value (data packed to next larger byte size) }
  1327. gFormulaData: array [0..0] of SInt16; { data for formulas followed by gamma values }
  1328. end;
  1329. GammaTblHandle = ^GammaTblPtr;
  1330. ITabPtr = ^ITab;
  1331. ITab = record
  1332. iTabSeed: SInt32; { copy of CTSeed from source CTable }
  1333. iTabRes: SInt16; { bits/channel resolution of iTable }
  1334. iTTable: SInt8; { byte colortable index values }
  1335. end;
  1336. ITabHandle = ^ITabPtr;
  1337. SProcRecPtr = ^SProcRec;
  1338. SProcRec = record
  1339. nxtSrch: Handle; { SProcHndl Handle to next SProcRec }
  1340. srchProc: ColorSearchUPP; { search procedure proc ptr }
  1341. end;
  1342. SProcPtr = ^SProcRec;
  1343. SProcHndl = ^SProcPtr;
  1344. CProcRecPtr = ^CProcRec;
  1345. CProcRec = record
  1346. nxtComp: Handle; { CProcHndl Handle to next CProcRec }
  1347. compProc: ColorComplementUPP; { complement procedure proc ptr }
  1348. end;
  1349. CProcPtr = ^CProcRec;
  1350. CProcHndl = ^CProcPtr;
  1351. {
  1352. QuickTime 3.0 makes GDevice data structure available on non-Mac OS's.
  1353. In order to implement GDevice in these alternate environments, the GDevice
  1354. had to be extended. The gdReserved field was changed to gdExt which is
  1355. a Handle to extra info.
  1356. }
  1357. {$ifc undefined OLDGDEVICESTRUCT}
  1358. {$ifc TARGET_OS_MAC AND TARGET_API_MAC_OS8}
  1359. {$setc OLDGDEVICESTRUCT := 1}
  1360. {$elsec}
  1361. {$setc OLDGDEVICESTRUCT := 0}
  1362. {$endc}
  1363. {$endc}
  1364. GDevicePtr = ^GDevice;
  1365. GDPtr = ^GDevice;
  1366. GDHandle = ^GDPtr;
  1367. GDHandle_fix = GDHandle; { used as field type when a record declaration contains a GDHandle field identifier }
  1368. GDHandlePtr = ^GDHandle; { when a VAR xx: GDHandle parameter can be nil, it is changed to xx: GDHandlePtr }
  1369. GDevice = record
  1370. gdRefNum: SInt16; { driver's unit number }
  1371. gdID: SInt16; { client ID for search procs }
  1372. gdType: SInt16; { fixed/CLUT/direct }
  1373. gdITable: ITabHandle; { Handle to inverse lookup table }
  1374. gdResPref: SInt16; { preferred resolution of GDITable }
  1375. gdSearchProc: SProcHndl; { search proc list head }
  1376. gdCompProc: CProcHndl; { complement proc list }
  1377. gdFlags: SInt16; { grafDevice flags word }
  1378. gdPMap: PixMapHandle; { describing pixMap }
  1379. gdRefCon: SInt32; { reference value }
  1380. gdNextGD: GDHandle; { GDHandle Handle of next gDevice }
  1381. gdRect: Rect; { device's bounds in global coordinates }
  1382. gdMode: SInt32; { device's current mode }
  1383. gdCCBytes: SInt16; { depth of expanded cursor data }
  1384. gdCCDepth: SInt16; { depth of expanded cursor data }
  1385. gdCCXData: Handle; { Handle to cursor's expanded data }
  1386. gdCCXMask: Handle; { Handle to cursor's expanded mask }
  1387. {$ifc OLDGDEVICESTRUCT}
  1388. gdReserved: SInt32; { future use. MUST BE 0 }
  1389. {$elsec}
  1390. gdExt: Handle; {QuickTime 3.0 private info}
  1391. {$endc}
  1392. end;
  1393. GrafVars = record
  1394. rgbOpColor: RGBColor; { color for addPin subPin and average }
  1395. rgbHiliteColor: RGBColor; { color for hiliting }
  1396. pmFgColor: Handle; { palette Handle for foreground color }
  1397. pmFgIndex: SInt16; { index value for foreground }
  1398. pmBkColor: Handle; { palette Handle for background color }
  1399. pmBkIndex: SInt16; { index value for background }
  1400. pmFlags: SInt16; { flags for Palette Manager }
  1401. end;
  1402. GVarPtr = ^GrafVars;
  1403. GVarHandle = ^GVarPtr;
  1404. {$ifc NOT OPAQUE_TOOLBOX_STRUCTS}
  1405. CGrafPortPtr = ^CGrafPort;
  1406. CGrafPtr = ^CGrafPort;
  1407. {$elsec}
  1408. CGrafPtr = GrafPtr;
  1409. {$endc}
  1410. CGrafPtrPtr = ^CGrafPtr;
  1411. {$ifc TYPED_FUNCTION_POINTERS}
  1412. QDPrinterStatusProcPtr = function(opcode: PrinterStatusOpcode; currentPort: CGrafPtr; printerStatus: UnivPtr): OSStatus;
  1413. {$elsec}
  1414. QDPrinterStatusProcPtr = ProcPtr;
  1415. {$endc}
  1416. {$ifc OPAQUE_UPP_TYPES}
  1417. QDPrinterStatusUPP = ^SInt32; { an opaque UPP }
  1418. {$elsec}
  1419. QDPrinterStatusUPP = UniversalProcPtr;
  1420. {$endc}
  1421. CQDProcsPtr = ^CQDProcs;
  1422. CQDProcs = record
  1423. textProc: QDTextUPP;
  1424. lineProc: QDLineUPP;
  1425. rectProc: QDRectUPP;
  1426. rRectProc: QDRRectUPP;
  1427. ovalProc: QDOvalUPP;
  1428. arcProc: QDArcUPP;
  1429. polyProc: QDPolyUPP;
  1430. rgnProc: QDRgnUPP;
  1431. bitsProc: QDBitsUPP;
  1432. commentProc: QDCommentUPP;
  1433. txMeasProc: QDTxMeasUPP;
  1434. getPicProc: QDGetPicUPP;
  1435. putPicProc: QDPutPicUPP;
  1436. opcodeProc: QDOpcodeUPP;
  1437. newProc1: UniversalProcPtr; { this is the StdPix bottleneck -- see ImageCompression.h }
  1438. glyphsProc: QDStdGlyphsUPP; { unused on Mac OS X. was newProc2; now used in Unicode text drawing }
  1439. printerStatusProc: QDPrinterStatusUPP; { was newProc3; now used to communicate status between Printing code and System imaging code }
  1440. newProc4: UniversalProcPtr;
  1441. newProc5: UniversalProcPtr;
  1442. newProc6: UniversalProcPtr;
  1443. end;
  1444. {$ifc NOT OPAQUE_TOOLBOX_STRUCTS}
  1445. CGrafPort = record
  1446. device: SInt16; { not available in Carbon }
  1447. portPixMap: PixMapHandle; { in Carbon use GetPortPixMap }
  1448. portVersion: SInt16; { in Carbon use IsPortColor }
  1449. grafVars: Handle; { not available in Carbon }
  1450. chExtra: SInt16; { in Carbon use GetPortChExtra }
  1451. pnLocHFrac: SInt16; { in Carbon use Get/SetPortFracHPenLocation }
  1452. portRect: Rect; { in Carbon use Get/SetPortBounds }
  1453. visRgn: RgnHandle; { in Carbon use Get/SetPortVisibleRegion }
  1454. clipRgn: RgnHandle; { in Carbon use Get/SetPortClipRegion }
  1455. bkPixPat: PixPatHandle; { in Carbon use GetPortBackPixPat or BackPixPat }
  1456. rgbFgColor: RGBColor; { in Carbon use GetPortForeColor or RGBForeColor }
  1457. rgbBkColor: RGBColor; { in Carbon use GetPortBackColor or RGBBackColor }
  1458. pnLoc: Point; { in Carbon use GetPortPenLocation or MoveTo }
  1459. pnSize: Point; { in Carbon use Get/SetPortPenSize }
  1460. pnMode: SInt16; { in Carbon use Get/SetPortPenMode }
  1461. pnPixPat: PixPatHandle; { in Carbon use Get/SetPortPenPixPat }
  1462. fillPixPat: PixPatHandle; { in Carbon use GetPortFillPixPat }
  1463. pnVis: SInt16; { in Carbon use GetPortPenVisibility or Show/HidePen }
  1464. txFont: SInt16; { in Carbon use GetPortTextFont or TextFont }
  1465. txFace: StyleField; { in Carbon use GetPortTextFace or TextFace }
  1466. { StyleField occupies 16-bits, but only first 8-bits are used }
  1467. txMode: SInt16; { in Carbon use GetPortTextMode or TextMode }
  1468. txSize: SInt16; { in Carbon use GetPortTextSize or TextSize }
  1469. spExtra: Fixed; { in Carbon use GetPortSpExtra or SpaceExtra }
  1470. fgColor: SInt32; { not available in Carbon }
  1471. bkColor: SInt32; { not available in Carbon }
  1472. colrBit: SInt16; { not available in Carbon }
  1473. patStretch: SInt16; { not available in Carbon }
  1474. picSave: Handle; { in Carbon use IsPortPictureBeingDefined }
  1475. rgnSave: Handle; { in Carbon use IsPortRegionBeingDefined }
  1476. polySave: Handle; { in Carbon use IsPortPolyBeingDefined }
  1477. grafProcs: CQDProcsPtr; { in Carbon use Get/SetPortGrafProcs }
  1478. end;
  1479. {$endc}
  1480. {$ifc OPAQUE_TOOLBOX_STRUCTS}
  1481. CWindowPtr = WindowPtr;
  1482. {$elsec}
  1483. CWindowPtr = CGrafPtr;
  1484. {$endc} {OPAQUE_TOOLBOX_STRUCTS}
  1485. ReqListRecPtr = ^ReqListRec;
  1486. ReqListRec = record
  1487. reqLSize: SInt16; { request list size }
  1488. reqLData: array [0..0] of SInt16; { request list data }
  1489. end;
  1490. OpenCPicParamsPtr = ^OpenCPicParams;
  1491. OpenCPicParams = record
  1492. srcRect: Rect;
  1493. hRes: Fixed;
  1494. vRes: Fixed;
  1495. version: SInt16;
  1496. reserved1: SInt16;
  1497. reserved2: SInt32;
  1498. end;
  1499. const
  1500. kCursorImageMajorVersion = $0001;
  1501. kCursorImageMinorVersion = $0000;
  1502. type
  1503. CursorImageRecPtr = ^CursorImageRec;
  1504. CursorImageRec = record
  1505. majorVersion: UInt16;
  1506. minorVersion: UInt16;
  1507. cursorPixMap: PixMapHandle;
  1508. cursorBitMask: BitMapHandle;
  1509. end;
  1510. CursorImagePtr = ^CursorImageRec;
  1511. {$ifc TYPED_FUNCTION_POINTERS}
  1512. DeviceLoopDrawingProcPtr = procedure(depth: SInt16; deviceFlags: SInt16; targetDevice: GDHandle; userData: SInt32);
  1513. {$elsec}
  1514. DeviceLoopDrawingProcPtr = ProcPtr;
  1515. {$endc}
  1516. {$ifc OPAQUE_UPP_TYPES}
  1517. DeviceLoopDrawingUPP = ^SInt32; { an opaque UPP }
  1518. {$elsec}
  1519. DeviceLoopDrawingUPP = UniversalProcPtr;
  1520. {$endc}
  1521. const
  1522. uppQDPrinterStatusProcInfo = $00000FF1;
  1523. uppDeviceLoopDrawingProcInfo = $00003E80;
  1524. {$ifc CALL_NOT_IN_CARBON}
  1525. {
  1526. * NewQDPrinterStatusUPP()
  1527. *
  1528. * Availability:
  1529. * Non-Carbon CFM: available as macro/inline
  1530. * CarbonLib: not available
  1531. * Mac OS X: not available
  1532. }
  1533. function NewQDPrinterStatusUPP(userRoutine: QDPrinterStatusProcPtr): QDPrinterStatusUPP; external name '_NewQDPrinterStatusUPP'; { old name was NewQDPrinterStatusProc }
  1534. {$endc} {CALL_NOT_IN_CARBON}
  1535. {
  1536. * NewDeviceLoopDrawingUPP()
  1537. *
  1538. * Availability:
  1539. * Non-Carbon CFM: available as macro/inline
  1540. * CarbonLib: in CarbonLib 1.0 and later
  1541. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1542. }
  1543. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1544. function NewDeviceLoopDrawingUPP(userRoutine: DeviceLoopDrawingProcPtr): DeviceLoopDrawingUPP; external name '_NewDeviceLoopDrawingUPP'; { old name was NewDeviceLoopDrawingProc }
  1545. {$ifc CALL_NOT_IN_CARBON}
  1546. {
  1547. * DisposeQDPrinterStatusUPP()
  1548. *
  1549. * Availability:
  1550. * Non-Carbon CFM: available as macro/inline
  1551. * CarbonLib: not available
  1552. * Mac OS X: not available
  1553. }
  1554. procedure DisposeQDPrinterStatusUPP(userUPP: QDPrinterStatusUPP); external name '_DisposeQDPrinterStatusUPP';
  1555. {$endc} {CALL_NOT_IN_CARBON}
  1556. {
  1557. * DisposeDeviceLoopDrawingUPP()
  1558. *
  1559. * Availability:
  1560. * Non-Carbon CFM: available as macro/inline
  1561. * CarbonLib: in CarbonLib 1.0 and later
  1562. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1563. }
  1564. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1565. procedure DisposeDeviceLoopDrawingUPP(userUPP: DeviceLoopDrawingUPP); external name '_DisposeDeviceLoopDrawingUPP';
  1566. {$ifc CALL_NOT_IN_CARBON}
  1567. {
  1568. * InvokeQDPrinterStatusUPP()
  1569. *
  1570. * Availability:
  1571. * Non-Carbon CFM: available as macro/inline
  1572. * CarbonLib: not available
  1573. * Mac OS X: not available
  1574. }
  1575. function InvokeQDPrinterStatusUPP(opcode: PrinterStatusOpcode; currentPort: CGrafPtr; printerStatus: UnivPtr; userRoutine: QDPrinterStatusUPP): OSStatus; external name '_InvokeQDPrinterStatusUPP'; { old name was CallQDPrinterStatusProc }
  1576. {$endc} {CALL_NOT_IN_CARBON}
  1577. {
  1578. * InvokeDeviceLoopDrawingUPP()
  1579. *
  1580. * Availability:
  1581. * Non-Carbon CFM: available as macro/inline
  1582. * CarbonLib: in CarbonLib 1.0 and later
  1583. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1584. }
  1585. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1586. procedure InvokeDeviceLoopDrawingUPP(depth: SInt16; deviceFlags: SInt16; targetDevice: GDHandle; userData: SInt32; userRoutine: DeviceLoopDrawingUPP); external name '_InvokeDeviceLoopDrawingUPP'; { old name was CallDeviceLoopDrawingProc }
  1587. {$ifc NOT OPAQUE_TOOLBOX_STRUCTS OR NOT TARGET_API_MAC_CARBON}
  1588. type
  1589. QDGlobalsPtr = ^QDGlobals;
  1590. QDGlobals = record
  1591. privates: packed array [0..75] of char;
  1592. randSeed: SInt32; { in Carbon use GetQDGlobalsRandomSeed }
  1593. screenBits: BitMap; { in Carbon use GetQDGlobalsScreenBits }
  1594. arrow: Cursor; { in Carbon use GetQDGlobalsArrow }
  1595. dkGray: Pattern; { in Carbon use GetQDGlobalsDarkGray }
  1596. ltGray: Pattern; { in Carbon use GetQDGlobalsLightGray }
  1597. gray: Pattern; { in Carbon use GetQDGlobalsGray }
  1598. black: Pattern; { in Carbon use GetQDGlobalsBlack }
  1599. white: Pattern; { in Carbon use GetQDGlobalsWhite }
  1600. thePort: GrafPtr; { in Carbon use GetQDGlobalsThePort }
  1601. end;
  1602. QDGlobalsHdl = ^QDGlobalsPtr;
  1603. { To be in sync with the C interface to QuickDraw globals, pascal code must now }
  1604. { qualify the QuickDraw globals with Òqd.Ó (e.g. InitGraf(@qd.thePort); ) }
  1605. var qd: QDGlobals; external name '_qd'; (* attribute const *)
  1606. {$endc}
  1607. {$ifc CALL_NOT_IN_CARBON}
  1608. {
  1609. * InitGraf()
  1610. *
  1611. * Availability:
  1612. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1613. * CarbonLib: not available
  1614. * Mac OS X: not available
  1615. }
  1616. procedure InitGraf(globalPtr: UnivPtr); external name '_InitGraf';
  1617. {
  1618. * OpenPort()
  1619. *
  1620. * Availability:
  1621. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1622. * CarbonLib: not available
  1623. * Mac OS X: not available
  1624. }
  1625. procedure OpenPort(port: GrafPtr); external name '_OpenPort';
  1626. {
  1627. * InitPort()
  1628. *
  1629. * Availability:
  1630. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1631. * CarbonLib: not available
  1632. * Mac OS X: not available
  1633. }
  1634. procedure InitPort(port: GrafPtr); external name '_InitPort';
  1635. {
  1636. * ClosePort()
  1637. *
  1638. * Availability:
  1639. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1640. * CarbonLib: not available
  1641. * Mac OS X: not available
  1642. }
  1643. procedure ClosePort(port: GrafPtr); external name '_ClosePort';
  1644. {$endc} {CALL_NOT_IN_CARBON}
  1645. {
  1646. General comments about thread-safety of Quickdraw
  1647. -------------------------------------------------
  1648. The original design and implementation principles of Quickdraw seriously
  1649. conflict with the goal of making Quickdraw thread-safe. Many Quickdraw
  1650. functions rely on globals instead of explicit parameters. Even though the
  1651. current port (and the current GDevice) are being maintained per-thread,
  1652. a simple call like "MoveTo(x, y)" just doesn't make sense with preemptive threads,
  1653. if two different threads use the same port. Also, as soon as a client replaces
  1654. bottleneck procedures (SetStdCProcs), thread-safety is compromised.
  1655. That's why we maintain by default the "Not thread safe" attribute in Quickdraw APIs,
  1656. even though they may appear to be thread-safe.
  1657. }
  1658. {
  1659. These are Carbon only routines. They do nothing at all on
  1660. Mac OS 8, but work flawlessly on Mac OS X.
  1661. }
  1662. {
  1663. * LockPortBits() *** DEPRECATED ***
  1664. *
  1665. * Mac OS X threading:
  1666. * Not thread safe
  1667. *
  1668. * Availability:
  1669. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  1670. * CarbonLib: in CarbonLib 1.0 and later
  1671. * Non-Carbon CFM: not available
  1672. }
  1673. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4
  1674. function LockPortBits(port: GrafPtr): OSErr; external name '_LockPortBits';
  1675. {
  1676. * UnlockPortBits() *** DEPRECATED ***
  1677. *
  1678. * Mac OS X threading:
  1679. * Not thread safe
  1680. *
  1681. * Availability:
  1682. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  1683. * CarbonLib: in CarbonLib 1.0 and later
  1684. * Non-Carbon CFM: not available
  1685. }
  1686. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4
  1687. function UnlockPortBits(port: GrafPtr): OSErr; external name '_UnlockPortBits';
  1688. { Break a region up into rectangles. }
  1689. const
  1690. kQDParseRegionFromTop = $01;
  1691. kQDParseRegionFromBottom = $02;
  1692. kQDParseRegionFromLeft = $04;
  1693. kQDParseRegionFromRight = $08;
  1694. kQDParseRegionFromTopLeft = $05;
  1695. kQDParseRegionFromBottomRight = $0A;
  1696. type
  1697. QDRegionParseDirection = SInt32;
  1698. const
  1699. kQDRegionToRectsMsgInit = 1;
  1700. kQDRegionToRectsMsgParse = 2;
  1701. kQDRegionToRectsMsgTerminate = 3;
  1702. type
  1703. {$ifc TYPED_FUNCTION_POINTERS}
  1704. RegionToRectsProcPtr = function(message: UInt16; rgn: RgnHandle; const (*var*) rect_: Rect; refCon: UnivPtr): OSStatus;
  1705. {$elsec}
  1706. RegionToRectsProcPtr = ProcPtr;
  1707. {$endc}
  1708. {$ifc OPAQUE_UPP_TYPES}
  1709. RegionToRectsUPP = ^SInt32; { an opaque UPP }
  1710. {$elsec}
  1711. RegionToRectsUPP = UniversalProcPtr;
  1712. {$endc}
  1713. const
  1714. uppRegionToRectsProcInfo = $00003FB1;
  1715. {
  1716. * NewRegionToRectsUPP()
  1717. *
  1718. * Availability:
  1719. * Non-Carbon CFM: available as macro/inline
  1720. * CarbonLib: in CarbonLib 1.0 and later
  1721. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1722. }
  1723. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1724. function NewRegionToRectsUPP(userRoutine: RegionToRectsProcPtr): RegionToRectsUPP; external name '_NewRegionToRectsUPP'; { old name was NewRegionToRectsProc }
  1725. {
  1726. * DisposeRegionToRectsUPP()
  1727. *
  1728. * Availability:
  1729. * Non-Carbon CFM: available as macro/inline
  1730. * CarbonLib: in CarbonLib 1.0 and later
  1731. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1732. }
  1733. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1734. procedure DisposeRegionToRectsUPP(userUPP: RegionToRectsUPP); external name '_DisposeRegionToRectsUPP';
  1735. {
  1736. * InvokeRegionToRectsUPP()
  1737. *
  1738. * Availability:
  1739. * Non-Carbon CFM: available as macro/inline
  1740. * CarbonLib: in CarbonLib 1.0 and later
  1741. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1742. }
  1743. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1744. function InvokeRegionToRectsUPP(message: UInt16; rgn: RgnHandle; const (*var*) rect_: Rect; refCon: UnivPtr; userRoutine: RegionToRectsUPP): OSStatus; external name '_InvokeRegionToRectsUPP'; { old name was CallRegionToRectsProc }
  1745. {
  1746. * QDRegionToRects()
  1747. *
  1748. * Availability:
  1749. * Non-Carbon CFM: not available
  1750. * CarbonLib: in CarbonLib 1.0 and later
  1751. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  1752. }
  1753. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1754. function QDRegionToRects(rgn: RgnHandle; dir: QDRegionParseDirection; proc: RegionToRectsUPP; userData: UnivPtr): OSStatus; external name '_QDRegionToRects';
  1755. {$ifc NOT TARGET_OS_MAC}
  1756. {$ifc CALL_NOT_IN_CARBON}
  1757. {
  1758. * UpdatePort()
  1759. *
  1760. * Availability:
  1761. * Non-Carbon CFM: not available
  1762. * CarbonLib: not available
  1763. * Mac OS X: not available
  1764. }
  1765. function UpdatePort(port: GrafPtr): OSErr; external name '_UpdatePort';
  1766. {
  1767. * GetPortNativeWindow()
  1768. *
  1769. * Availability:
  1770. * Non-Carbon CFM: not available
  1771. * CarbonLib: not available
  1772. * Mac OS X: not available
  1773. }
  1774. function GetPortNativeWindow(macPort: GrafPtr): Ptr; external name '_GetPortNativeWindow';
  1775. {
  1776. * GetNativeWindowPort()
  1777. *
  1778. * Availability:
  1779. * Non-Carbon CFM: not available
  1780. * CarbonLib: not available
  1781. * Mac OS X: not available
  1782. }
  1783. function GetNativeWindowPort(nativeWindow: UnivPtr): GrafPtr; external name '_GetNativeWindowPort';
  1784. {
  1785. * MacRegionToNativeRegion()
  1786. *
  1787. * Availability:
  1788. * Non-Carbon CFM: not available
  1789. * CarbonLib: not available
  1790. * Mac OS X: not available
  1791. }
  1792. function MacRegionToNativeRegion(macRegion: RgnHandle): Ptr; external name '_MacRegionToNativeRegion';
  1793. {
  1794. * NativeRegionToMacRegion()
  1795. *
  1796. * Availability:
  1797. * Non-Carbon CFM: not available
  1798. * CarbonLib: not available
  1799. * Mac OS X: not available
  1800. }
  1801. function NativeRegionToMacRegion(nativeRegion: UnivPtr): RgnHandle; external name '_NativeRegionToMacRegion';
  1802. {$endc} {CALL_NOT_IN_CARBON}
  1803. {$endc}
  1804. {$ifc TARGET_OS_WIN32}
  1805. {$ifc CALL_NOT_IN_CARBON}
  1806. {
  1807. * GetPortHWND()
  1808. *
  1809. * Availability:
  1810. * Non-Carbon CFM: not available
  1811. * CarbonLib: not available
  1812. * Mac OS X: not available
  1813. }
  1814. function GetPortHWND(port: GrafPtr): Ptr; external name '_GetPortHWND';
  1815. {
  1816. * GetHWNDPort()
  1817. *
  1818. * Availability:
  1819. * Non-Carbon CFM: not available
  1820. * CarbonLib: not available
  1821. * Mac OS X: not available
  1822. }
  1823. function GetHWNDPort(theHWND: UnivPtr): GrafPtr; external name '_GetHWNDPort';
  1824. {
  1825. * GetPortHDC()
  1826. *
  1827. * Availability:
  1828. * Non-Carbon CFM: not available
  1829. * CarbonLib: not available
  1830. * Mac OS X: not available
  1831. }
  1832. function GetPortHDC(port: GrafPtr): Ptr; external name '_GetPortHDC';
  1833. {
  1834. * GetPortHBITMAP()
  1835. *
  1836. * Availability:
  1837. * Non-Carbon CFM: not available
  1838. * CarbonLib: not available
  1839. * Mac OS X: not available
  1840. }
  1841. function GetPortHBITMAP(port: GrafPtr): Ptr; external name '_GetPortHBITMAP';
  1842. {
  1843. * GetPortHPALETTE()
  1844. *
  1845. * Availability:
  1846. * Non-Carbon CFM: not available
  1847. * CarbonLib: not available
  1848. * Mac OS X: not available
  1849. }
  1850. function GetPortHPALETTE(port: GrafPtr): Ptr; external name '_GetPortHPALETTE';
  1851. {
  1852. * GetPortHFONT()
  1853. *
  1854. * Availability:
  1855. * Non-Carbon CFM: not available
  1856. * CarbonLib: not available
  1857. * Mac OS X: not available
  1858. }
  1859. function GetPortHFONT(port: GrafPtr): Ptr; external name '_GetPortHFONT';
  1860. {
  1861. * GetDIBFromPICT()
  1862. *
  1863. * Availability:
  1864. * Non-Carbon CFM: not available
  1865. * CarbonLib: not available
  1866. * Mac OS X: not available
  1867. }
  1868. function GetDIBFromPICT(hPict: PicHandle): Ptr; external name '_GetDIBFromPICT';
  1869. {
  1870. * GetPICTFromDIB()
  1871. *
  1872. * Availability:
  1873. * Non-Carbon CFM: not available
  1874. * CarbonLib: not available
  1875. * Mac OS X: not available
  1876. }
  1877. function GetPICTFromDIB(h: UnivPtr): PicHandle; external name '_GetPICTFromDIB';
  1878. {$endc} {CALL_NOT_IN_CARBON}
  1879. {$endc} {TARGET_OS_WIN32}
  1880. {
  1881. * [Mac]SetPort() *** DEPRECATED ***
  1882. *
  1883. * Mac OS X threading:
  1884. * Not thread safe
  1885. *
  1886. * Availability:
  1887. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  1888. * CarbonLib: in CarbonLib 1.0 and later
  1889. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1890. }
  1891. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1892. procedure SetPort(port: GrafPtr); external name '_SetPort';
  1893. {
  1894. * GetPort() *** DEPRECATED ***
  1895. *
  1896. * Mac OS X threading:
  1897. * Not thread safe
  1898. *
  1899. * Availability:
  1900. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  1901. * CarbonLib: in CarbonLib 1.0 and later
  1902. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1903. }
  1904. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1905. procedure GetPort(var port: GrafPtr); external name '_GetPort';
  1906. {
  1907. * QDSwapPort()
  1908. *
  1909. * Summary:
  1910. * Combines a GetPort(&savePort); SetPort(newPort) sequence.
  1911. *
  1912. * Discussion:
  1913. * On X, the GetPort/SetPort calls act on per-thread globals, and
  1914. * cost more processor cycles than in the past, where they were
  1915. * simple memory accessors. To optimize, use the QDSwapPort call
  1916. * which combines both, and returns a Boolean indicating if the port
  1917. * actually did change. Typical usage: portChanged =
  1918. * QDSwapPort(newPort, &savePort); // some drawing into newPort if
  1919. * (portChanged) QDSwapPort(savePort, NULL);
  1920. *
  1921. * Mac OS X threading:
  1922. * Not thread safe
  1923. *
  1924. * Parameters:
  1925. *
  1926. * inNewPort:
  1927. * The new port to be set.
  1928. *
  1929. * outOldPort:
  1930. * Receives the previous port. Can be NULL.
  1931. *
  1932. * Result:
  1933. * A Boolean indicating whether the port was changed, i.e.
  1934. * (inNewPort != *outOldPort)
  1935. *
  1936. * Availability:
  1937. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  1938. * CarbonLib: in CarbonLib 1.5 and later
  1939. * Non-Carbon CFM: not available
  1940. }
  1941. //AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER;
  1942. function QDSwapPort(inNewPort: CGrafPtr; outOldPort: CGrafPtrPtr): boolean; external name '_QDSwapPort';
  1943. {
  1944. * GrafDevice() *** DEPRECATED ***
  1945. *
  1946. * Mac OS X threading:
  1947. * Not thread safe
  1948. *
  1949. * Availability:
  1950. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  1951. * CarbonLib: in CarbonLib 1.0 and later
  1952. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1953. }
  1954. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1955. procedure GrafDevice(device: SInt16); external name '_GrafDevice';
  1956. {
  1957. * SetPortBits() *** DEPRECATED ***
  1958. *
  1959. * Mac OS X threading:
  1960. * Not thread safe
  1961. *
  1962. * Availability:
  1963. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  1964. * CarbonLib: in CarbonLib 1.0 and later
  1965. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1966. }
  1967. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1968. procedure SetPortBits(const (*var*) bm: BitMap); external name '_SetPortBits';
  1969. {
  1970. * PortSize() *** DEPRECATED ***
  1971. *
  1972. * Mac OS X threading:
  1973. * Not thread safe
  1974. *
  1975. * Availability:
  1976. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  1977. * CarbonLib: in CarbonLib 1.0 and later
  1978. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1979. }
  1980. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1981. procedure PortSize(width: SInt16; height: SInt16); external name '_PortSize';
  1982. {
  1983. * MovePortTo() *** DEPRECATED ***
  1984. *
  1985. * Mac OS X threading:
  1986. * Not thread safe
  1987. *
  1988. * Availability:
  1989. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  1990. * CarbonLib: in CarbonLib 1.0 and later
  1991. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  1992. }
  1993. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  1994. procedure MovePortTo(leftGlobal: SInt16; topGlobal: SInt16); external name '_MovePortTo';
  1995. {
  1996. * SetOrigin() *** DEPRECATED ***
  1997. *
  1998. * Mac OS X threading:
  1999. * Not thread safe
  2000. *
  2001. * Availability:
  2002. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2003. * CarbonLib: in CarbonLib 1.0 and later
  2004. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2005. }
  2006. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2007. procedure SetOrigin(h: SInt16; v: SInt16); external name '_SetOrigin';
  2008. {
  2009. * SetClip() *** DEPRECATED ***
  2010. *
  2011. * Mac OS X threading:
  2012. * Not thread safe
  2013. *
  2014. * Availability:
  2015. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2016. * CarbonLib: in CarbonLib 1.0 and later
  2017. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2018. }
  2019. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2020. procedure SetClip(rgn: RgnHandle); external name '_SetClip';
  2021. {
  2022. * GetClip() *** DEPRECATED ***
  2023. *
  2024. * Mac OS X threading:
  2025. * Not thread safe
  2026. *
  2027. * Availability:
  2028. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2029. * CarbonLib: in CarbonLib 1.0 and later
  2030. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2031. }
  2032. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2033. procedure GetClip(rgn: RgnHandle); external name '_GetClip';
  2034. {
  2035. * ClipRect() *** DEPRECATED ***
  2036. *
  2037. * Mac OS X threading:
  2038. * Not thread safe
  2039. *
  2040. * Availability:
  2041. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2042. * CarbonLib: in CarbonLib 1.0 and later
  2043. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2044. }
  2045. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2046. procedure ClipRect(const (*var*) r: Rect); external name '_ClipRect';
  2047. {
  2048. * BackPat() *** DEPRECATED ***
  2049. *
  2050. * Mac OS X threading:
  2051. * Not thread safe
  2052. *
  2053. * Availability:
  2054. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2055. * CarbonLib: in CarbonLib 1.0 and later
  2056. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2057. }
  2058. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2059. procedure BackPat(const (*var*) pat: Pattern); external name '_BackPat';
  2060. {
  2061. * InitCursor() *** DEPRECATED ***
  2062. *
  2063. * Mac OS X threading:
  2064. * Not thread safe
  2065. *
  2066. * Availability:
  2067. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2068. * CarbonLib: in CarbonLib 1.0 and later
  2069. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2070. }
  2071. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2072. procedure InitCursor; external name '_InitCursor';
  2073. {
  2074. * [Mac]SetCursor() *** DEPRECATED ***
  2075. *
  2076. * Mac OS X threading:
  2077. * Not thread safe
  2078. *
  2079. * Availability:
  2080. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2081. * CarbonLib: in CarbonLib 1.0 and later
  2082. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2083. }
  2084. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2085. procedure SetCursor(const (*var*) crsr: Cursor); external name '_SetCursor';
  2086. {
  2087. * HideCursor() *** DEPRECATED ***
  2088. *
  2089. * Mac OS X threading:
  2090. * Not thread safe
  2091. *
  2092. * Availability:
  2093. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2094. * CarbonLib: in CarbonLib 1.0 and later
  2095. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2096. }
  2097. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2098. procedure HideCursor; external name '_HideCursor';
  2099. {
  2100. * [Mac]ShowCursor() *** DEPRECATED ***
  2101. *
  2102. * Mac OS X threading:
  2103. * Not thread safe
  2104. *
  2105. * Availability:
  2106. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2107. * CarbonLib: in CarbonLib 1.0 and later
  2108. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2109. }
  2110. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2111. procedure ShowCursor; external name '_ShowCursor';
  2112. {
  2113. * ObscureCursor() *** DEPRECATED ***
  2114. *
  2115. * Mac OS X threading:
  2116. * Not thread safe
  2117. *
  2118. * Availability:
  2119. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2120. * CarbonLib: in CarbonLib 1.0 and later
  2121. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2122. }
  2123. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2124. procedure ObscureCursor; external name '_ObscureCursor';
  2125. {
  2126. * HidePen() *** DEPRECATED ***
  2127. *
  2128. * Mac OS X threading:
  2129. * Not thread safe
  2130. *
  2131. * Availability:
  2132. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2133. * CarbonLib: in CarbonLib 1.0 and later
  2134. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2135. }
  2136. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2137. procedure HidePen; external name '_HidePen';
  2138. {
  2139. * ShowPen() *** DEPRECATED ***
  2140. *
  2141. * Mac OS X threading:
  2142. * Not thread safe
  2143. *
  2144. * Availability:
  2145. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2146. * CarbonLib: in CarbonLib 1.0 and later
  2147. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2148. }
  2149. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2150. procedure ShowPen; external name '_ShowPen';
  2151. {
  2152. * GetPen() *** DEPRECATED ***
  2153. *
  2154. * Mac OS X threading:
  2155. * Not thread safe
  2156. *
  2157. * Availability:
  2158. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2159. * CarbonLib: in CarbonLib 1.0 and later
  2160. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2161. }
  2162. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2163. procedure GetPen(var pt: Point); external name '_GetPen';
  2164. {
  2165. * GetPenState() *** DEPRECATED ***
  2166. *
  2167. * Mac OS X threading:
  2168. * Not thread safe
  2169. *
  2170. * Availability:
  2171. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2172. * CarbonLib: in CarbonLib 1.0 and later
  2173. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2174. }
  2175. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2176. procedure GetPenState(var pnState: PenState); external name '_GetPenState';
  2177. {
  2178. * SetPenState() *** DEPRECATED ***
  2179. *
  2180. * Mac OS X threading:
  2181. * Not thread safe
  2182. *
  2183. * Availability:
  2184. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2185. * CarbonLib: in CarbonLib 1.0 and later
  2186. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2187. }
  2188. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2189. procedure SetPenState(const (*var*) pnState: PenState); external name '_SetPenState';
  2190. {
  2191. * PenSize() *** DEPRECATED ***
  2192. *
  2193. * Mac OS X threading:
  2194. * Not thread safe
  2195. *
  2196. * Availability:
  2197. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2198. * CarbonLib: in CarbonLib 1.0 and later
  2199. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2200. }
  2201. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2202. procedure PenSize(width: SInt16; height: SInt16); external name '_PenSize';
  2203. {
  2204. * PenMode() *** DEPRECATED ***
  2205. *
  2206. * Mac OS X threading:
  2207. * Not thread safe
  2208. *
  2209. * Availability:
  2210. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2211. * CarbonLib: in CarbonLib 1.0 and later
  2212. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2213. }
  2214. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2215. procedure PenMode(mode: SInt16); external name '_PenMode';
  2216. {
  2217. * PenPat() *** DEPRECATED ***
  2218. *
  2219. * Mac OS X threading:
  2220. * Not thread safe
  2221. *
  2222. * Availability:
  2223. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2224. * CarbonLib: in CarbonLib 1.0 and later
  2225. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2226. }
  2227. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2228. procedure PenPat(const (*var*) pat: Pattern); external name '_PenPat';
  2229. {
  2230. * PenNormal() *** DEPRECATED ***
  2231. *
  2232. * Mac OS X threading:
  2233. * Not thread safe
  2234. *
  2235. * Availability:
  2236. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2237. * CarbonLib: in CarbonLib 1.0 and later
  2238. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2239. }
  2240. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2241. procedure PenNormal; external name '_PenNormal';
  2242. {
  2243. * MoveTo() *** DEPRECATED ***
  2244. *
  2245. * Mac OS X threading:
  2246. * Not thread safe
  2247. *
  2248. * Availability:
  2249. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2250. * CarbonLib: in CarbonLib 1.0 and later
  2251. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2252. }
  2253. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2254. procedure MoveTo(h: SInt16; v: SInt16); external name '_MoveTo';
  2255. {
  2256. * Move() *** DEPRECATED ***
  2257. *
  2258. * Mac OS X threading:
  2259. * Not thread safe
  2260. *
  2261. * Availability:
  2262. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2263. * CarbonLib: in CarbonLib 1.0 and later
  2264. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2265. }
  2266. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2267. procedure Move(dh: SInt16; dv: SInt16); external name '_Move';
  2268. {
  2269. * [Mac]LineTo() *** DEPRECATED ***
  2270. *
  2271. * Mac OS X threading:
  2272. * Not thread safe
  2273. *
  2274. * Availability:
  2275. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2276. * CarbonLib: in CarbonLib 1.0 and later
  2277. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2278. }
  2279. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2280. procedure LineTo(h: SInt16; v: SInt16); external name '_LineTo';
  2281. {
  2282. * Line() *** DEPRECATED ***
  2283. *
  2284. * Mac OS X threading:
  2285. * Not thread safe
  2286. *
  2287. * Availability:
  2288. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2289. * CarbonLib: in CarbonLib 1.0 and later
  2290. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2291. }
  2292. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2293. procedure Line(dh: SInt16; dv: SInt16); external name '_Line';
  2294. {
  2295. * ForeColor() *** DEPRECATED ***
  2296. *
  2297. * Mac OS X threading:
  2298. * Not thread safe
  2299. *
  2300. * Availability:
  2301. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2302. * CarbonLib: in CarbonLib 1.0 and later
  2303. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2304. }
  2305. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2306. procedure ForeColor(color: SInt32); external name '_ForeColor';
  2307. {
  2308. * BackColor() *** DEPRECATED ***
  2309. *
  2310. * Mac OS X threading:
  2311. * Not thread safe
  2312. *
  2313. * Availability:
  2314. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2315. * CarbonLib: in CarbonLib 1.0 and later
  2316. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2317. }
  2318. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2319. procedure BackColor(color: SInt32); external name '_BackColor';
  2320. {
  2321. * ColorBit() *** DEPRECATED ***
  2322. *
  2323. * Mac OS X threading:
  2324. * Not thread safe
  2325. *
  2326. * Availability:
  2327. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2328. * CarbonLib: in CarbonLib 1.0 and later
  2329. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2330. }
  2331. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2332. procedure ColorBit(whichBit: SInt16); external name '_ColorBit';
  2333. {
  2334. * [Mac]SetRect() *** DEPRECATED ***
  2335. *
  2336. * Mac OS X threading:
  2337. * Not thread safe
  2338. *
  2339. * Availability:
  2340. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2341. * CarbonLib: in CarbonLib 1.0 and later
  2342. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2343. }
  2344. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2345. procedure SetRect(var r: Rect; left: SInt16; top: SInt16; right: SInt16; bottom: SInt16); external name '_SetRect';
  2346. {
  2347. * [Mac]OffsetRect() *** DEPRECATED ***
  2348. *
  2349. * Mac OS X threading:
  2350. * Not thread safe
  2351. *
  2352. * Availability:
  2353. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2354. * CarbonLib: in CarbonLib 1.0 and later
  2355. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2356. }
  2357. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2358. procedure OffsetRect(var r: Rect; dh: SInt16; dv: SInt16); external name '_OffsetRect';
  2359. {
  2360. * [Mac]InsetRect() *** DEPRECATED ***
  2361. *
  2362. * Mac OS X threading:
  2363. * Not thread safe
  2364. *
  2365. * Availability:
  2366. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2367. * CarbonLib: in CarbonLib 1.0 and later
  2368. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2369. }
  2370. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2371. procedure InsetRect(var r: Rect; dh: SInt16; dv: SInt16); external name '_InsetRect';
  2372. {
  2373. * SectRect() *** DEPRECATED ***
  2374. *
  2375. * Mac OS X threading:
  2376. * Not thread safe
  2377. *
  2378. * Availability:
  2379. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2380. * CarbonLib: in CarbonLib 1.0 and later
  2381. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2382. }
  2383. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2384. function SectRect(const (*var*) src1: Rect; const (*var*) src2: Rect; var dstRect: Rect): boolean; external name '_SectRect';
  2385. {
  2386. * [Mac]UnionRect() *** DEPRECATED ***
  2387. *
  2388. * Mac OS X threading:
  2389. * Not thread safe
  2390. *
  2391. * Availability:
  2392. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2393. * CarbonLib: in CarbonLib 1.0 and later
  2394. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2395. }
  2396. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2397. procedure UnionRect(const (*var*) src1: Rect; const (*var*) src2: Rect; var dstRect: Rect); external name '_UnionRect';
  2398. {
  2399. * [Mac]EqualRect() *** DEPRECATED ***
  2400. *
  2401. * Mac OS X threading:
  2402. * Not thread safe
  2403. *
  2404. * Availability:
  2405. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2406. * CarbonLib: in CarbonLib 1.0 and later
  2407. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2408. }
  2409. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2410. function EqualRect(const (*var*) rect1: Rect; const (*var*) rect2: Rect): boolean; external name '_EqualRect';
  2411. {
  2412. * EmptyRect() *** DEPRECATED ***
  2413. *
  2414. * Mac OS X threading:
  2415. * Not thread safe
  2416. *
  2417. * Availability:
  2418. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2419. * CarbonLib: in CarbonLib 1.0 and later
  2420. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2421. }
  2422. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2423. function EmptyRect(const (*var*) r: Rect): boolean; external name '_EmptyRect';
  2424. {
  2425. * [Mac]FrameRect() *** DEPRECATED ***
  2426. *
  2427. * Mac OS X threading:
  2428. * Not thread safe
  2429. *
  2430. * Availability:
  2431. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2432. * CarbonLib: in CarbonLib 1.0 and later
  2433. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2434. }
  2435. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2436. procedure FrameRect(const (*var*) r: Rect); external name '_FrameRect';
  2437. {
  2438. * PaintRect() *** DEPRECATED ***
  2439. *
  2440. * Mac OS X threading:
  2441. * Not thread safe
  2442. *
  2443. * Availability:
  2444. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2445. * CarbonLib: in CarbonLib 1.0 and later
  2446. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2447. }
  2448. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2449. procedure PaintRect(const (*var*) r: Rect); external name '_PaintRect';
  2450. {
  2451. * EraseRect() *** DEPRECATED ***
  2452. *
  2453. * Mac OS X threading:
  2454. * Not thread safe
  2455. *
  2456. * Availability:
  2457. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2458. * CarbonLib: in CarbonLib 1.0 and later
  2459. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2460. }
  2461. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2462. procedure EraseRect(const (*var*) r: Rect); external name '_EraseRect';
  2463. {
  2464. * [Mac]InvertRect() *** DEPRECATED ***
  2465. *
  2466. * Mac OS X threading:
  2467. * Not thread safe
  2468. *
  2469. * Availability:
  2470. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2471. * CarbonLib: in CarbonLib 1.0 and later
  2472. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2473. }
  2474. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2475. procedure InvertRect(const (*var*) r: Rect); external name '_InvertRect';
  2476. {
  2477. * [Mac]FillRect() *** DEPRECATED ***
  2478. *
  2479. * Mac OS X threading:
  2480. * Not thread safe
  2481. *
  2482. * Availability:
  2483. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2484. * CarbonLib: in CarbonLib 1.0 and later
  2485. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2486. }
  2487. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2488. procedure FillRect(const (*var*) r: Rect; const (*var*) pat: Pattern); external name '_FillRect';
  2489. {
  2490. * FrameOval() *** DEPRECATED ***
  2491. *
  2492. * Mac OS X threading:
  2493. * Not thread safe
  2494. *
  2495. * Availability:
  2496. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2497. * CarbonLib: in CarbonLib 1.0 and later
  2498. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2499. }
  2500. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2501. procedure FrameOval(const (*var*) r: Rect); external name '_FrameOval';
  2502. {
  2503. * PaintOval() *** DEPRECATED ***
  2504. *
  2505. * Mac OS X threading:
  2506. * Not thread safe
  2507. *
  2508. * Availability:
  2509. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2510. * CarbonLib: in CarbonLib 1.0 and later
  2511. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2512. }
  2513. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2514. procedure PaintOval(const (*var*) r: Rect); external name '_PaintOval';
  2515. {
  2516. * EraseOval() *** DEPRECATED ***
  2517. *
  2518. * Mac OS X threading:
  2519. * Not thread safe
  2520. *
  2521. * Availability:
  2522. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2523. * CarbonLib: in CarbonLib 1.0 and later
  2524. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2525. }
  2526. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2527. procedure EraseOval(const (*var*) r: Rect); external name '_EraseOval';
  2528. {
  2529. * InvertOval() *** DEPRECATED ***
  2530. *
  2531. * Mac OS X threading:
  2532. * Not thread safe
  2533. *
  2534. * Availability:
  2535. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2536. * CarbonLib: in CarbonLib 1.0 and later
  2537. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2538. }
  2539. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2540. procedure InvertOval(const (*var*) r: Rect); external name '_InvertOval';
  2541. {
  2542. * FillOval() *** DEPRECATED ***
  2543. *
  2544. * Mac OS X threading:
  2545. * Not thread safe
  2546. *
  2547. * Availability:
  2548. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2549. * CarbonLib: in CarbonLib 1.0 and later
  2550. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2551. }
  2552. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2553. procedure FillOval(const (*var*) r: Rect; const (*var*) pat: Pattern); external name '_FillOval';
  2554. {
  2555. * FrameRoundRect() *** DEPRECATED ***
  2556. *
  2557. * Mac OS X threading:
  2558. * Not thread safe
  2559. *
  2560. * Availability:
  2561. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2562. * CarbonLib: in CarbonLib 1.0 and later
  2563. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2564. }
  2565. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2566. procedure FrameRoundRect(const (*var*) r: Rect; ovalWidth: SInt16; ovalHeight: SInt16); external name '_FrameRoundRect';
  2567. {
  2568. * PaintRoundRect() *** DEPRECATED ***
  2569. *
  2570. * Mac OS X threading:
  2571. * Not thread safe
  2572. *
  2573. * Availability:
  2574. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2575. * CarbonLib: in CarbonLib 1.0 and later
  2576. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2577. }
  2578. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2579. procedure PaintRoundRect(const (*var*) r: Rect; ovalWidth: SInt16; ovalHeight: SInt16); external name '_PaintRoundRect';
  2580. {
  2581. * EraseRoundRect() *** DEPRECATED ***
  2582. *
  2583. * Mac OS X threading:
  2584. * Not thread safe
  2585. *
  2586. * Availability:
  2587. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2588. * CarbonLib: in CarbonLib 1.0 and later
  2589. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2590. }
  2591. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2592. procedure EraseRoundRect(const (*var*) r: Rect; ovalWidth: SInt16; ovalHeight: SInt16); external name '_EraseRoundRect';
  2593. {
  2594. * InvertRoundRect() *** DEPRECATED ***
  2595. *
  2596. * Mac OS X threading:
  2597. * Not thread safe
  2598. *
  2599. * Availability:
  2600. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2601. * CarbonLib: in CarbonLib 1.0 and later
  2602. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2603. }
  2604. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2605. procedure InvertRoundRect(const (*var*) r: Rect; ovalWidth: SInt16; ovalHeight: SInt16); external name '_InvertRoundRect';
  2606. {
  2607. * FillRoundRect() *** DEPRECATED ***
  2608. *
  2609. * Mac OS X threading:
  2610. * Not thread safe
  2611. *
  2612. * Availability:
  2613. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2614. * CarbonLib: in CarbonLib 1.0 and later
  2615. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2616. }
  2617. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2618. procedure FillRoundRect(const (*var*) r: Rect; ovalWidth: SInt16; ovalHeight: SInt16; const (*var*) pat: Pattern); external name '_FillRoundRect';
  2619. {
  2620. * FrameArc() *** DEPRECATED ***
  2621. *
  2622. * Mac OS X threading:
  2623. * Not thread safe
  2624. *
  2625. * Availability:
  2626. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2627. * CarbonLib: in CarbonLib 1.0 and later
  2628. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2629. }
  2630. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2631. procedure FrameArc(const (*var*) r: Rect; startAngle: SInt16; arcAngle: SInt16); external name '_FrameArc';
  2632. {
  2633. * PaintArc() *** DEPRECATED ***
  2634. *
  2635. * Mac OS X threading:
  2636. * Not thread safe
  2637. *
  2638. * Availability:
  2639. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2640. * CarbonLib: in CarbonLib 1.0 and later
  2641. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2642. }
  2643. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2644. procedure PaintArc(const (*var*) r: Rect; startAngle: SInt16; arcAngle: SInt16); external name '_PaintArc';
  2645. {
  2646. * EraseArc() *** DEPRECATED ***
  2647. *
  2648. * Mac OS X threading:
  2649. * Not thread safe
  2650. *
  2651. * Availability:
  2652. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2653. * CarbonLib: in CarbonLib 1.0 and later
  2654. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2655. }
  2656. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2657. procedure EraseArc(const (*var*) r: Rect; startAngle: SInt16; arcAngle: SInt16); external name '_EraseArc';
  2658. {
  2659. * InvertArc() *** DEPRECATED ***
  2660. *
  2661. * Mac OS X threading:
  2662. * Not thread safe
  2663. *
  2664. * Availability:
  2665. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2666. * CarbonLib: in CarbonLib 1.0 and later
  2667. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2668. }
  2669. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2670. procedure InvertArc(const (*var*) r: Rect; startAngle: SInt16; arcAngle: SInt16); external name '_InvertArc';
  2671. {
  2672. * FillArc() *** DEPRECATED ***
  2673. *
  2674. * Mac OS X threading:
  2675. * Not thread safe
  2676. *
  2677. * Availability:
  2678. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2679. * CarbonLib: in CarbonLib 1.0 and later
  2680. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2681. }
  2682. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2683. procedure FillArc(const (*var*) r: Rect; startAngle: SInt16; arcAngle: SInt16; const (*var*) pat: Pattern); external name '_FillArc';
  2684. {
  2685. * NewRgn() *** DEPRECATED ***
  2686. *
  2687. * Mac OS X threading:
  2688. * Not thread safe
  2689. *
  2690. * Availability:
  2691. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2692. * CarbonLib: in CarbonLib 1.0 and later
  2693. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2694. }
  2695. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2696. function NewRgn: RgnHandle; external name '_NewRgn';
  2697. {
  2698. * OpenRgn() *** DEPRECATED ***
  2699. *
  2700. * Mac OS X threading:
  2701. * Not thread safe
  2702. *
  2703. * Availability:
  2704. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2705. * CarbonLib: in CarbonLib 1.0 and later
  2706. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2707. }
  2708. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2709. procedure OpenRgn; external name '_OpenRgn';
  2710. {
  2711. * CloseRgn() *** DEPRECATED ***
  2712. *
  2713. * Mac OS X threading:
  2714. * Not thread safe
  2715. *
  2716. * Availability:
  2717. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2718. * CarbonLib: in CarbonLib 1.0 and later
  2719. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2720. }
  2721. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2722. procedure CloseRgn(dstRgn: RgnHandle); external name '_CloseRgn';
  2723. {
  2724. * BitMapToRegion() *** DEPRECATED ***
  2725. *
  2726. * Mac OS X threading:
  2727. * Not thread safe
  2728. *
  2729. * Availability:
  2730. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2731. * CarbonLib: in CarbonLib 1.0 and later
  2732. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2733. }
  2734. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2735. function BitMapToRegion(region: RgnHandle; const (*var*) bMap: BitMap): OSErr; external name '_BitMapToRegion';
  2736. {
  2737. * RgnToHandle()
  2738. *
  2739. * Summary:
  2740. * Allows to "flatten" the opaque region data, for persistent
  2741. * storage. HandleToRgn is the reciprocal call.
  2742. *
  2743. * Discussion:
  2744. * These calls were introduced to facilitate Carbonization of
  2745. * applications, that relied on the undocumented format of region
  2746. * data. Since the internal (opaque) region format changed in 10.3,
  2747. * the purpose of these functions became questionable at best. They
  2748. * should be considered deprecated. Applications that need to
  2749. * preserve region data within their documents should convert the
  2750. * regions to a sequence of rectangles, using QDRegionToRects. The
  2751. * original region can then be rebuilt using RectRgn() and
  2752. * UnionRgn() calls.
  2753. *
  2754. * Mac OS X threading:
  2755. * Not thread safe
  2756. *
  2757. * Parameters:
  2758. *
  2759. * region:
  2760. * The input RgnHandle
  2761. *
  2762. * flattenedRgnDataHdl:
  2763. * A valid Handle that gets resized and filled with the region
  2764. * data.
  2765. *
  2766. * Availability:
  2767. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  2768. * CarbonLib: in CarbonLib 1.3 and later
  2769. * Non-Carbon CFM: not available
  2770. }
  2771. //AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER;
  2772. procedure RgnToHandle(region: RgnHandle; flattenedRgnDataHdl: Handle); external name '_RgnToHandle';
  2773. {
  2774. * HandleToRgn() *** DEPRECATED ***
  2775. *
  2776. * Mac OS X threading:
  2777. * Not thread safe
  2778. *
  2779. * Availability:
  2780. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2781. * CarbonLib: in CarbonLib 1.1 and later
  2782. * Non-Carbon CFM: not available
  2783. }
  2784. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2785. procedure HandleToRgn(oldRegion: Handle; region: RgnHandle); external name '_HandleToRgn';
  2786. {
  2787. * DisposeRgn() *** DEPRECATED ***
  2788. *
  2789. * Mac OS X threading:
  2790. * Not thread safe
  2791. *
  2792. * Availability:
  2793. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2794. * CarbonLib: in CarbonLib 1.0 and later
  2795. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2796. }
  2797. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2798. procedure DisposeRgn(rgn: RgnHandle); external name '_DisposeRgn';
  2799. {
  2800. * [Mac]CopyRgn() *** DEPRECATED ***
  2801. *
  2802. * Mac OS X threading:
  2803. * Not thread safe
  2804. *
  2805. * Availability:
  2806. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2807. * CarbonLib: in CarbonLib 1.0 and later
  2808. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2809. }
  2810. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2811. procedure CopyRgn(srcRgn: RgnHandle; dstRgn: RgnHandle); external name '_CopyRgn';
  2812. {
  2813. * SetEmptyRgn() *** DEPRECATED ***
  2814. *
  2815. * Mac OS X threading:
  2816. * Not thread safe
  2817. *
  2818. * Availability:
  2819. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2820. * CarbonLib: in CarbonLib 1.0 and later
  2821. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2822. }
  2823. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2824. procedure SetEmptyRgn(rgn: RgnHandle); external name '_SetEmptyRgn';
  2825. {
  2826. * [Mac]SetRectRgn() *** DEPRECATED ***
  2827. *
  2828. * Mac OS X threading:
  2829. * Not thread safe
  2830. *
  2831. * Availability:
  2832. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2833. * CarbonLib: in CarbonLib 1.0 and later
  2834. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2835. }
  2836. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2837. procedure SetRectRgn(rgn: RgnHandle; left: SInt16; top: SInt16; right: SInt16; bottom: SInt16); external name '_SetRectRgn';
  2838. {
  2839. * RectRgn() *** DEPRECATED ***
  2840. *
  2841. * Mac OS X threading:
  2842. * Not thread safe
  2843. *
  2844. * Availability:
  2845. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2846. * CarbonLib: in CarbonLib 1.0 and later
  2847. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2848. }
  2849. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2850. procedure RectRgn(rgn: RgnHandle; const (*var*) r: Rect); external name '_RectRgn';
  2851. {
  2852. * [Mac]OffsetRgn() *** DEPRECATED ***
  2853. *
  2854. * Mac OS X threading:
  2855. * Not thread safe
  2856. *
  2857. * Availability:
  2858. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2859. * CarbonLib: in CarbonLib 1.0 and later
  2860. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2861. }
  2862. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2863. procedure OffsetRgn(rgn: RgnHandle; dh: SInt16; dv: SInt16); external name '_OffsetRgn';
  2864. {
  2865. * InsetRgn() *** DEPRECATED ***
  2866. *
  2867. * Mac OS X threading:
  2868. * Not thread safe
  2869. *
  2870. * Availability:
  2871. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2872. * CarbonLib: in CarbonLib 1.0 and later
  2873. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2874. }
  2875. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2876. procedure InsetRgn(rgn: RgnHandle; dh: SInt16; dv: SInt16); external name '_InsetRgn';
  2877. {
  2878. * SectRgn() *** DEPRECATED ***
  2879. *
  2880. * Mac OS X threading:
  2881. * Not thread safe
  2882. *
  2883. * Availability:
  2884. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2885. * CarbonLib: in CarbonLib 1.0 and later
  2886. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2887. }
  2888. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2889. procedure SectRgn(srcRgnA: RgnHandle; srcRgnB: RgnHandle; dstRgn: RgnHandle); external name '_SectRgn';
  2890. {
  2891. * [Mac]UnionRgn() *** DEPRECATED ***
  2892. *
  2893. * Mac OS X threading:
  2894. * Not thread safe
  2895. *
  2896. * Availability:
  2897. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2898. * CarbonLib: in CarbonLib 1.0 and later
  2899. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2900. }
  2901. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2902. procedure UnionRgn(srcRgnA: RgnHandle; srcRgnB: RgnHandle; dstRgn: RgnHandle); external name '_UnionRgn';
  2903. {
  2904. * DiffRgn() *** DEPRECATED ***
  2905. *
  2906. * Mac OS X threading:
  2907. * Not thread safe
  2908. *
  2909. * Availability:
  2910. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2911. * CarbonLib: in CarbonLib 1.0 and later
  2912. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2913. }
  2914. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2915. procedure DiffRgn(srcRgnA: RgnHandle; srcRgnB: RgnHandle; dstRgn: RgnHandle); external name '_DiffRgn';
  2916. {
  2917. * [Mac]XorRgn() *** DEPRECATED ***
  2918. *
  2919. * Mac OS X threading:
  2920. * Not thread safe
  2921. *
  2922. * Availability:
  2923. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2924. * CarbonLib: in CarbonLib 1.0 and later
  2925. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2926. }
  2927. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2928. procedure XorRgn(srcRgnA: RgnHandle; srcRgnB: RgnHandle; dstRgn: RgnHandle); external name '_XorRgn';
  2929. {
  2930. * RectInRgn() *** DEPRECATED ***
  2931. *
  2932. * Mac OS X threading:
  2933. * Not thread safe
  2934. *
  2935. * Availability:
  2936. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2937. * CarbonLib: in CarbonLib 1.0 and later
  2938. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2939. }
  2940. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2941. function RectInRgn(const (*var*) r: Rect; rgn: RgnHandle): boolean; external name '_RectInRgn';
  2942. {
  2943. * [Mac]EqualRgn() *** DEPRECATED ***
  2944. *
  2945. * Mac OS X threading:
  2946. * Not thread safe
  2947. *
  2948. * Availability:
  2949. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2950. * CarbonLib: in CarbonLib 1.0 and later
  2951. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2952. }
  2953. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2954. function EqualRgn(rgnA: RgnHandle; rgnB: RgnHandle): boolean; external name '_EqualRgn';
  2955. {
  2956. * EmptyRgn() *** DEPRECATED ***
  2957. *
  2958. * Mac OS X threading:
  2959. * Not thread safe
  2960. *
  2961. * Availability:
  2962. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2963. * CarbonLib: in CarbonLib 1.0 and later
  2964. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2965. }
  2966. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2967. function EmptyRgn(rgn: RgnHandle): boolean; external name '_EmptyRgn';
  2968. {
  2969. * [Mac]FrameRgn() *** DEPRECATED ***
  2970. *
  2971. * Mac OS X threading:
  2972. * Not thread safe
  2973. *
  2974. * Availability:
  2975. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2976. * CarbonLib: in CarbonLib 1.0 and later
  2977. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2978. }
  2979. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2980. procedure FrameRgn(rgn: RgnHandle); external name '_FrameRgn';
  2981. {
  2982. * [Mac]PaintRgn() *** DEPRECATED ***
  2983. *
  2984. * Mac OS X threading:
  2985. * Not thread safe
  2986. *
  2987. * Availability:
  2988. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  2989. * CarbonLib: in CarbonLib 1.0 and later
  2990. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  2991. }
  2992. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  2993. procedure PaintRgn(rgn: RgnHandle); external name '_PaintRgn';
  2994. {
  2995. * EraseRgn() *** DEPRECATED ***
  2996. *
  2997. * Mac OS X threading:
  2998. * Not thread safe
  2999. *
  3000. * Availability:
  3001. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3002. * CarbonLib: in CarbonLib 1.0 and later
  3003. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3004. }
  3005. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3006. procedure EraseRgn(rgn: RgnHandle); external name '_EraseRgn';
  3007. {
  3008. * [Mac]InvertRgn() *** DEPRECATED ***
  3009. *
  3010. * Mac OS X threading:
  3011. * Not thread safe
  3012. *
  3013. * Availability:
  3014. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3015. * CarbonLib: in CarbonLib 1.0 and later
  3016. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3017. }
  3018. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3019. procedure InvertRgn(rgn: RgnHandle); external name '_InvertRgn';
  3020. {
  3021. * [Mac]FillRgn() *** DEPRECATED ***
  3022. *
  3023. * Mac OS X threading:
  3024. * Not thread safe
  3025. *
  3026. * Availability:
  3027. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3028. * CarbonLib: in CarbonLib 1.0 and later
  3029. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3030. }
  3031. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3032. procedure FillRgn(rgn: RgnHandle; const (*var*) pat: Pattern); external name '_FillRgn';
  3033. {
  3034. * ScrollRect() *** DEPRECATED ***
  3035. *
  3036. * Mac OS X threading:
  3037. * Not thread safe
  3038. *
  3039. * Availability:
  3040. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3041. * CarbonLib: in CarbonLib 1.0 and later
  3042. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3043. }
  3044. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3045. procedure ScrollRect(const (*var*) r: Rect; dh: SInt16; dv: SInt16; updateRgn: RgnHandle); external name '_ScrollRect';
  3046. {
  3047. * CopyBits() *** DEPRECATED ***
  3048. *
  3049. * Mac OS X threading:
  3050. * Not thread safe
  3051. *
  3052. * Availability:
  3053. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3054. * CarbonLib: in CarbonLib 1.0 and later
  3055. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3056. }
  3057. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3058. procedure CopyBits(const (*var*) srcBits: BitMap; const (*var*) dstBits: BitMap; const (*var*) srcRect: Rect; const (*var*) dstRect: Rect; mode: SInt16; maskRgn: RgnHandle); external name '_CopyBits';
  3059. {
  3060. * SeedFill() *** DEPRECATED ***
  3061. *
  3062. * Mac OS X threading:
  3063. * Not thread safe
  3064. *
  3065. * Availability:
  3066. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3067. * CarbonLib: in CarbonLib 1.0 and later
  3068. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3069. }
  3070. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3071. procedure SeedFill(srcPtr: UnivPtr; dstPtr: UnivPtr; srcRow: SInt16; dstRow: SInt16; height: SInt16; words: SInt16; seedH: SInt16; seedV: SInt16); external name '_SeedFill';
  3072. {
  3073. * CalcMask() *** DEPRECATED ***
  3074. *
  3075. * Mac OS X threading:
  3076. * Not thread safe
  3077. *
  3078. * Availability:
  3079. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3080. * CarbonLib: in CarbonLib 1.0 and later
  3081. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3082. }
  3083. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3084. procedure CalcMask(srcPtr: UnivPtr; dstPtr: UnivPtr; srcRow: SInt16; dstRow: SInt16; height: SInt16; words: SInt16); external name '_CalcMask';
  3085. {
  3086. * CopyMask() *** DEPRECATED ***
  3087. *
  3088. * Mac OS X threading:
  3089. * Not thread safe
  3090. *
  3091. * Availability:
  3092. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3093. * CarbonLib: in CarbonLib 1.0 and later
  3094. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3095. }
  3096. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3097. procedure CopyMask(const (*var*) srcBits: BitMap; const (*var*) maskBits: BitMap; const (*var*) dstBits: BitMap; const (*var*) srcRect: Rect; const (*var*) maskRect: Rect; const (*var*) dstRect: Rect); external name '_CopyMask';
  3098. {
  3099. * OpenPicture() *** DEPRECATED ***
  3100. *
  3101. * Mac OS X threading:
  3102. * Not thread safe
  3103. *
  3104. * Availability:
  3105. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3106. * CarbonLib: in CarbonLib 1.0 and later
  3107. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3108. }
  3109. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3110. function OpenPicture(const (*var*) picFrame: Rect): PicHandle; external name '_OpenPicture';
  3111. {
  3112. * PicComment() *** DEPRECATED ***
  3113. *
  3114. * Mac OS X threading:
  3115. * Not thread safe
  3116. *
  3117. * Availability:
  3118. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3119. * CarbonLib: in CarbonLib 1.0 and later
  3120. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3121. }
  3122. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3123. procedure PicComment(kind: SInt16; dataSize: SInt16; dataHandle: Handle); external name '_PicComment';
  3124. {
  3125. * ClosePicture() *** DEPRECATED ***
  3126. *
  3127. * Mac OS X threading:
  3128. * Not thread safe
  3129. *
  3130. * Availability:
  3131. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3132. * CarbonLib: in CarbonLib 1.0 and later
  3133. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3134. }
  3135. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3136. procedure ClosePicture; external name '_ClosePicture';
  3137. {
  3138. * QDGetPictureBounds()
  3139. *
  3140. * Mac OS X threading:
  3141. * Not thread safe
  3142. *
  3143. * Availability:
  3144. * Mac OS X: in version 10.3 and later in ApplicationServices.framework
  3145. * CarbonLib: not available
  3146. * Non-Carbon CFM: not available
  3147. }
  3148. //AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER;
  3149. function QDGetPictureBounds( picH: PicHandle; var outRect: Rect ): RectPtr; external name '_QDGetPictureBounds'; (* attribute ignoreable *)
  3150. {
  3151. * DrawPicture() *** DEPRECATED ***
  3152. *
  3153. * Mac OS X threading:
  3154. * Not thread safe
  3155. *
  3156. * Availability:
  3157. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3158. * CarbonLib: in CarbonLib 1.0 and later
  3159. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3160. }
  3161. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3162. procedure DrawPicture(myPicture: PicHandle; const (*var*) dstRect: Rect); external name '_DrawPicture';
  3163. {
  3164. * KillPicture() *** DEPRECATED ***
  3165. *
  3166. * Mac OS X threading:
  3167. * Not thread safe
  3168. *
  3169. * Availability:
  3170. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3171. * CarbonLib: in CarbonLib 1.0 and later
  3172. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3173. }
  3174. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3175. procedure KillPicture(myPicture: PicHandle); external name '_KillPicture';
  3176. {
  3177. * OpenPoly() *** DEPRECATED ***
  3178. *
  3179. * Mac OS X threading:
  3180. * Not thread safe
  3181. *
  3182. * Availability:
  3183. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3184. * CarbonLib: in CarbonLib 1.0 and later
  3185. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3186. }
  3187. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3188. function OpenPoly: PolyHandle; external name '_OpenPoly';
  3189. {
  3190. * ClosePoly() *** DEPRECATED ***
  3191. *
  3192. * Mac OS X threading:
  3193. * Not thread safe
  3194. *
  3195. * Availability:
  3196. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3197. * CarbonLib: in CarbonLib 1.0 and later
  3198. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3199. }
  3200. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3201. procedure ClosePoly; external name '_ClosePoly';
  3202. {
  3203. * KillPoly() *** DEPRECATED ***
  3204. *
  3205. * Mac OS X threading:
  3206. * Not thread safe
  3207. *
  3208. * Availability:
  3209. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3210. * CarbonLib: in CarbonLib 1.0 and later
  3211. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3212. }
  3213. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3214. procedure KillPoly(poly: PolyHandle); external name '_KillPoly';
  3215. {
  3216. * OffsetPoly() *** DEPRECATED ***
  3217. *
  3218. * Mac OS X threading:
  3219. * Not thread safe
  3220. *
  3221. * Availability:
  3222. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3223. * CarbonLib: in CarbonLib 1.0 and later
  3224. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3225. }
  3226. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3227. procedure OffsetPoly(poly: PolyHandle; dh: SInt16; dv: SInt16); external name '_OffsetPoly';
  3228. {
  3229. * FramePoly() *** DEPRECATED ***
  3230. *
  3231. * Mac OS X threading:
  3232. * Not thread safe
  3233. *
  3234. * Availability:
  3235. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3236. * CarbonLib: in CarbonLib 1.0 and later
  3237. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3238. }
  3239. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3240. procedure FramePoly(poly: PolyHandle); external name '_FramePoly';
  3241. {
  3242. * PaintPoly() *** DEPRECATED ***
  3243. *
  3244. * Mac OS X threading:
  3245. * Not thread safe
  3246. *
  3247. * Availability:
  3248. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3249. * CarbonLib: in CarbonLib 1.0 and later
  3250. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3251. }
  3252. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3253. procedure PaintPoly(poly: PolyHandle); external name '_PaintPoly';
  3254. {
  3255. * ErasePoly() *** DEPRECATED ***
  3256. *
  3257. * Mac OS X threading:
  3258. * Not thread safe
  3259. *
  3260. * Availability:
  3261. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3262. * CarbonLib: in CarbonLib 1.0 and later
  3263. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3264. }
  3265. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3266. procedure ErasePoly(poly: PolyHandle); external name '_ErasePoly';
  3267. {
  3268. * InvertPoly() *** DEPRECATED ***
  3269. *
  3270. * Mac OS X threading:
  3271. * Not thread safe
  3272. *
  3273. * Availability:
  3274. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3275. * CarbonLib: in CarbonLib 1.0 and later
  3276. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3277. }
  3278. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3279. procedure InvertPoly(poly: PolyHandle); external name '_InvertPoly';
  3280. {
  3281. * FillPoly() *** DEPRECATED ***
  3282. *
  3283. * Mac OS X threading:
  3284. * Not thread safe
  3285. *
  3286. * Availability:
  3287. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3288. * CarbonLib: in CarbonLib 1.0 and later
  3289. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3290. }
  3291. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3292. procedure FillPoly(poly: PolyHandle; const (*var*) pat: Pattern); external name '_FillPoly';
  3293. {
  3294. * SetPt() *** DEPRECATED ***
  3295. *
  3296. * Mac OS X threading:
  3297. * Not thread safe
  3298. *
  3299. * Availability:
  3300. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3301. * CarbonLib: in CarbonLib 1.0 and later
  3302. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3303. }
  3304. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3305. procedure SetPt(var pt: Point; h: SInt16; v: SInt16); external name '_SetPt';
  3306. {
  3307. * LocalToGlobal() *** DEPRECATED ***
  3308. *
  3309. * Mac OS X threading:
  3310. * Not thread safe
  3311. *
  3312. * Availability:
  3313. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3314. * CarbonLib: in CarbonLib 1.0 and later
  3315. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3316. }
  3317. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3318. procedure LocalToGlobal(var pt: Point); external name '_LocalToGlobal';
  3319. {
  3320. * GlobalToLocal() *** DEPRECATED ***
  3321. *
  3322. * Mac OS X threading:
  3323. * Not thread safe
  3324. *
  3325. * Availability:
  3326. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3327. * CarbonLib: in CarbonLib 1.0 and later
  3328. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3329. }
  3330. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3331. procedure GlobalToLocal(var pt: Point); external name '_GlobalToLocal';
  3332. {
  3333. * Random() *** DEPRECATED ***
  3334. *
  3335. * Mac OS X threading:
  3336. * Not thread safe
  3337. *
  3338. * Availability:
  3339. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3340. * CarbonLib: in CarbonLib 1.0 and later
  3341. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3342. }
  3343. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3344. function Random: SInt16; external name '_Random';
  3345. {
  3346. * StuffHex() *** DEPRECATED ***
  3347. *
  3348. * Mac OS X threading:
  3349. * Not thread safe
  3350. *
  3351. * Availability:
  3352. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3353. * CarbonLib: in CarbonLib 1.0 and later
  3354. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3355. }
  3356. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3357. procedure StuffHex(thingPtr: UnivPtr; const (*var*) s: Str255); external name '_StuffHex';
  3358. {
  3359. * [Mac]GetPixel() *** DEPRECATED ***
  3360. *
  3361. * Mac OS X threading:
  3362. * Not thread safe
  3363. *
  3364. * Availability:
  3365. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3366. * CarbonLib: in CarbonLib 1.0 and later
  3367. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3368. }
  3369. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3370. function GetPixel(h: SInt16; v: SInt16): boolean; external name '_GetPixel';
  3371. {
  3372. * ScalePt() *** DEPRECATED ***
  3373. *
  3374. * Mac OS X threading:
  3375. * Not thread safe
  3376. *
  3377. * Availability:
  3378. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3379. * CarbonLib: in CarbonLib 1.0 and later
  3380. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3381. }
  3382. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3383. procedure ScalePt(var pt: Point; const (*var*) srcRect: Rect; const (*var*) dstRect: Rect); external name '_ScalePt';
  3384. {
  3385. * MapPt() *** DEPRECATED ***
  3386. *
  3387. * Mac OS X threading:
  3388. * Not thread safe
  3389. *
  3390. * Availability:
  3391. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3392. * CarbonLib: in CarbonLib 1.0 and later
  3393. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3394. }
  3395. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3396. procedure MapPt(var pt: Point; const (*var*) srcRect: Rect; const (*var*) dstRect: Rect); external name '_MapPt';
  3397. {
  3398. * MapRect() *** DEPRECATED ***
  3399. *
  3400. * Mac OS X threading:
  3401. * Not thread safe
  3402. *
  3403. * Availability:
  3404. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3405. * CarbonLib: in CarbonLib 1.0 and later
  3406. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3407. }
  3408. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3409. procedure MapRect(var r: Rect; const (*var*) srcRect: Rect; const (*var*) dstRect: Rect); external name '_MapRect';
  3410. {
  3411. * MapRgn() *** DEPRECATED ***
  3412. *
  3413. * Mac OS X threading:
  3414. * Not thread safe
  3415. *
  3416. * Availability:
  3417. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3418. * CarbonLib: in CarbonLib 1.0 and later
  3419. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3420. }
  3421. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3422. procedure MapRgn(rgn: RgnHandle; const (*var*) srcRect: Rect; const (*var*) dstRect: Rect); external name '_MapRgn';
  3423. {
  3424. * MapPoly() *** DEPRECATED ***
  3425. *
  3426. * Mac OS X threading:
  3427. * Not thread safe
  3428. *
  3429. * Availability:
  3430. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3431. * CarbonLib: in CarbonLib 1.0 and later
  3432. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3433. }
  3434. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3435. procedure MapPoly(poly: PolyHandle; const (*var*) srcRect: Rect; const (*var*) dstRect: Rect); external name '_MapPoly';
  3436. {
  3437. * SetStdProcs() *** DEPRECATED ***
  3438. *
  3439. * Mac OS X threading:
  3440. * Not thread safe
  3441. *
  3442. * Availability:
  3443. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3444. * CarbonLib: in CarbonLib 1.0 and later
  3445. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3446. }
  3447. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3448. procedure SetStdProcs(var procs: QDProcs); external name '_SetStdProcs';
  3449. {
  3450. * StdRect() *** DEPRECATED ***
  3451. *
  3452. * Mac OS X threading:
  3453. * Not thread safe
  3454. *
  3455. * Availability:
  3456. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3457. * CarbonLib: in CarbonLib 1.0 and later
  3458. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3459. }
  3460. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3461. procedure StdRect(verb: GrafVerb; const (*var*) r: Rect); external name '_StdRect';
  3462. {
  3463. * StdRRect() *** DEPRECATED ***
  3464. *
  3465. * Mac OS X threading:
  3466. * Not thread safe
  3467. *
  3468. * Availability:
  3469. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3470. * CarbonLib: in CarbonLib 1.0 and later
  3471. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3472. }
  3473. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3474. procedure StdRRect(verb: GrafVerb; const (*var*) r: Rect; ovalWidth: SInt16; ovalHeight: SInt16); external name '_StdRRect';
  3475. {
  3476. * StdOval() *** DEPRECATED ***
  3477. *
  3478. * Mac OS X threading:
  3479. * Not thread safe
  3480. *
  3481. * Availability:
  3482. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3483. * CarbonLib: in CarbonLib 1.0 and later
  3484. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3485. }
  3486. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3487. procedure StdOval(verb: GrafVerb; const (*var*) r: Rect); external name '_StdOval';
  3488. {
  3489. * StdArc() *** DEPRECATED ***
  3490. *
  3491. * Mac OS X threading:
  3492. * Not thread safe
  3493. *
  3494. * Availability:
  3495. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3496. * CarbonLib: in CarbonLib 1.0 and later
  3497. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3498. }
  3499. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3500. procedure StdArc(verb: GrafVerb; const (*var*) r: Rect; startAngle: SInt16; arcAngle: SInt16); external name '_StdArc';
  3501. {
  3502. * StdPoly() *** DEPRECATED ***
  3503. *
  3504. * Mac OS X threading:
  3505. * Not thread safe
  3506. *
  3507. * Availability:
  3508. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3509. * CarbonLib: in CarbonLib 1.0 and later
  3510. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3511. }
  3512. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3513. procedure StdPoly(verb: GrafVerb; poly: PolyHandle); external name '_StdPoly';
  3514. {
  3515. * StdRgn() *** DEPRECATED ***
  3516. *
  3517. * Mac OS X threading:
  3518. * Not thread safe
  3519. *
  3520. * Availability:
  3521. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3522. * CarbonLib: in CarbonLib 1.0 and later
  3523. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3524. }
  3525. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3526. procedure StdRgn(verb: GrafVerb; rgn: RgnHandle); external name '_StdRgn';
  3527. {
  3528. * StdBits() *** DEPRECATED ***
  3529. *
  3530. * Mac OS X threading:
  3531. * Not thread safe
  3532. *
  3533. * Availability:
  3534. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3535. * CarbonLib: in CarbonLib 1.0 and later
  3536. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3537. }
  3538. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3539. procedure StdBits(const (*var*) srcBits: BitMap; const (*var*) srcRect: Rect; const (*var*) dstRect: Rect; mode: SInt16; maskRgn: RgnHandle); external name '_StdBits';
  3540. {
  3541. * StdComment() *** DEPRECATED ***
  3542. *
  3543. * Mac OS X threading:
  3544. * Not thread safe
  3545. *
  3546. * Availability:
  3547. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3548. * CarbonLib: in CarbonLib 1.0 and later
  3549. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3550. }
  3551. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3552. procedure StdComment(kind: SInt16; dataSize: SInt16; dataHandle: Handle); external name '_StdComment';
  3553. {
  3554. * StdGetPic() *** DEPRECATED ***
  3555. *
  3556. * Mac OS X threading:
  3557. * Not thread safe
  3558. *
  3559. * Availability:
  3560. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3561. * CarbonLib: in CarbonLib 1.0 and later
  3562. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3563. }
  3564. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3565. procedure StdGetPic(dataPtr: UnivPtr; byteCount: SInt16); external name '_StdGetPic';
  3566. {
  3567. * StdPutPic() *** DEPRECATED ***
  3568. *
  3569. * Mac OS X threading:
  3570. * Not thread safe
  3571. *
  3572. * Availability:
  3573. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3574. * CarbonLib: in CarbonLib 1.0 and later
  3575. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3576. }
  3577. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3578. procedure StdPutPic(dataPtr: UnivPtr; byteCount: SInt16); external name '_StdPutPic';
  3579. {
  3580. * StdOpcode() *** DEPRECATED ***
  3581. *
  3582. * Mac OS X threading:
  3583. * Not thread safe
  3584. *
  3585. * Availability:
  3586. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3587. * CarbonLib: in CarbonLib 1.0 and later
  3588. * Non-Carbon CFM: not available
  3589. }
  3590. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3591. procedure StdOpcode(const (*var*) fromRect: Rect; const (*var*) toRect: Rect; opcode: UInt16; version: SInt16); external name '_StdOpcode';
  3592. {
  3593. * AddPt() *** DEPRECATED ***
  3594. *
  3595. * Mac OS X threading:
  3596. * Not thread safe
  3597. *
  3598. * Availability:
  3599. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3600. * CarbonLib: in CarbonLib 1.0 and later
  3601. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3602. }
  3603. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3604. procedure AddPt(src: Point; var dst: Point); external name '_AddPt';
  3605. {
  3606. * EqualPt() *** DEPRECATED ***
  3607. *
  3608. * Mac OS X threading:
  3609. * Not thread safe
  3610. *
  3611. * Availability:
  3612. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3613. * CarbonLib: in CarbonLib 1.0 and later
  3614. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3615. }
  3616. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3617. function EqualPt(pt1: Point; pt2: Point): boolean; external name '_EqualPt';
  3618. {
  3619. * [Mac]PtInRect() *** DEPRECATED ***
  3620. *
  3621. * Mac OS X threading:
  3622. * Not thread safe
  3623. *
  3624. * Availability:
  3625. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3626. * CarbonLib: in CarbonLib 1.0 and later
  3627. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3628. }
  3629. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3630. function PtInRect(pt: Point; const (*var*) r: Rect): boolean; external name '_PtInRect';
  3631. {
  3632. * Pt2Rect() *** DEPRECATED ***
  3633. *
  3634. * Mac OS X threading:
  3635. * Not thread safe
  3636. *
  3637. * Availability:
  3638. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3639. * CarbonLib: in CarbonLib 1.0 and later
  3640. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3641. }
  3642. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3643. procedure Pt2Rect(pt1: Point; pt2: Point; var dstRect: Rect); external name '_Pt2Rect';
  3644. {
  3645. * PtToAngle() *** DEPRECATED ***
  3646. *
  3647. * Mac OS X threading:
  3648. * Not thread safe
  3649. *
  3650. * Availability:
  3651. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3652. * CarbonLib: in CarbonLib 1.0 and later
  3653. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3654. }
  3655. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3656. procedure PtToAngle(const (*var*) r: Rect; pt: Point; var angle: SInt16); external name '_PtToAngle';
  3657. {
  3658. * SubPt() *** DEPRECATED ***
  3659. *
  3660. * Mac OS X threading:
  3661. * Not thread safe
  3662. *
  3663. * Availability:
  3664. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3665. * CarbonLib: in CarbonLib 1.0 and later
  3666. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3667. }
  3668. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3669. procedure SubPt(src: Point; var dst: Point); external name '_SubPt';
  3670. {
  3671. * PtInRgn() *** DEPRECATED ***
  3672. *
  3673. * Mac OS X threading:
  3674. * Not thread safe
  3675. *
  3676. * Availability:
  3677. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3678. * CarbonLib: in CarbonLib 1.0 and later
  3679. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3680. }
  3681. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3682. function PtInRgn(pt: Point; rgn: RgnHandle): boolean; external name '_PtInRgn';
  3683. {
  3684. * StdLine() *** DEPRECATED ***
  3685. *
  3686. * Mac OS X threading:
  3687. * Not thread safe
  3688. *
  3689. * Availability:
  3690. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3691. * CarbonLib: in CarbonLib 1.0 and later
  3692. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3693. }
  3694. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3695. procedure StdLine(newPt: Point); external name '_StdLine';
  3696. {$ifc CALL_NOT_IN_CARBON}
  3697. {
  3698. * OpenCPort()
  3699. *
  3700. * Availability:
  3701. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3702. * CarbonLib: not available
  3703. * Mac OS X: not available
  3704. }
  3705. procedure OpenCPort(port: CGrafPtr); external name '_OpenCPort';
  3706. {
  3707. * InitCPort()
  3708. *
  3709. * Availability:
  3710. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3711. * CarbonLib: not available
  3712. * Mac OS X: not available
  3713. }
  3714. procedure InitCPort(port: CGrafPtr); external name '_InitCPort';
  3715. {
  3716. * CloseCPort()
  3717. *
  3718. * Availability:
  3719. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3720. * CarbonLib: not available
  3721. * Mac OS X: not available
  3722. }
  3723. procedure CloseCPort(port: CGrafPtr); external name '_CloseCPort';
  3724. {$endc} {CALL_NOT_IN_CARBON}
  3725. {
  3726. * NewPixMap() *** DEPRECATED ***
  3727. *
  3728. * Mac OS X threading:
  3729. * Not thread safe
  3730. *
  3731. * Availability:
  3732. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3733. * CarbonLib: in CarbonLib 1.0 and later
  3734. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3735. }
  3736. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3737. function NewPixMap: PixMapHandle; external name '_NewPixMap';
  3738. {
  3739. * DisposePixMap() *** DEPRECATED ***
  3740. *
  3741. * Mac OS X threading:
  3742. * Not thread safe
  3743. *
  3744. * Availability:
  3745. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3746. * CarbonLib: in CarbonLib 1.0 and later
  3747. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3748. }
  3749. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3750. procedure DisposePixMap(pm: PixMapHandle); external name '_DisposePixMap';
  3751. {
  3752. * CopyPixMap() *** DEPRECATED ***
  3753. *
  3754. * Mac OS X threading:
  3755. * Not thread safe
  3756. *
  3757. * Availability:
  3758. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3759. * CarbonLib: in CarbonLib 1.0 and later
  3760. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3761. }
  3762. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3763. procedure CopyPixMap(srcPM: PixMapHandle; dstPM: PixMapHandle); external name '_CopyPixMap';
  3764. {
  3765. * NewPixPat() *** DEPRECATED ***
  3766. *
  3767. * Mac OS X threading:
  3768. * Not thread safe
  3769. *
  3770. * Availability:
  3771. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3772. * CarbonLib: in CarbonLib 1.0 and later
  3773. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3774. }
  3775. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3776. function NewPixPat: PixPatHandle; external name '_NewPixPat';
  3777. {
  3778. * DisposePixPat() *** DEPRECATED ***
  3779. *
  3780. * Mac OS X threading:
  3781. * Not thread safe
  3782. *
  3783. * Availability:
  3784. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3785. * CarbonLib: in CarbonLib 1.0 and later
  3786. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3787. }
  3788. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3789. procedure DisposePixPat(pp: PixPatHandle); external name '_DisposePixPat';
  3790. {
  3791. * CopyPixPat() *** DEPRECATED ***
  3792. *
  3793. * Mac OS X threading:
  3794. * Not thread safe
  3795. *
  3796. * Availability:
  3797. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3798. * CarbonLib: in CarbonLib 1.0 and later
  3799. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3800. }
  3801. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3802. procedure CopyPixPat(srcPP: PixPatHandle; dstPP: PixPatHandle); external name '_CopyPixPat';
  3803. {
  3804. * PenPixPat() *** DEPRECATED ***
  3805. *
  3806. * Mac OS X threading:
  3807. * Not thread safe
  3808. *
  3809. * Availability:
  3810. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3811. * CarbonLib: in CarbonLib 1.0 and later
  3812. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3813. }
  3814. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3815. procedure PenPixPat(pp: PixPatHandle); external name '_PenPixPat';
  3816. {
  3817. * BackPixPat() *** DEPRECATED ***
  3818. *
  3819. * Mac OS X threading:
  3820. * Not thread safe
  3821. *
  3822. * Availability:
  3823. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3824. * CarbonLib: in CarbonLib 1.0 and later
  3825. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3826. }
  3827. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3828. procedure BackPixPat(pp: PixPatHandle); external name '_BackPixPat';
  3829. {
  3830. * GetPixPat() *** DEPRECATED ***
  3831. *
  3832. * Mac OS X threading:
  3833. * Not thread safe
  3834. *
  3835. * Availability:
  3836. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3837. * CarbonLib: in CarbonLib 1.0 and later
  3838. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3839. }
  3840. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3841. function GetPixPat(patID: SInt16): PixPatHandle; external name '_GetPixPat';
  3842. {
  3843. * MakeRGBPat() *** DEPRECATED ***
  3844. *
  3845. * Mac OS X threading:
  3846. * Not thread safe
  3847. *
  3848. * Availability:
  3849. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3850. * CarbonLib: in CarbonLib 1.0 and later
  3851. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3852. }
  3853. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3854. procedure MakeRGBPat(pp: PixPatHandle; const (*var*) myColor: RGBColor); external name '_MakeRGBPat';
  3855. {
  3856. * FillCRect() *** DEPRECATED ***
  3857. *
  3858. * Mac OS X threading:
  3859. * Not thread safe
  3860. *
  3861. * Availability:
  3862. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3863. * CarbonLib: in CarbonLib 1.0 and later
  3864. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3865. }
  3866. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3867. procedure FillCRect(const (*var*) r: Rect; pp: PixPatHandle); external name '_FillCRect';
  3868. {
  3869. * FillCOval() *** DEPRECATED ***
  3870. *
  3871. * Mac OS X threading:
  3872. * Not thread safe
  3873. *
  3874. * Availability:
  3875. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3876. * CarbonLib: in CarbonLib 1.0 and later
  3877. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3878. }
  3879. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3880. procedure FillCOval(const (*var*) r: Rect; pp: PixPatHandle); external name '_FillCOval';
  3881. {
  3882. * FillCRoundRect() *** DEPRECATED ***
  3883. *
  3884. * Mac OS X threading:
  3885. * Not thread safe
  3886. *
  3887. * Availability:
  3888. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3889. * CarbonLib: in CarbonLib 1.0 and later
  3890. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3891. }
  3892. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3893. procedure FillCRoundRect(const (*var*) r: Rect; ovalWidth: SInt16; ovalHeight: SInt16; pp: PixPatHandle); external name '_FillCRoundRect';
  3894. {
  3895. * FillCArc() *** DEPRECATED ***
  3896. *
  3897. * Mac OS X threading:
  3898. * Not thread safe
  3899. *
  3900. * Availability:
  3901. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3902. * CarbonLib: in CarbonLib 1.0 and later
  3903. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3904. }
  3905. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3906. procedure FillCArc(const (*var*) r: Rect; startAngle: SInt16; arcAngle: SInt16; pp: PixPatHandle); external name '_FillCArc';
  3907. {
  3908. * FillCRgn() *** DEPRECATED ***
  3909. *
  3910. * Mac OS X threading:
  3911. * Not thread safe
  3912. *
  3913. * Availability:
  3914. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3915. * CarbonLib: in CarbonLib 1.0 and later
  3916. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3917. }
  3918. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3919. procedure FillCRgn(rgn: RgnHandle; pp: PixPatHandle); external name '_FillCRgn';
  3920. {
  3921. * FillCPoly() *** DEPRECATED ***
  3922. *
  3923. * Mac OS X threading:
  3924. * Not thread safe
  3925. *
  3926. * Availability:
  3927. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3928. * CarbonLib: in CarbonLib 1.0 and later
  3929. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3930. }
  3931. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3932. procedure FillCPoly(poly: PolyHandle; pp: PixPatHandle); external name '_FillCPoly';
  3933. {
  3934. * RGBForeColor() *** DEPRECATED ***
  3935. *
  3936. * Mac OS X threading:
  3937. * Not thread safe
  3938. *
  3939. * Availability:
  3940. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3941. * CarbonLib: in CarbonLib 1.0 and later
  3942. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3943. }
  3944. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3945. procedure RGBForeColor(const (*var*) color: RGBColor); external name '_RGBForeColor';
  3946. {
  3947. * RGBBackColor() *** DEPRECATED ***
  3948. *
  3949. * Mac OS X threading:
  3950. * Not thread safe
  3951. *
  3952. * Availability:
  3953. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3954. * CarbonLib: in CarbonLib 1.0 and later
  3955. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3956. }
  3957. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3958. procedure RGBBackColor(const (*var*) color: RGBColor); external name '_RGBBackColor';
  3959. {
  3960. * SetCPixel() *** DEPRECATED ***
  3961. *
  3962. * Mac OS X threading:
  3963. * Not thread safe
  3964. *
  3965. * Availability:
  3966. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3967. * CarbonLib: in CarbonLib 1.0 and later
  3968. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3969. }
  3970. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3971. procedure SetCPixel(h: SInt16; v: SInt16; const (*var*) cPix: RGBColor); external name '_SetCPixel';
  3972. {
  3973. * SetPortPix() *** DEPRECATED ***
  3974. *
  3975. * Mac OS X threading:
  3976. * Not thread safe
  3977. *
  3978. * Availability:
  3979. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3980. * CarbonLib: in CarbonLib 1.0 and later
  3981. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3982. }
  3983. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3984. procedure SetPortPix(pm: PixMapHandle); external name '_SetPortPix';
  3985. {
  3986. * GetCPixel() *** DEPRECATED ***
  3987. *
  3988. * Mac OS X threading:
  3989. * Not thread safe
  3990. *
  3991. * Availability:
  3992. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  3993. * CarbonLib: in CarbonLib 1.0 and later
  3994. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  3995. }
  3996. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  3997. procedure GetCPixel(h: SInt16; v: SInt16; var cPix: RGBColor); external name '_GetCPixel';
  3998. {
  3999. * GetForeColor() *** DEPRECATED ***
  4000. *
  4001. * Mac OS X threading:
  4002. * Not thread safe
  4003. *
  4004. * Availability:
  4005. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4006. * CarbonLib: in CarbonLib 1.0 and later
  4007. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4008. }
  4009. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4010. procedure GetForeColor(var color: RGBColor); external name '_GetForeColor';
  4011. {
  4012. * GetBackColor() *** DEPRECATED ***
  4013. *
  4014. * Mac OS X threading:
  4015. * Not thread safe
  4016. *
  4017. * Availability:
  4018. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4019. * CarbonLib: in CarbonLib 1.0 and later
  4020. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4021. }
  4022. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4023. procedure GetBackColor(var color: RGBColor); external name '_GetBackColor';
  4024. {
  4025. * SeedCFill() *** DEPRECATED ***
  4026. *
  4027. * Mac OS X threading:
  4028. * Not thread safe
  4029. *
  4030. * Availability:
  4031. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4032. * CarbonLib: in CarbonLib 1.0 and later
  4033. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4034. }
  4035. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4036. procedure SeedCFill(const (*var*) srcBits: BitMap; const (*var*) dstBits: BitMap; const (*var*) srcRect: Rect; const (*var*) dstRect: Rect; seedH: SInt16; seedV: SInt16; matchProc: ColorSearchUPP; matchData: SInt32); external name '_SeedCFill';
  4037. {
  4038. * CalcCMask() *** DEPRECATED ***
  4039. *
  4040. * Mac OS X threading:
  4041. * Not thread safe
  4042. *
  4043. * Availability:
  4044. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4045. * CarbonLib: in CarbonLib 1.0 and later
  4046. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4047. }
  4048. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4049. procedure CalcCMask(const (*var*) srcBits: BitMap; const (*var*) dstBits: BitMap; const (*var*) srcRect: Rect; const (*var*) dstRect: Rect; const (*var*) seedRGB: RGBColor; matchProc: ColorSearchUPP; matchData: SInt32); external name '_CalcCMask';
  4050. {
  4051. * OpenCPicture() *** DEPRECATED ***
  4052. *
  4053. * Mac OS X threading:
  4054. * Not thread safe
  4055. *
  4056. * Availability:
  4057. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4058. * CarbonLib: in CarbonLib 1.0 and later
  4059. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4060. }
  4061. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4062. function OpenCPicture(const (*var*) newHeader: OpenCPicParams): PicHandle; external name '_OpenCPicture';
  4063. {
  4064. * OpColor() *** DEPRECATED ***
  4065. *
  4066. * Mac OS X threading:
  4067. * Not thread safe
  4068. *
  4069. * Availability:
  4070. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4071. * CarbonLib: in CarbonLib 1.0 and later
  4072. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4073. }
  4074. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4075. procedure OpColor(const (*var*) color: RGBColor); external name '_OpColor';
  4076. {
  4077. * HiliteColor() *** DEPRECATED ***
  4078. *
  4079. * Mac OS X threading:
  4080. * Not thread safe
  4081. *
  4082. * Availability:
  4083. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4084. * CarbonLib: in CarbonLib 1.0 and later
  4085. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4086. }
  4087. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4088. procedure HiliteColor(const (*var*) color: RGBColor); external name '_HiliteColor';
  4089. {
  4090. * DisposeCTable() *** DEPRECATED ***
  4091. *
  4092. * Mac OS X threading:
  4093. * Not thread safe
  4094. *
  4095. * Availability:
  4096. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4097. * CarbonLib: in CarbonLib 1.0 and later
  4098. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4099. }
  4100. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4101. procedure DisposeCTable(cTable: CTabHandle); external name '_DisposeCTable';
  4102. {
  4103. * GetCTable() *** DEPRECATED ***
  4104. *
  4105. * Mac OS X threading:
  4106. * Not thread safe
  4107. *
  4108. * Availability:
  4109. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4110. * CarbonLib: in CarbonLib 1.0 and later
  4111. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4112. }
  4113. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4114. function GetCTable(ctID: SInt16): CTabHandle; external name '_GetCTable';
  4115. {
  4116. * GetCCursor() *** DEPRECATED ***
  4117. *
  4118. * Mac OS X threading:
  4119. * Not thread safe
  4120. *
  4121. * Availability:
  4122. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4123. * CarbonLib: in CarbonLib 1.0 and later
  4124. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4125. }
  4126. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4127. function GetCCursor(crsrID: SInt16): CCrsrHandle; external name '_GetCCursor';
  4128. {
  4129. * SetCCursor() *** DEPRECATED ***
  4130. *
  4131. * Mac OS X threading:
  4132. * Not thread safe
  4133. *
  4134. * Availability:
  4135. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4136. * CarbonLib: in CarbonLib 1.0 and later
  4137. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4138. }
  4139. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4140. procedure SetCCursor(cCrsr: CCrsrHandle); external name '_SetCCursor';
  4141. {
  4142. * AllocCursor() *** DEPRECATED ***
  4143. *
  4144. * Mac OS X threading:
  4145. * Not thread safe
  4146. *
  4147. * Availability:
  4148. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4149. * CarbonLib: in CarbonLib 1.0 and later
  4150. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4151. }
  4152. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4153. procedure AllocCursor; external name '_AllocCursor';
  4154. {
  4155. * DisposeCCursor() *** DEPRECATED ***
  4156. *
  4157. * Mac OS X threading:
  4158. * Not thread safe
  4159. *
  4160. * Availability:
  4161. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4162. * CarbonLib: in CarbonLib 1.0 and later
  4163. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4164. }
  4165. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4166. procedure DisposeCCursor(cCrsr: CCrsrHandle); external name '_DisposeCCursor';
  4167. { GetCIcon(), PlotCIcon(), and DisposeCIcon() moved to Icons.h }
  4168. {
  4169. * SetStdCProcs() *** DEPRECATED ***
  4170. *
  4171. * Mac OS X threading:
  4172. * Not thread safe
  4173. *
  4174. * Availability:
  4175. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4176. * CarbonLib: in CarbonLib 1.0 and later
  4177. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4178. }
  4179. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4180. procedure SetStdCProcs(var procs: CQDProcs); external name '_SetStdCProcs';
  4181. {
  4182. * GetMaxDevice() *** DEPRECATED ***
  4183. *
  4184. * Mac OS X threading:
  4185. * Not thread safe
  4186. *
  4187. * Availability:
  4188. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4189. * CarbonLib: in CarbonLib 1.0 and later
  4190. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4191. }
  4192. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4193. function GetMaxDevice(const (*var*) globalRect: Rect): GDHandle; external name '_GetMaxDevice';
  4194. {
  4195. * GetCTSeed() *** DEPRECATED ***
  4196. *
  4197. * Mac OS X threading:
  4198. * Not thread safe
  4199. *
  4200. * Availability:
  4201. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4202. * CarbonLib: in CarbonLib 1.0 and later
  4203. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4204. }
  4205. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4206. function GetCTSeed: SInt32; external name '_GetCTSeed';
  4207. {
  4208. * GetDeviceList() *** DEPRECATED ***
  4209. *
  4210. * Mac OS X threading:
  4211. * Not thread safe
  4212. *
  4213. * Availability:
  4214. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4215. * CarbonLib: in CarbonLib 1.0 and later
  4216. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4217. }
  4218. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4219. function GetDeviceList: GDHandle; external name '_GetDeviceList';
  4220. {
  4221. * GetMainDevice() *** DEPRECATED ***
  4222. *
  4223. * Mac OS X threading:
  4224. * Not thread safe
  4225. *
  4226. * Availability:
  4227. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4228. * CarbonLib: in CarbonLib 1.0 and later
  4229. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4230. }
  4231. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4232. function GetMainDevice: GDHandle; external name '_GetMainDevice';
  4233. {
  4234. * GetNextDevice() *** DEPRECATED ***
  4235. *
  4236. * Mac OS X threading:
  4237. * Not thread safe
  4238. *
  4239. * Availability:
  4240. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4241. * CarbonLib: in CarbonLib 1.0 and later
  4242. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4243. }
  4244. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4245. function GetNextDevice(curDevice: GDHandle): GDHandle; external name '_GetNextDevice';
  4246. {
  4247. * TestDeviceAttribute() *** DEPRECATED ***
  4248. *
  4249. * Mac OS X threading:
  4250. * Not thread safe
  4251. *
  4252. * Availability:
  4253. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4254. * CarbonLib: in CarbonLib 1.0 and later
  4255. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4256. }
  4257. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4258. function TestDeviceAttribute(gdh: GDHandle; attribute: SInt16): boolean; external name '_TestDeviceAttribute';
  4259. {
  4260. * SetDeviceAttribute() *** DEPRECATED ***
  4261. *
  4262. * Mac OS X threading:
  4263. * Not thread safe
  4264. *
  4265. * Availability:
  4266. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4267. * CarbonLib: in CarbonLib 1.0 and later
  4268. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4269. }
  4270. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4271. procedure SetDeviceAttribute(gdh: GDHandle; attribute: SInt16; value: boolean); external name '_SetDeviceAttribute';
  4272. {
  4273. * InitGDevice() *** DEPRECATED ***
  4274. *
  4275. * Mac OS X threading:
  4276. * Not thread safe
  4277. *
  4278. * Availability:
  4279. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4280. * CarbonLib: in CarbonLib 1.0 and later
  4281. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4282. }
  4283. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4284. procedure InitGDevice(qdRefNum: SInt16; mode: SInt32; gdh: GDHandle); external name '_InitGDevice';
  4285. {
  4286. * NewGDevice() *** DEPRECATED ***
  4287. *
  4288. * Mac OS X threading:
  4289. * Not thread safe
  4290. *
  4291. * Availability:
  4292. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4293. * CarbonLib: in CarbonLib 1.0 and later
  4294. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4295. }
  4296. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4297. function NewGDevice(refNum: SInt16; mode: SInt32): GDHandle; external name '_NewGDevice';
  4298. {
  4299. * DisposeGDevice() *** DEPRECATED ***
  4300. *
  4301. * Mac OS X threading:
  4302. * Not thread safe
  4303. *
  4304. * Availability:
  4305. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4306. * CarbonLib: in CarbonLib 1.0 and later
  4307. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4308. }
  4309. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4310. procedure DisposeGDevice(gdh: GDHandle); external name '_DisposeGDevice';
  4311. {
  4312. * SetGDevice() *** DEPRECATED ***
  4313. *
  4314. * Mac OS X threading:
  4315. * Not thread safe
  4316. *
  4317. * Availability:
  4318. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4319. * CarbonLib: in CarbonLib 1.0 and later
  4320. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4321. }
  4322. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4323. procedure SetGDevice(gd: GDHandle); external name '_SetGDevice';
  4324. {
  4325. * GetGDevice() *** DEPRECATED ***
  4326. *
  4327. * Mac OS X threading:
  4328. * Not thread safe
  4329. *
  4330. * Availability:
  4331. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4332. * CarbonLib: in CarbonLib 1.0 and later
  4333. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4334. }
  4335. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4336. function GetGDevice: GDHandle; external name '_GetGDevice';
  4337. {
  4338. * Color2Index() *** DEPRECATED ***
  4339. *
  4340. * Mac OS X threading:
  4341. * Not thread safe
  4342. *
  4343. * Availability:
  4344. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4345. * CarbonLib: in CarbonLib 1.0 and later
  4346. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4347. }
  4348. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4349. function Color2Index(const (*var*) myColor: RGBColor): SInt32; external name '_Color2Index';
  4350. {
  4351. * Index2Color() *** DEPRECATED ***
  4352. *
  4353. * Mac OS X threading:
  4354. * Not thread safe
  4355. *
  4356. * Availability:
  4357. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4358. * CarbonLib: in CarbonLib 1.0 and later
  4359. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4360. }
  4361. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4362. procedure Index2Color(index: SInt32; var aColor: RGBColor); external name '_Index2Color';
  4363. {
  4364. * InvertColor() *** DEPRECATED ***
  4365. *
  4366. * Mac OS X threading:
  4367. * Not thread safe
  4368. *
  4369. * Availability:
  4370. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4371. * CarbonLib: in CarbonLib 1.0 and later
  4372. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4373. }
  4374. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4375. procedure InvertColor(var myColor: RGBColor); external name '_InvertColor';
  4376. {
  4377. * RealColor() *** DEPRECATED ***
  4378. *
  4379. * Mac OS X threading:
  4380. * Not thread safe
  4381. *
  4382. * Availability:
  4383. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4384. * CarbonLib: in CarbonLib 1.0 and later
  4385. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4386. }
  4387. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4388. function RealColor(const (*var*) color: RGBColor): boolean; external name '_RealColor';
  4389. {
  4390. * GetSubTable() *** DEPRECATED ***
  4391. *
  4392. * Mac OS X threading:
  4393. * Not thread safe
  4394. *
  4395. * Availability:
  4396. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4397. * CarbonLib: in CarbonLib 1.0 and later
  4398. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4399. }
  4400. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4401. procedure GetSubTable(myColors: CTabHandle; iTabRes: SInt16; targetTbl: CTabHandle); external name '_GetSubTable';
  4402. {
  4403. * MakeITable() *** DEPRECATED ***
  4404. *
  4405. * Mac OS X threading:
  4406. * Not thread safe
  4407. *
  4408. * Availability:
  4409. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4410. * CarbonLib: in CarbonLib 1.0 and later
  4411. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4412. }
  4413. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4414. procedure MakeITable(cTabH: CTabHandle; iTabH: ITabHandle; res: SInt16); external name '_MakeITable';
  4415. {
  4416. * AddSearch() *** DEPRECATED ***
  4417. *
  4418. * Mac OS X threading:
  4419. * Not thread safe
  4420. *
  4421. * Availability:
  4422. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4423. * CarbonLib: in CarbonLib 1.0 and later
  4424. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4425. }
  4426. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4427. procedure AddSearch(searchProc: ColorSearchUPP); external name '_AddSearch';
  4428. {
  4429. * AddComp() *** DEPRECATED ***
  4430. *
  4431. * Mac OS X threading:
  4432. * Not thread safe
  4433. *
  4434. * Availability:
  4435. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4436. * CarbonLib: in CarbonLib 1.0 and later
  4437. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4438. }
  4439. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4440. procedure AddComp(compProc: ColorComplementUPP); external name '_AddComp';
  4441. {
  4442. * DelSearch() *** DEPRECATED ***
  4443. *
  4444. * Mac OS X threading:
  4445. * Not thread safe
  4446. *
  4447. * Availability:
  4448. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4449. * CarbonLib: in CarbonLib 1.0 and later
  4450. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4451. }
  4452. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4453. procedure DelSearch(searchProc: ColorSearchUPP); external name '_DelSearch';
  4454. {
  4455. * DelComp() *** DEPRECATED ***
  4456. *
  4457. * Mac OS X threading:
  4458. * Not thread safe
  4459. *
  4460. * Availability:
  4461. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4462. * CarbonLib: in CarbonLib 1.0 and later
  4463. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4464. }
  4465. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4466. procedure DelComp(compProc: ColorComplementUPP); external name '_DelComp';
  4467. {
  4468. * SetClientID() *** DEPRECATED ***
  4469. *
  4470. * Mac OS X threading:
  4471. * Not thread safe
  4472. *
  4473. * Availability:
  4474. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4475. * CarbonLib: in CarbonLib 1.0 and later
  4476. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4477. }
  4478. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4479. procedure SetClientID(id: SInt16); external name '_SetClientID';
  4480. {
  4481. * ProtectEntry() *** DEPRECATED ***
  4482. *
  4483. * Mac OS X threading:
  4484. * Not thread safe
  4485. *
  4486. * Availability:
  4487. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4488. * CarbonLib: in CarbonLib 1.0 and later
  4489. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4490. }
  4491. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4492. procedure ProtectEntry(index: SInt16; protect: boolean); external name '_ProtectEntry';
  4493. {
  4494. * ReserveEntry() *** DEPRECATED ***
  4495. *
  4496. * Mac OS X threading:
  4497. * Not thread safe
  4498. *
  4499. * Availability:
  4500. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4501. * CarbonLib: in CarbonLib 1.0 and later
  4502. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4503. }
  4504. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4505. procedure ReserveEntry(index: SInt16; reserve: boolean); external name '_ReserveEntry';
  4506. {
  4507. * SetEntries() *** DEPRECATED ***
  4508. *
  4509. * Mac OS X threading:
  4510. * Not thread safe
  4511. *
  4512. * Availability:
  4513. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4514. * CarbonLib: in CarbonLib 1.0 and later
  4515. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4516. }
  4517. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4518. procedure SetEntries(start: SInt16; count: SInt16; var aTable: CSpecArray); external name '_SetEntries';
  4519. {
  4520. * SaveEntries() *** DEPRECATED ***
  4521. *
  4522. * Mac OS X threading:
  4523. * Not thread safe
  4524. *
  4525. * Availability:
  4526. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4527. * CarbonLib: in CarbonLib 1.0 and later
  4528. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4529. }
  4530. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4531. procedure SaveEntries(srcTable: CTabHandle; resultTable: CTabHandle; var selection: ReqListRec); external name '_SaveEntries';
  4532. {
  4533. * RestoreEntries() *** DEPRECATED ***
  4534. *
  4535. * Mac OS X threading:
  4536. * Not thread safe
  4537. *
  4538. * Availability:
  4539. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4540. * CarbonLib: in CarbonLib 1.0 and later
  4541. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4542. }
  4543. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4544. procedure RestoreEntries(srcTable: CTabHandle; dstTable: CTabHandle; var selection: ReqListRec); external name '_RestoreEntries';
  4545. {
  4546. * QDError() *** DEPRECATED ***
  4547. *
  4548. * Mac OS X threading:
  4549. * Not thread safe
  4550. *
  4551. * Availability:
  4552. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4553. * CarbonLib: in CarbonLib 1.0 and later
  4554. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4555. }
  4556. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4557. function QDError: SInt16; external name '_QDError';
  4558. {
  4559. * CopyDeepMask() *** DEPRECATED ***
  4560. *
  4561. * Mac OS X threading:
  4562. * Not thread safe
  4563. *
  4564. * Availability:
  4565. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4566. * CarbonLib: in CarbonLib 1.0 and later
  4567. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4568. }
  4569. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4570. procedure CopyDeepMask(const (*var*) srcBits: BitMap; const (*var*) maskBits: BitMap; const (*var*) dstBits: BitMap; const (*var*) srcRect: Rect; const (*var*) maskRect: Rect; const (*var*) dstRect: Rect; mode: SInt16; maskRgn: RgnHandle); external name '_CopyDeepMask';
  4571. {
  4572. * DeviceLoop() *** DEPRECATED ***
  4573. *
  4574. * Mac OS X threading:
  4575. * Not thread safe
  4576. *
  4577. * Availability:
  4578. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4579. * CarbonLib: in CarbonLib 1.0 and later
  4580. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4581. }
  4582. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4583. procedure DeviceLoop(drawingRgn: RgnHandle; drawingProc: DeviceLoopDrawingUPP; userData: SInt32; flags: DeviceLoopFlags); external name '_DeviceLoop';
  4584. {
  4585. * GetMaskTable() *** DEPRECATED ***
  4586. *
  4587. * Mac OS X threading:
  4588. * Not thread safe
  4589. *
  4590. * Availability:
  4591. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4592. * CarbonLib: in CarbonLib 1.0 and later
  4593. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4594. }
  4595. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4596. function GetMaskTable: Ptr; external name '_GetMaskTable';
  4597. {
  4598. * GetPattern() *** DEPRECATED ***
  4599. *
  4600. * Mac OS X threading:
  4601. * Not thread safe
  4602. *
  4603. * Availability:
  4604. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4605. * CarbonLib: in CarbonLib 1.0 and later
  4606. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4607. }
  4608. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4609. function GetPattern(patternID: SInt16): PatHandle; external name '_GetPattern';
  4610. {
  4611. * [Mac]GetCursor() *** DEPRECATED ***
  4612. *
  4613. * Mac OS X threading:
  4614. * Not thread safe
  4615. *
  4616. * Availability:
  4617. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4618. * CarbonLib: in CarbonLib 1.0 and later
  4619. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4620. }
  4621. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4622. function GetCursor(cursorID: SInt16): CursHandle; external name '_GetCursor';
  4623. {
  4624. * GetPicture() *** DEPRECATED ***
  4625. *
  4626. * Mac OS X threading:
  4627. * Not thread safe
  4628. *
  4629. * Availability:
  4630. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4631. * CarbonLib: in CarbonLib 1.0 and later
  4632. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4633. }
  4634. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4635. function GetPicture(pictureID: SInt16): PicHandle; external name '_GetPicture';
  4636. {
  4637. * DeltaPoint() *** DEPRECATED ***
  4638. *
  4639. * Mac OS X threading:
  4640. * Not thread safe
  4641. *
  4642. * Availability:
  4643. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4644. * CarbonLib: in CarbonLib 1.0 and later
  4645. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4646. }
  4647. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4648. function DeltaPoint(ptA: Point; ptB: Point): SInt32; external name '_DeltaPoint';
  4649. {
  4650. * ShieldCursor() *** DEPRECATED ***
  4651. *
  4652. * Mac OS X threading:
  4653. * Not thread safe
  4654. *
  4655. * Availability:
  4656. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4657. * CarbonLib: in CarbonLib 1.0 and later
  4658. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4659. }
  4660. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4661. procedure ShieldCursor(const (*var*) shieldRect: Rect; offsetPt: Point); external name '_ShieldCursor';
  4662. {
  4663. * ScreenRes() *** DEPRECATED ***
  4664. *
  4665. * Mac OS X threading:
  4666. * Not thread safe
  4667. *
  4668. * Availability:
  4669. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4670. * CarbonLib: in CarbonLib 1.0 and later
  4671. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4672. }
  4673. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4674. procedure ScreenRes(var scrnHRes: SInt16; var scrnVRes: SInt16); external name '_ScreenRes';
  4675. {
  4676. * GetIndPattern() *** DEPRECATED ***
  4677. *
  4678. * Mac OS X threading:
  4679. * Not thread safe
  4680. *
  4681. * Availability:
  4682. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4683. * CarbonLib: in CarbonLib 1.0 and later
  4684. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4685. }
  4686. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4687. procedure GetIndPattern(var thePat: Pattern; patternListID: SInt16; index: SInt16); external name '_GetIndPattern';
  4688. {$ifc OLDROUTINENAMES}
  4689. {$ifc CALL_NOT_IN_CARBON}
  4690. {
  4691. * DisposPixMap()
  4692. *
  4693. * Availability:
  4694. * Non-Carbon CFM: not available
  4695. * CarbonLib: not available
  4696. * Mac OS X: not available
  4697. }
  4698. procedure DisposPixMap(pm: PixMapHandle); external name '_DisposPixMap';
  4699. {
  4700. * DisposPixPat()
  4701. *
  4702. * Availability:
  4703. * Non-Carbon CFM: not available
  4704. * CarbonLib: not available
  4705. * Mac OS X: not available
  4706. }
  4707. procedure DisposPixPat(pp: PixPatHandle); external name '_DisposPixPat';
  4708. {
  4709. * DisposCTable()
  4710. *
  4711. * Availability:
  4712. * Non-Carbon CFM: not available
  4713. * CarbonLib: not available
  4714. * Mac OS X: not available
  4715. }
  4716. procedure DisposCTable(cTable: CTabHandle); external name '_DisposCTable';
  4717. {
  4718. * DisposCCursor()
  4719. *
  4720. * Availability:
  4721. * Non-Carbon CFM: not available
  4722. * CarbonLib: not available
  4723. * Mac OS X: not available
  4724. }
  4725. procedure DisposCCursor(cCrsr: CCrsrHandle); external name '_DisposCCursor';
  4726. {
  4727. * DisposGDevice()
  4728. *
  4729. * Availability:
  4730. * Non-Carbon CFM: not available
  4731. * CarbonLib: not available
  4732. * Mac OS X: not available
  4733. }
  4734. procedure DisposGDevice(gdh: GDHandle); external name '_DisposGDevice';
  4735. {$endc} {CALL_NOT_IN_CARBON}
  4736. {$endc} {OLDROUTINENAMES}
  4737. {
  4738. From ToolUtils.i
  4739. }
  4740. {
  4741. * PackBits() *** DEPRECATED ***
  4742. *
  4743. * Mac OS X threading:
  4744. * Not thread safe
  4745. *
  4746. * Availability:
  4747. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4748. * CarbonLib: in CarbonLib 1.0 and later
  4749. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4750. }
  4751. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4752. procedure PackBits(var srcPtr: Ptr; var dstPtr: Ptr; srcBytes: SInt16); external name '_PackBits';
  4753. {
  4754. * UnpackBits() *** DEPRECATED ***
  4755. *
  4756. * Mac OS X threading:
  4757. * Not thread safe
  4758. *
  4759. * Availability:
  4760. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4761. * CarbonLib: in CarbonLib 1.0 and later
  4762. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4763. }
  4764. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4765. procedure UnpackBits(var srcPtr: Ptr; var dstPtr: Ptr; dstBytes: SInt16); external name '_UnpackBits';
  4766. {
  4767. * SlopeFromAngle() *** DEPRECATED ***
  4768. *
  4769. * Mac OS X threading:
  4770. * Not thread safe
  4771. *
  4772. * Availability:
  4773. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4774. * CarbonLib: in CarbonLib 1.0 and later
  4775. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4776. }
  4777. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4778. function SlopeFromAngle(angle: SInt16): Fixed; external name '_SlopeFromAngle';
  4779. {
  4780. * AngleFromSlope() *** DEPRECATED ***
  4781. *
  4782. * Mac OS X threading:
  4783. * Not thread safe
  4784. *
  4785. * Availability:
  4786. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4787. * CarbonLib: in CarbonLib 1.0 and later
  4788. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  4789. }
  4790. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4791. function AngleFromSlope(slope: Fixed): SInt16; external name '_AngleFromSlope';
  4792. { New transfer modes }
  4793. const
  4794. colorXorXFer = 52;
  4795. noiseXFer = 53;
  4796. customXFer = 54;
  4797. { Custom XFer flags }
  4798. kXFer1PixelAtATime = $00000001; { 1 pixel passed to custom XFer proc }
  4799. kXFerConvertPixelToRGB32 = $00000002; { All color depths converted to 32 bit RGB }
  4800. type
  4801. CustomXFerRecPtr = ^CustomXFerRec;
  4802. CustomXFerRec = record
  4803. version: UInt32;
  4804. srcPixels: Ptr;
  4805. destPixels: Ptr;
  4806. resultPixels: Ptr;
  4807. refCon: UInt32;
  4808. pixelSize: UInt32;
  4809. pixelCount: UInt32;
  4810. firstPixelHV: Point;
  4811. destBounds: Rect;
  4812. end;
  4813. {$ifc TYPED_FUNCTION_POINTERS}
  4814. CustomXFerProcPtr = procedure(info: CustomXFerRecPtr);
  4815. {$elsec}
  4816. CustomXFerProcPtr = ProcPtr;
  4817. {$endc}
  4818. {
  4819. * GetPortCustomXFerProc() *** DEPRECATED ***
  4820. *
  4821. * Mac OS X threading:
  4822. * Not thread safe
  4823. *
  4824. * Availability:
  4825. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4826. * CarbonLib: in CarbonLib 1.0 and later
  4827. * Non-Carbon CFM: in InterfaceLib 9.0 and later
  4828. }
  4829. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4830. function GetPortCustomXFerProc(port: CGrafPtr; var proc: CustomXFerProcPtr; var flags: UInt32; var refCon: UInt32): OSErr; external name '_GetPortCustomXFerProc';
  4831. {
  4832. * SetPortCustomXFerProc() *** DEPRECATED ***
  4833. *
  4834. * Mac OS X threading:
  4835. * Not thread safe
  4836. *
  4837. * Availability:
  4838. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4839. * CarbonLib: in CarbonLib 1.0 and later
  4840. * Non-Carbon CFM: in InterfaceLib 9.0 and later
  4841. }
  4842. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4843. function SetPortCustomXFerProc(port: CGrafPtr; proc: CustomXFerProcPtr; flags: UInt32; refCon: UInt32): OSErr; external name '_SetPortCustomXFerProc';
  4844. const
  4845. kCursorComponentsVersion = $00010001;
  4846. kCursorComponentType = FourCharCode('curs');
  4847. { Cursor Component capabilities flags }
  4848. cursorDoesAnimate = $00000001;
  4849. cursorDoesHardware = $00000002;
  4850. cursorDoesUnreadableScreenBits = $00000004;
  4851. { Cursor Component output mode flags }
  4852. kRenderCursorInHardware = $00000001;
  4853. kRenderCursorInSoftware = $00000002;
  4854. { Cursor Component Info }
  4855. type
  4856. CursorInfoPtr = ^CursorInfo;
  4857. CursorInfo = record
  4858. version: SInt32; { use kCursorComponentsVersion }
  4859. capabilities: SInt32;
  4860. animateDuration: SInt32; { approximate time between animate tickles }
  4861. bounds: Rect;
  4862. hotspot: Point;
  4863. reserved: SInt32; { must set to zero }
  4864. end;
  4865. { Cursor Component Selectors }
  4866. const
  4867. kCursorComponentInit = $0001;
  4868. kCursorComponentGetInfo = $0002;
  4869. kCursorComponentSetOutputMode = $0003;
  4870. kCursorComponentSetData = $0004;
  4871. kCursorComponentReconfigure = $0005;
  4872. kCursorComponentDraw = $0006;
  4873. kCursorComponentErase = $0007;
  4874. kCursorComponentMove = $0008;
  4875. kCursorComponentAnimate = $0009;
  4876. kCursorComponentLastReserved = $0050;
  4877. {
  4878. * OpenCursorComponent() *** DEPRECATED ***
  4879. *
  4880. * Mac OS X threading:
  4881. * Not thread safe
  4882. *
  4883. * Availability:
  4884. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4885. * CarbonLib: in CarbonLib 1.0 and later
  4886. * Non-Carbon CFM: in InterfaceLib 9.0 and later
  4887. }
  4888. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4889. function OpenCursorComponent(c: Component; var ci: ComponentInstance): OSErr; external name '_OpenCursorComponent';
  4890. {
  4891. * CloseCursorComponent() *** DEPRECATED ***
  4892. *
  4893. * Mac OS X threading:
  4894. * Not thread safe
  4895. *
  4896. * Availability:
  4897. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4898. * CarbonLib: in CarbonLib 1.0 and later
  4899. * Non-Carbon CFM: in InterfaceLib 9.0 and later
  4900. }
  4901. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4902. function CloseCursorComponent(ci: ComponentInstance): OSErr; external name '_CloseCursorComponent';
  4903. {
  4904. * SetCursorComponent() *** DEPRECATED ***
  4905. *
  4906. * Mac OS X threading:
  4907. * Not thread safe
  4908. *
  4909. * Availability:
  4910. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4911. * CarbonLib: in CarbonLib 1.0 and later
  4912. * Non-Carbon CFM: in InterfaceLib 9.0 and later
  4913. }
  4914. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4915. function SetCursorComponent(ci: ComponentInstance): OSErr; external name '_SetCursorComponent';
  4916. {
  4917. * CursorComponentChanged() *** DEPRECATED ***
  4918. *
  4919. * Mac OS X threading:
  4920. * Not thread safe
  4921. *
  4922. * Availability:
  4923. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4924. * CarbonLib: in CarbonLib 1.0 and later
  4925. * Non-Carbon CFM: in InterfaceLib 9.0 and later
  4926. }
  4927. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4928. function CursorComponentChanged(ci: ComponentInstance): OSErr; external name '_CursorComponentChanged';
  4929. {
  4930. * CursorComponentSetData() *** DEPRECATED ***
  4931. *
  4932. * Mac OS X threading:
  4933. * Not thread safe
  4934. *
  4935. * Availability:
  4936. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4937. * CarbonLib: in CarbonLib 1.0 and later
  4938. * Non-Carbon CFM: in InterfaceLib 9.0 and later
  4939. }
  4940. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  4941. function CursorComponentSetData(ci: ComponentInstance; data: SInt32): OSErr; external name '_CursorComponentSetData';
  4942. { Quickdraw-specific ColorSync matching }
  4943. { Mac OS X active declarations location. CMApplication.p[.pas] text copy not compiled for Mac OS X. }
  4944. {
  4945. * CWMatchPixMap() *** DEPRECATED ***
  4946. *
  4947. * Mac OS X threading:
  4948. * Not thread safe
  4949. *
  4950. * Availability:
  4951. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4952. * CarbonLib: not available [in CarbonLib 1.0 and later]
  4953. * Non-Carbon CFM: not available [in ColorSyncLib 1.0 and later]
  4954. }
  4955. function CWMatchPixMap( cw: CMWorldRef; var myPixMap: PixMap; progressProc: CMBitmapCallBackUPP { can be NULL }; refCon: UnivPtr ): CMError; external name '_CWMatchPixMap';
  4956. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  4957. {
  4958. * CWCheckPixMap() *** DEPRECATED ***
  4959. *
  4960. * Mac OS X threading:
  4961. * Not thread safe
  4962. *
  4963. * Availability:
  4964. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4965. * CarbonLib: not available [in CarbonLib 1.0 and later]
  4966. * Non-Carbon CFM: not available [in ColorSyncLib 1.0 and later]
  4967. }
  4968. function CWCheckPixMap( cw: CMWorldRef; var myPixMap: PixMap; progressProc: CMBitmapCallBackUPP { can be NULL }; refCon: UnivPtr; var resultBitMap: BitMap ): CMError; external name '_CWCheckPixMap';
  4969. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  4970. {
  4971. * NCMBeginMatching() *** DEPRECATED ***
  4972. *
  4973. * Mac OS X threading:
  4974. * Not thread safe
  4975. *
  4976. * Availability:
  4977. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4978. * CarbonLib: not available [in CarbonLib 1.0 and later]
  4979. * Non-Carbon CFM: not available [in ColorSyncLib 2.0 and later]
  4980. }
  4981. function NCMBeginMatching( src: CMProfileRef; dst: CMProfileRef; var myRef: CMMatchRef ): CMError; external name '_NCMBeginMatching';
  4982. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  4983. {
  4984. * CMEndMatching() *** DEPRECATED ***
  4985. *
  4986. * Mac OS X threading:
  4987. * Not thread safe
  4988. *
  4989. * Availability:
  4990. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  4991. * CarbonLib: not available [in CarbonLib 1.0 and later]
  4992. * Non-Carbon CFM: not available [in ColorSyncLib 2.0 and later]
  4993. }
  4994. procedure CMEndMatching( myRef: CMMatchRef ); external name '_CMEndMatching';
  4995. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  4996. {
  4997. * NCMDrawMatchedPicture() *** DEPRECATED ***
  4998. *
  4999. * Mac OS X threading:
  5000. * Not thread safe
  5001. *
  5002. * Availability:
  5003. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5004. * CarbonLib: not available [in CarbonLib 1.0 and later]
  5005. * Non-Carbon CFM: not available [in ColorSyncLib 2.0 and later]
  5006. }
  5007. procedure NCMDrawMatchedPicture( myPicture: PicHandle; dst: CMProfileRef; var myRect: Rect ); external name '_NCMDrawMatchedPicture';
  5008. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5009. {
  5010. * CMEnableMatchingComment() *** DEPRECATED ***
  5011. *
  5012. * Mac OS X threading:
  5013. * Not thread safe
  5014. *
  5015. * Availability:
  5016. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5017. * CarbonLib: not available [in CarbonLib 1.0 and later]
  5018. * Non-Carbon CFM: not available [in ColorSyncLib 2.0 and later]
  5019. }
  5020. procedure CMEnableMatchingComment( enableIt: Boolean ); external name '_CMEnableMatchingComment';
  5021. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5022. {
  5023. * NCMUseProfileComment() *** DEPRECATED ***
  5024. *
  5025. * Mac OS X threading:
  5026. * Not thread safe
  5027. *
  5028. * Availability:
  5029. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5030. * CarbonLib: not available [in CarbonLib 1.0 and later]
  5031. * Non-Carbon CFM: not available [in ColorSyncLib 2.0 and later]
  5032. }
  5033. function NCMUseProfileComment( prof: CMProfileRef; flags: UInt32 ): CMError; external name '_NCMUseProfileComment';
  5034. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5035. { Available in CarbonLib... }
  5036. {
  5037. * IsValidPort() *** DEPRECATED ***
  5038. *
  5039. * Summary:
  5040. * Attempts to detect invalid ports
  5041. *
  5042. * Discussion:
  5043. * A grafPort structure contains many nested Handles. An attempt to
  5044. * guarantee that they are all valid is prohibitively costly. Since
  5045. * 10.1, IsValidPort only compares the CGrafPtr parameter against
  5046. * the list of grafPorts maintained internally by Quickdraw. The
  5047. * function returns true if it is found, false otherwise. This is
  5048. * enough to detect ports belonging to windows that have been
  5049. * closed, or GWorlds that have been deallocated.
  5050. *
  5051. * Mac OS X threading:
  5052. * Not thread safe
  5053. *
  5054. * Parameters:
  5055. *
  5056. * port:
  5057. * The CGrafPtr in question.
  5058. *
  5059. * Result:
  5060. * If false, port is definitely invalid. If true, port is probably
  5061. * valid (unless memory has been clobbered)
  5062. *
  5063. * Availability:
  5064. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5065. * CarbonLib: in CarbonLib 1.1 and later
  5066. * Non-Carbon CFM: not available
  5067. }
  5068. function IsValidPort(port: CGrafPtr): boolean; external name '_IsValidPort';
  5069. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5070. {
  5071. * IsValidRgnHandle()
  5072. *
  5073. * Summary:
  5074. * Tests a RgnHandle
  5075. *
  5076. * Mac OS X threading:
  5077. * Not thread safe
  5078. *
  5079. * Parameters:
  5080. *
  5081. * rgn:
  5082. * The RgnHandle in question.
  5083. *
  5084. * Result:
  5085. * If false, either the RgnHandle parameter is NULL, or has been
  5086. * deallocated, or the region data are corrupt. The latter can
  5087. * happen when memory has been overwritten. If true, the RgnHandle
  5088. * is valid. NOTE: In 10.3, the internal (opaque) format of region
  5089. * data has changed, to overcome size and performance limitations.
  5090. * Do not attempt to access region data by dereferencing the
  5091. * RgnHandle.
  5092. *
  5093. * Availability:
  5094. * Mac OS X: in version 10.3 and later in ApplicationServices.framework
  5095. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.3 and later
  5096. * Non-Carbon CFM: not available
  5097. }
  5098. function IsValidRgnHandle( rgn: RgnHandle ): Boolean; external name '_IsValidRgnHandle';
  5099. (* AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER *)
  5100. {$ifc ACCESSOR_CALLS_ARE_FUNCTIONS}
  5101. { GrafPort }
  5102. { Getters }
  5103. {
  5104. * GetPortPixMap() *** DEPRECATED ***
  5105. *
  5106. * Mac OS X threading:
  5107. * Not thread safe
  5108. *
  5109. * Availability:
  5110. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5111. * CarbonLib: in CarbonLib 1.0 and later
  5112. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5113. }
  5114. function GetPortPixMap(port: CGrafPtr): PixMapHandle; external name '_GetPortPixMap';
  5115. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5116. {
  5117. * GetPortBitMapForCopyBits()
  5118. *
  5119. * Discussion:
  5120. * GetPortBitMapForCopyBits is provided for the specific purpose of
  5121. * using the return value as a parameter to CopyBits. The return
  5122. * value can be used as the srcBits or dstBits parameter to CopyBits
  5123. * regardless of whether the port is color. If the port parameter is
  5124. * a color port, however, the returned BitMapPtr does not actually
  5125. * point to a BitMap; it points to the PixMapHandle and other fields
  5126. * in the CGrafPort structure. You should not dereference the
  5127. * BitMapPtr or otherwise depend on its contents unless you've
  5128. * confirmed that this port is a non-color port.
  5129. *
  5130. * Mac OS X threading:
  5131. * Thread safe since version 10.0
  5132. *
  5133. * Availability:
  5134. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5135. * CarbonLib: in CarbonLib 1.0.2 and later
  5136. * Non-Carbon CFM: in CarbonAccessors.o 1.0.2 and later
  5137. }
  5138. function GetPortBitMapForCopyBits(port: CGrafPtr): BitMapPtr; external name '_GetPortBitMapForCopyBits';
  5139. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5140. {
  5141. * GetPortBounds()
  5142. *
  5143. * Mac OS X threading:
  5144. * Thread safe since version 10.0
  5145. *
  5146. * Availability:
  5147. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5148. * CarbonLib: in CarbonLib 1.0 and later
  5149. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5150. }
  5151. function GetPortBounds(port: CGrafPtr; var rect_: Rect): RectPtr; external name '_GetPortBounds';
  5152. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5153. {
  5154. * GetPortForeColor()
  5155. *
  5156. * Mac OS X threading:
  5157. * Thread safe since version 10.0
  5158. *
  5159. * Availability:
  5160. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5161. * CarbonLib: in CarbonLib 1.0 and later
  5162. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5163. }
  5164. function GetPortForeColor(port: CGrafPtr; var foreColor: RGBColor): RGBColorPtr; external name '_GetPortForeColor';
  5165. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5166. {
  5167. * GetPortBackColor()
  5168. *
  5169. * Mac OS X threading:
  5170. * Thread safe since version 10.0
  5171. *
  5172. * Availability:
  5173. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5174. * CarbonLib: in CarbonLib 1.0 and later
  5175. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5176. }
  5177. function GetPortBackColor(port: CGrafPtr; var backColor: RGBColor): RGBColorPtr; external name '_GetPortBackColor';
  5178. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5179. {
  5180. * GetPortOpColor()
  5181. *
  5182. * Mac OS X threading:
  5183. * Thread safe since version 10.0
  5184. *
  5185. * Availability:
  5186. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5187. * CarbonLib: in CarbonLib 1.0 and later
  5188. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5189. }
  5190. function GetPortOpColor(port: CGrafPtr; var opColor: RGBColor): RGBColorPtr; external name '_GetPortOpColor';
  5191. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5192. {
  5193. * GetPortHiliteColor()
  5194. *
  5195. * Mac OS X threading:
  5196. * Thread safe since version 10.0
  5197. *
  5198. * Availability:
  5199. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5200. * CarbonLib: in CarbonLib 1.0 and later
  5201. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5202. }
  5203. function GetPortHiliteColor(port: CGrafPtr; var hiliteColor: RGBColor): RGBColorPtr; external name '_GetPortHiliteColor';
  5204. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5205. {
  5206. * GetPortGrafProcs()
  5207. *
  5208. * Mac OS X threading:
  5209. * Thread safe since version 10.0
  5210. *
  5211. * Availability:
  5212. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5213. * CarbonLib: in CarbonLib 1.0 and later
  5214. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5215. }
  5216. function GetPortGrafProcs(port: CGrafPtr): CQDProcsPtr; external name '_GetPortGrafProcs';
  5217. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5218. {
  5219. * GetPortTextFont()
  5220. *
  5221. * Mac OS X threading:
  5222. * Thread safe since version 10.0
  5223. *
  5224. * Availability:
  5225. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5226. * CarbonLib: in CarbonLib 1.0 and later
  5227. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5228. }
  5229. function GetPortTextFont(port: CGrafPtr): SInt16; external name '_GetPortTextFont';
  5230. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5231. {
  5232. * GetPortTextFace()
  5233. *
  5234. * Mac OS X threading:
  5235. * Thread safe since version 10.0
  5236. *
  5237. * Availability:
  5238. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5239. * CarbonLib: in CarbonLib 1.0 and later
  5240. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5241. }
  5242. function GetPortTextFace(port: CGrafPtr): ByteParameter; external name '_GetPortTextFace';
  5243. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5244. {
  5245. * GetPortTextMode()
  5246. *
  5247. * Mac OS X threading:
  5248. * Thread safe since version 10.0
  5249. *
  5250. * Availability:
  5251. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5252. * CarbonLib: in CarbonLib 1.0 and later
  5253. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5254. }
  5255. function GetPortTextMode(port: CGrafPtr): SInt16; external name '_GetPortTextMode';
  5256. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5257. {
  5258. * GetPortTextSize()
  5259. *
  5260. * Mac OS X threading:
  5261. * Thread safe since version 10.0
  5262. *
  5263. * Availability:
  5264. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5265. * CarbonLib: in CarbonLib 1.0 and later
  5266. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5267. }
  5268. function GetPortTextSize(port: CGrafPtr): SInt16; external name '_GetPortTextSize';
  5269. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5270. {
  5271. * GetPortChExtra()
  5272. *
  5273. * Mac OS X threading:
  5274. * Thread safe since version 10.0
  5275. *
  5276. * Availability:
  5277. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5278. * CarbonLib: in CarbonLib 1.0 and later
  5279. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5280. }
  5281. function GetPortChExtra(port: CGrafPtr): SInt16; external name '_GetPortChExtra';
  5282. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5283. {
  5284. * GetPortFracHPenLocation()
  5285. *
  5286. * Mac OS X threading:
  5287. * Thread safe since version 10.0
  5288. *
  5289. * Availability:
  5290. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5291. * CarbonLib: in CarbonLib 1.0 and later
  5292. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5293. }
  5294. function GetPortFracHPenLocation(port: CGrafPtr): SInt16; external name '_GetPortFracHPenLocation';
  5295. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5296. {
  5297. * GetPortSpExtra()
  5298. *
  5299. * Mac OS X threading:
  5300. * Thread safe since version 10.0
  5301. *
  5302. * Availability:
  5303. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5304. * CarbonLib: in CarbonLib 1.0 and later
  5305. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5306. }
  5307. function GetPortSpExtra(port: CGrafPtr): Fixed; external name '_GetPortSpExtra';
  5308. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5309. {
  5310. * GetPortPenVisibility()
  5311. *
  5312. * Mac OS X threading:
  5313. * Thread safe since version 10.0
  5314. *
  5315. * Availability:
  5316. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5317. * CarbonLib: in CarbonLib 1.0 and later
  5318. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5319. }
  5320. function GetPortPenVisibility(port: CGrafPtr): SInt16; external name '_GetPortPenVisibility';
  5321. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5322. {
  5323. * GetPortVisibleRegion()
  5324. *
  5325. * Mac OS X threading:
  5326. * Thread safe since version 10.0
  5327. *
  5328. * Availability:
  5329. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5330. * CarbonLib: in CarbonLib 1.0 and later
  5331. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5332. }
  5333. function GetPortVisibleRegion(port: CGrafPtr; visRgn: RgnHandle): RgnHandle; external name '_GetPortVisibleRegion';
  5334. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5335. {
  5336. * GetPortClipRegion()
  5337. *
  5338. * Mac OS X threading:
  5339. * Thread safe since version 10.0
  5340. *
  5341. * Availability:
  5342. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5343. * CarbonLib: in CarbonLib 1.0 and later
  5344. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5345. }
  5346. function GetPortClipRegion(port: CGrafPtr; clipRgn: RgnHandle): RgnHandle; external name '_GetPortClipRegion';
  5347. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5348. {
  5349. * GetPortBackPixPat()
  5350. *
  5351. * Mac OS X threading:
  5352. * Thread safe since version 10.0
  5353. *
  5354. * Availability:
  5355. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5356. * CarbonLib: in CarbonLib 1.0 and later
  5357. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5358. }
  5359. function GetPortBackPixPat(port: CGrafPtr; backPattern: PixPatHandle): PixPatHandle; external name '_GetPortBackPixPat';
  5360. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5361. {
  5362. * GetPortPenPixPat()
  5363. *
  5364. * Mac OS X threading:
  5365. * Thread safe since version 10.0
  5366. *
  5367. * Availability:
  5368. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5369. * CarbonLib: in CarbonLib 1.0 and later
  5370. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5371. }
  5372. function GetPortPenPixPat(port: CGrafPtr; penPattern: PixPatHandle): PixPatHandle; external name '_GetPortPenPixPat';
  5373. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5374. {
  5375. * GetPortFillPixPat()
  5376. *
  5377. * Mac OS X threading:
  5378. * Thread safe since version 10.0
  5379. *
  5380. * Availability:
  5381. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5382. * CarbonLib: in CarbonLib 1.0 and later
  5383. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5384. }
  5385. function GetPortFillPixPat(port: CGrafPtr; fillPattern: PixPatHandle): PixPatHandle; external name '_GetPortFillPixPat';
  5386. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5387. {
  5388. * GetPortPenSize()
  5389. *
  5390. * Mac OS X threading:
  5391. * Thread safe since version 10.0
  5392. *
  5393. * Availability:
  5394. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5395. * CarbonLib: in CarbonLib 1.0 and later
  5396. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5397. }
  5398. function GetPortPenSize(port: CGrafPtr; var penSize: Point): PointPtr; external name '_GetPortPenSize';
  5399. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5400. {
  5401. * GetPortPenMode()
  5402. *
  5403. * Mac OS X threading:
  5404. * Thread safe since version 10.0
  5405. *
  5406. * Availability:
  5407. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5408. * CarbonLib: in CarbonLib 1.0 and later
  5409. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5410. }
  5411. function GetPortPenMode(port: CGrafPtr): SInt32; external name '_GetPortPenMode';
  5412. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5413. {
  5414. * GetPortPenLocation()
  5415. *
  5416. * Mac OS X threading:
  5417. * Thread safe since version 10.0
  5418. *
  5419. * Availability:
  5420. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5421. * CarbonLib: in CarbonLib 1.0 and later
  5422. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5423. }
  5424. function GetPortPenLocation(port: CGrafPtr; var penLocation: Point): PointPtr; external name '_GetPortPenLocation';
  5425. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5426. {
  5427. * IsPortRegionBeingDefined()
  5428. *
  5429. * Mac OS X threading:
  5430. * Thread safe since version 10.0
  5431. *
  5432. * Availability:
  5433. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5434. * CarbonLib: in CarbonLib 1.0 and later
  5435. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5436. }
  5437. function IsPortRegionBeingDefined(port: CGrafPtr): boolean; external name '_IsPortRegionBeingDefined';
  5438. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5439. {
  5440. * IsPortPictureBeingDefined()
  5441. *
  5442. * Mac OS X threading:
  5443. * Thread safe since version 10.0
  5444. *
  5445. * Availability:
  5446. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5447. * CarbonLib: in CarbonLib 1.0 and later
  5448. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5449. }
  5450. function IsPortPictureBeingDefined(port: CGrafPtr): boolean; external name '_IsPortPictureBeingDefined';
  5451. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5452. {
  5453. * IsPortPolyBeingDefined()
  5454. *
  5455. * Mac OS X threading:
  5456. * Thread safe since version 10.0
  5457. *
  5458. * Availability:
  5459. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5460. * CarbonLib: in CarbonLib 1.3 and later
  5461. * Non-Carbon CFM: in CarbonAccessors.o 1.3 and later
  5462. }
  5463. function IsPortPolyBeingDefined(port: CGrafPtr): boolean; external name '_IsPortPolyBeingDefined';
  5464. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5465. {
  5466. * IsPortOffscreen()
  5467. *
  5468. * Mac OS X threading:
  5469. * Thread safe since version 10.0
  5470. *
  5471. * Availability:
  5472. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5473. * CarbonLib: in CarbonLib 1.0 and later
  5474. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5475. }
  5476. function IsPortOffscreen(port: CGrafPtr): boolean; external name '_IsPortOffscreen';
  5477. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5478. {
  5479. * IsPortColor()
  5480. *
  5481. * Mac OS X threading:
  5482. * Thread safe since version 10.0
  5483. *
  5484. * Availability:
  5485. * Mac OS X: in version 10.0 and later in ApplicationServices.framework
  5486. * CarbonLib: in CarbonLib 1.0.2 and later
  5487. * Non-Carbon CFM: in CarbonAccessors.o 1.0.2 and later
  5488. }
  5489. function IsPortColor(port: CGrafPtr): boolean; external name '_IsPortColor';
  5490. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER *)
  5491. {
  5492. * IsPortVisibleRegionEmpty()
  5493. *
  5494. * Mac OS X threading:
  5495. * Thread safe since version 10.1
  5496. *
  5497. * Availability:
  5498. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  5499. * CarbonLib: in CarbonLib 1.3 and later
  5500. * Non-Carbon CFM: not available
  5501. }
  5502. function IsPortVisibleRegionEmpty(port: CGrafPtr): boolean; external name '_IsPortVisibleRegionEmpty';
  5503. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  5504. {
  5505. * IsPortClipRegionEmpty()
  5506. *
  5507. * Mac OS X threading:
  5508. * Thread safe since version 10.1
  5509. *
  5510. * Availability:
  5511. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  5512. * CarbonLib: in CarbonLib 1.3 and later
  5513. * Non-Carbon CFM: not available
  5514. }
  5515. function IsPortClipRegionEmpty(port: CGrafPtr): boolean; external name '_IsPortClipRegionEmpty';
  5516. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  5517. {
  5518. * SectRegionWithPortClipRegion()
  5519. *
  5520. * Mac OS X threading:
  5521. * Not thread safe
  5522. *
  5523. * Availability:
  5524. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  5525. * CarbonLib: in CarbonLib 1.3 and later
  5526. * Non-Carbon CFM: not available
  5527. }
  5528. procedure SectRegionWithPortClipRegion(port: CGrafPtr; ioRegion: RgnHandle); external name '_SectRegionWithPortClipRegion';
  5529. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  5530. {
  5531. * SectRegionWithPortVisibleRegion()
  5532. *
  5533. * Mac OS X threading:
  5534. * Not thread safe
  5535. *
  5536. * Availability:
  5537. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  5538. * CarbonLib: in CarbonLib 1.3 and later
  5539. * Non-Carbon CFM: not available
  5540. }
  5541. procedure SectRegionWithPortVisibleRegion(port: CGrafPtr; ioRegion: RgnHandle); external name '_SectRegionWithPortVisibleRegion';
  5542. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  5543. { Swappers }
  5544. {
  5545. * SwapPortPicSaveHandle()
  5546. *
  5547. * Summary:
  5548. * Sets the port's picSave Handle, and returns the previous picSave
  5549. *
  5550. * Discussion:
  5551. * Historically, the picSave field in a GrafPort is != NULL if a
  5552. * Picture is being defined; and it has been documented that picture
  5553. * definition can be temporarily suspended by saving the current
  5554. * picSave Handle and setting picSave to NULL. Restoring the saved
  5555. * picSave Handle resumes picture definition.
  5556. *
  5557. * Mac OS X threading:
  5558. * Not thread safe
  5559. *
  5560. * Parameters:
  5561. *
  5562. * port:
  5563. * The port whose picSave field is being swapped.
  5564. *
  5565. * inPicSaveHdl:
  5566. * The picSave Handle to be set.
  5567. *
  5568. * Result:
  5569. * The previous picSave Handle in the port.
  5570. *
  5571. * Availability:
  5572. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  5573. * CarbonLib: in CarbonLib 1.5 and later
  5574. * Non-Carbon CFM: not available
  5575. }
  5576. function SwapPortPicSaveHandle(port: CGrafPtr; inPicSaveHdl: Handle): Handle; external name '_SwapPortPicSaveHandle';
  5577. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  5578. { Similarly: }
  5579. {
  5580. * SwapPortPolySaveHandle()
  5581. *
  5582. * Mac OS X threading:
  5583. * Not thread safe
  5584. *
  5585. * Availability:
  5586. * Mac OS X: in version 10.2 and later in ApplicationServices.framework
  5587. * CarbonLib: in CarbonLib 1.6 and later
  5588. * Non-Carbon CFM: not available
  5589. }
  5590. function SwapPortPolySaveHandle(port: CGrafPtr; inPolySaveHdl: Handle): Handle; external name '_SwapPortPolySaveHandle';
  5591. (* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *)
  5592. {
  5593. * SwapPortRegionSaveHandle()
  5594. *
  5595. * Mac OS X threading:
  5596. * Not thread safe
  5597. *
  5598. * Availability:
  5599. * Mac OS X: in version 10.2 and later in ApplicationServices.framework
  5600. * CarbonLib: in CarbonLib 1.6 and later
  5601. * Non-Carbon CFM: not available
  5602. }
  5603. function SwapPortRegionSaveHandle(port: CGrafPtr; inRegionSaveHdl: Handle): Handle; external name '_SwapPortRegionSaveHandle';
  5604. (* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *)
  5605. { Setters }
  5606. {
  5607. * SetPortBounds() *** DEPRECATED ***
  5608. *
  5609. * Mac OS X threading:
  5610. * Not thread safe
  5611. *
  5612. * Availability:
  5613. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5614. * CarbonLib: in CarbonLib 1.0 and later
  5615. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5616. }
  5617. procedure SetPortBounds(port: CGrafPtr; const (*var*) rect_: Rect); external name '_SetPortBounds';
  5618. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5619. {
  5620. * SetPortOpColor() *** DEPRECATED ***
  5621. *
  5622. * Mac OS X threading:
  5623. * Not thread safe
  5624. *
  5625. * Availability:
  5626. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5627. * CarbonLib: in CarbonLib 1.0 and later
  5628. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5629. }
  5630. procedure SetPortOpColor(port: CGrafPtr; const (*var*) opColor: RGBColor); external name '_SetPortOpColor';
  5631. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5632. {
  5633. * SetPortGrafProcs() *** DEPRECATED ***
  5634. *
  5635. * Mac OS X threading:
  5636. * Not thread safe
  5637. *
  5638. * Availability:
  5639. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5640. * CarbonLib: in CarbonLib 1.0 and later
  5641. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5642. }
  5643. procedure SetPortGrafProcs(port: CGrafPtr; procs: CQDProcsPtr); external name '_SetPortGrafProcs';
  5644. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5645. {
  5646. * SetPortTextFont()
  5647. *
  5648. * Mac OS X threading:
  5649. * Not thread safe
  5650. *
  5651. * Availability:
  5652. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  5653. * CarbonLib: in CarbonLib 1.5 and later
  5654. * Non-Carbon CFM: not available
  5655. }
  5656. procedure SetPortTextFont(port: CGrafPtr; txFont: SInt16); external name '_SetPortTextFont';
  5657. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  5658. {
  5659. * SetPortTextSize()
  5660. *
  5661. * Mac OS X threading:
  5662. * Not thread safe
  5663. *
  5664. * Availability:
  5665. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  5666. * CarbonLib: in CarbonLib 1.5 and later
  5667. * Non-Carbon CFM: not available
  5668. }
  5669. procedure SetPortTextSize(port: CGrafPtr; txSize: SInt16); external name '_SetPortTextSize';
  5670. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  5671. {
  5672. * SetPortTextFace()
  5673. *
  5674. * Mac OS X threading:
  5675. * Not thread safe
  5676. *
  5677. * Availability:
  5678. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  5679. * CarbonLib: in CarbonLib 1.5 and later
  5680. * Non-Carbon CFM: not available
  5681. }
  5682. procedure SetPortTextFace(port: CGrafPtr; face: StyleParameter); external name '_SetPortTextFace';
  5683. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  5684. {
  5685. * SetPortTextMode()
  5686. *
  5687. * Mac OS X threading:
  5688. * Not thread safe
  5689. *
  5690. * Availability:
  5691. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  5692. * CarbonLib: in CarbonLib 1.5 and later
  5693. * Non-Carbon CFM: not available
  5694. }
  5695. procedure SetPortTextMode(port: CGrafPtr; mode: SInt16); external name '_SetPortTextMode';
  5696. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  5697. {
  5698. * SetPortVisibleRegion() *** DEPRECATED ***
  5699. *
  5700. * Mac OS X threading:
  5701. * Not thread safe
  5702. *
  5703. * Availability:
  5704. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5705. * CarbonLib: in CarbonLib 1.0 and later
  5706. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5707. }
  5708. procedure SetPortVisibleRegion(port: CGrafPtr; visRgn: RgnHandle); external name '_SetPortVisibleRegion';
  5709. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5710. {
  5711. * SetPortClipRegion() *** DEPRECATED ***
  5712. *
  5713. * Mac OS X threading:
  5714. * Not thread safe
  5715. *
  5716. * Availability:
  5717. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5718. * CarbonLib: in CarbonLib 1.0 and later
  5719. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5720. }
  5721. procedure SetPortClipRegion(port: CGrafPtr; clipRgn: RgnHandle); external name '_SetPortClipRegion';
  5722. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5723. {
  5724. * SetPortPenPixPat() *** DEPRECATED ***
  5725. *
  5726. * Mac OS X threading:
  5727. * Not thread safe
  5728. *
  5729. * Availability:
  5730. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5731. * CarbonLib: in CarbonLib 1.0 and later
  5732. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5733. }
  5734. procedure SetPortPenPixPat(port: CGrafPtr; penPattern: PixPatHandle); external name '_SetPortPenPixPat';
  5735. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5736. {
  5737. * SetPortFillPixPat() *** DEPRECATED ***
  5738. *
  5739. * Mac OS X threading:
  5740. * Not thread safe
  5741. *
  5742. * Availability:
  5743. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5744. * CarbonLib: in CarbonLib 1.2 and later
  5745. * Non-Carbon CFM: in CarbonAccessors.o 1.2 and later
  5746. }
  5747. procedure SetPortFillPixPat(port: CGrafPtr; penPattern: PixPatHandle); external name '_SetPortFillPixPat';
  5748. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5749. {
  5750. * SetPortBackPixPat() *** DEPRECATED ***
  5751. *
  5752. * Mac OS X threading:
  5753. * Not thread safe
  5754. *
  5755. * Availability:
  5756. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5757. * CarbonLib: in CarbonLib 1.0 and later
  5758. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5759. }
  5760. procedure SetPortBackPixPat(port: CGrafPtr; backPattern: PixPatHandle); external name '_SetPortBackPixPat';
  5761. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5762. {
  5763. * SetPortPenSize() *** DEPRECATED ***
  5764. *
  5765. * Mac OS X threading:
  5766. * Not thread safe
  5767. *
  5768. * Availability:
  5769. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5770. * CarbonLib: in CarbonLib 1.0 and later
  5771. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5772. }
  5773. procedure SetPortPenSize(port: CGrafPtr; penSize: Point); external name '_SetPortPenSize';
  5774. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5775. {
  5776. * SetPortPenMode() *** DEPRECATED ***
  5777. *
  5778. * Mac OS X threading:
  5779. * Not thread safe
  5780. *
  5781. * Availability:
  5782. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5783. * CarbonLib: in CarbonLib 1.0 and later
  5784. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5785. }
  5786. procedure SetPortPenMode(port: CGrafPtr; penMode: SInt32); external name '_SetPortPenMode';
  5787. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5788. {
  5789. * SetPortFracHPenLocation() *** DEPRECATED ***
  5790. *
  5791. * Mac OS X threading:
  5792. * Not thread safe
  5793. *
  5794. * Availability:
  5795. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5796. * CarbonLib: in CarbonLib 1.0 and later
  5797. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5798. }
  5799. procedure SetPortFracHPenLocation(port: CGrafPtr; pnLocHFrac: SInt16); external name '_SetPortFracHPenLocation';
  5800. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5801. { PixMap }
  5802. {
  5803. * GetPixBounds() *** DEPRECATED ***
  5804. *
  5805. * Mac OS X threading:
  5806. * Not thread safe
  5807. *
  5808. * Availability:
  5809. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5810. * CarbonLib: in CarbonLib 1.0 and later
  5811. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5812. }
  5813. function GetPixBounds(pixMap: PixMapHandle; var bounds: Rect): RectPtr; external name '_GetPixBounds';
  5814. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5815. {
  5816. * GetPixDepth() *** DEPRECATED ***
  5817. *
  5818. * Mac OS X threading:
  5819. * Not thread safe
  5820. *
  5821. * Availability:
  5822. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5823. * CarbonLib: in CarbonLib 1.0 and later
  5824. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5825. }
  5826. function GetPixDepth(pixMap: PixMapHandle): SInt16; external name '_GetPixDepth';
  5827. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5828. { QDGlobals }
  5829. { Getters }
  5830. {
  5831. * GetQDGlobalsRandomSeed() *** DEPRECATED ***
  5832. *
  5833. * Mac OS X threading:
  5834. * Not thread safe
  5835. *
  5836. * Availability:
  5837. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5838. * CarbonLib: in CarbonLib 1.0 and later
  5839. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5840. }
  5841. function GetQDGlobalsRandomSeed: SInt32; external name '_GetQDGlobalsRandomSeed';
  5842. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5843. {
  5844. * GetQDGlobalsScreenBits() *** DEPRECATED ***
  5845. *
  5846. * Mac OS X threading:
  5847. * Not thread safe
  5848. *
  5849. * Availability:
  5850. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5851. * CarbonLib: in CarbonLib 1.0 and later
  5852. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5853. }
  5854. function GetQDGlobalsScreenBits(var screenBits: BitMap): BitMapPtr; external name '_GetQDGlobalsScreenBits';
  5855. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5856. {
  5857. * GetQDGlobalsArrow() *** DEPRECATED ***
  5858. *
  5859. * Mac OS X threading:
  5860. * Not thread safe
  5861. *
  5862. * Availability:
  5863. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5864. * CarbonLib: in CarbonLib 1.0 and later
  5865. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5866. }
  5867. function GetQDGlobalsArrow(var arrow: Cursor): CursorPtr; external name '_GetQDGlobalsArrow';
  5868. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5869. {
  5870. * GetQDGlobalsDarkGray() *** DEPRECATED ***
  5871. *
  5872. * Mac OS X threading:
  5873. * Not thread safe
  5874. *
  5875. * Availability:
  5876. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5877. * CarbonLib: in CarbonLib 1.0 and later
  5878. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5879. }
  5880. function GetQDGlobalsDarkGray(var dkGray: Pattern): PatternPtr; external name '_GetQDGlobalsDarkGray';
  5881. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5882. {
  5883. * GetQDGlobalsLightGray() *** DEPRECATED ***
  5884. *
  5885. * Mac OS X threading:
  5886. * Not thread safe
  5887. *
  5888. * Availability:
  5889. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5890. * CarbonLib: in CarbonLib 1.0 and later
  5891. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5892. }
  5893. function GetQDGlobalsLightGray(var ltGray: Pattern): PatternPtr; external name '_GetQDGlobalsLightGray';
  5894. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5895. {
  5896. * GetQDGlobalsGray() *** DEPRECATED ***
  5897. *
  5898. * Mac OS X threading:
  5899. * Not thread safe
  5900. *
  5901. * Availability:
  5902. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5903. * CarbonLib: in CarbonLib 1.0 and later
  5904. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5905. }
  5906. function GetQDGlobalsGray(var gray: Pattern): PatternPtr; external name '_GetQDGlobalsGray';
  5907. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5908. {
  5909. * GetQDGlobalsBlack() *** DEPRECATED ***
  5910. *
  5911. * Mac OS X threading:
  5912. * Not thread safe
  5913. *
  5914. * Availability:
  5915. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5916. * CarbonLib: in CarbonLib 1.0 and later
  5917. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5918. }
  5919. function GetQDGlobalsBlack(var black: Pattern): PatternPtr; external name '_GetQDGlobalsBlack';
  5920. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5921. {
  5922. * GetQDGlobalsWhite() *** DEPRECATED ***
  5923. *
  5924. * Mac OS X threading:
  5925. * Not thread safe
  5926. *
  5927. * Availability:
  5928. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5929. * CarbonLib: in CarbonLib 1.0 and later
  5930. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5931. }
  5932. function GetQDGlobalsWhite(var white: Pattern): PatternPtr; external name '_GetQDGlobalsWhite';
  5933. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5934. {
  5935. * GetQDGlobalsThePort() *** DEPRECATED ***
  5936. *
  5937. * Mac OS X threading:
  5938. * Not thread safe
  5939. *
  5940. * Availability:
  5941. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5942. * CarbonLib: in CarbonLib 1.0 and later
  5943. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5944. }
  5945. function GetQDGlobalsThePort: CGrafPtr; external name '_GetQDGlobalsThePort';
  5946. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5947. { Setters }
  5948. {
  5949. * SetQDGlobalsRandomSeed() *** DEPRECATED ***
  5950. *
  5951. * Mac OS X threading:
  5952. * Not thread safe
  5953. *
  5954. * Availability:
  5955. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5956. * CarbonLib: in CarbonLib 1.0 and later
  5957. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5958. }
  5959. procedure SetQDGlobalsRandomSeed(randomSeed: SInt32); external name '_SetQDGlobalsRandomSeed';
  5960. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5961. {
  5962. * SetQDGlobalsArrow() *** DEPRECATED ***
  5963. *
  5964. * Mac OS X threading:
  5965. * Not thread safe
  5966. *
  5967. * Availability:
  5968. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5969. * CarbonLib: in CarbonLib 1.0 and later
  5970. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5971. }
  5972. procedure SetQDGlobalsArrow(const (*var*) arrow: Cursor); external name '_SetQDGlobalsArrow';
  5973. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  5974. { Regions }
  5975. {
  5976. * GetRegionBounds() *** DEPRECATED ***
  5977. *
  5978. * Mac OS X threading:
  5979. * Not thread safe
  5980. *
  5981. * Availability:
  5982. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5983. * CarbonLib: in CarbonLib 1.0 and later
  5984. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5985. }
  5986. //AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4;
  5987. function GetRegionBounds(region: RgnHandle; var bounds: Rect): RectPtr; external name '_GetRegionBounds'; (* attribute ignoreable *)
  5988. {
  5989. * IsRegionRectangular() *** DEPRECATED ***
  5990. *
  5991. * Mac OS X threading:
  5992. * Not thread safe
  5993. *
  5994. * Availability:
  5995. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  5996. * CarbonLib: in CarbonLib 1.0 and later
  5997. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  5998. }
  5999. function IsRegionRectangular(region: RgnHandle): boolean; external name '_IsRegionRectangular';
  6000. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6001. { Utilities }
  6002. { To prevent upward dependencies, GetWindowFromPort() is defined in Window Manager interface: }
  6003. { pascal WindowRef GetWindowFromPort(CGrafPtr port); }
  6004. { NewPtr/OpenCPort doesn't work with opaque structures }
  6005. {
  6006. * CreateNewPort() *** DEPRECATED ***
  6007. *
  6008. * Mac OS X threading:
  6009. * Not thread safe
  6010. *
  6011. * Availability:
  6012. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6013. * CarbonLib: in CarbonLib 1.0 and later
  6014. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  6015. }
  6016. function CreateNewPort: CGrafPtr; external name '_CreateNewPort';
  6017. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6018. {
  6019. * DisposePort() *** DEPRECATED ***
  6020. *
  6021. * Mac OS X threading:
  6022. * Not thread safe
  6023. *
  6024. * Availability:
  6025. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6026. * CarbonLib: in CarbonLib 1.0 and later
  6027. * Non-Carbon CFM: in CarbonAccessors.o 1.0 and later
  6028. }
  6029. procedure DisposePort(port: CGrafPtr); external name '_DisposePort';
  6030. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6031. {
  6032. * SetQDError() *** DEPRECATED ***
  6033. *
  6034. * Mac OS X threading:
  6035. * Not thread safe
  6036. *
  6037. * Availability:
  6038. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6039. * CarbonLib: in CarbonLib 1.0.2 and later
  6040. * Non-Carbon CFM: in CarbonAccessors.o 1.0.2 and later
  6041. }
  6042. procedure SetQDError(err: OSErr); external name '_SetQDError';
  6043. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6044. {$endc} {ACCESSOR_CALLS_ARE_FUNCTIONS}
  6045. { Helpful Carbon-only utilities (finally made public) }
  6046. {
  6047. * QDLocalToGlobalPoint() *** DEPRECATED ***
  6048. *
  6049. * Mac OS X threading:
  6050. * Not thread safe
  6051. *
  6052. * Availability:
  6053. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6054. * CarbonLib: in CarbonLib 1.0 and later
  6055. * Non-Carbon CFM: not available
  6056. }
  6057. function QDLocalToGlobalPoint(port: CGrafPtr; var point_: Point): PointPtr; external name '_QDLocalToGlobalPoint';
  6058. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6059. {
  6060. * QDGlobalToLocalPoint() *** DEPRECATED ***
  6061. *
  6062. * Mac OS X threading:
  6063. * Not thread safe
  6064. *
  6065. * Availability:
  6066. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6067. * CarbonLib: in CarbonLib 1.0 and later
  6068. * Non-Carbon CFM: not available
  6069. }
  6070. function QDGlobalToLocalPoint(port: CGrafPtr; var point_: Point): PointPtr; external name '_QDGlobalToLocalPoint';
  6071. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6072. {
  6073. * QDLocalToGlobalRect() *** DEPRECATED ***
  6074. *
  6075. * Mac OS X threading:
  6076. * Not thread safe
  6077. *
  6078. * Availability:
  6079. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6080. * CarbonLib: in CarbonLib 1.0 and later
  6081. * Non-Carbon CFM: not available
  6082. }
  6083. function QDLocalToGlobalRect(port: CGrafPtr; var bounds: Rect): RectPtr; external name '_QDLocalToGlobalRect';
  6084. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6085. {
  6086. * QDGlobalToLocalRect() *** DEPRECATED ***
  6087. *
  6088. * Mac OS X threading:
  6089. * Not thread safe
  6090. *
  6091. * Availability:
  6092. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6093. * CarbonLib: in CarbonLib 1.0 and later
  6094. * Non-Carbon CFM: not available
  6095. }
  6096. function QDGlobalToLocalRect(port: CGrafPtr; var bounds: Rect): RectPtr; external name '_QDGlobalToLocalRect';
  6097. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6098. {
  6099. * QDLocalToGlobalRegion() *** DEPRECATED ***
  6100. *
  6101. * Mac OS X threading:
  6102. * Not thread safe
  6103. *
  6104. * Availability:
  6105. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6106. * CarbonLib: in CarbonLib 1.0 and later
  6107. * Non-Carbon CFM: not available
  6108. }
  6109. function QDLocalToGlobalRegion(port: CGrafPtr; region: RgnHandle): RgnHandle; external name '_QDLocalToGlobalRegion';
  6110. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6111. {
  6112. * QDGlobalToLocalRegion() *** DEPRECATED ***
  6113. *
  6114. * Mac OS X threading:
  6115. * Not thread safe
  6116. *
  6117. * Availability:
  6118. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6119. * CarbonLib: in CarbonLib 1.0 and later
  6120. * Non-Carbon CFM: not available
  6121. }
  6122. function QDGlobalToLocalRegion(port: CGrafPtr; region: RgnHandle): RgnHandle; external name '_QDGlobalToLocalRegion';
  6123. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6124. {
  6125. Routines available on Mac OS X to flush buffered window ports...
  6126. These calls do nothing on Mac OS 8/9. QDIsPortBuffered will always return false there.
  6127. }
  6128. {
  6129. * QDIsPortBuffered() *** DEPRECATED ***
  6130. *
  6131. * Mac OS X threading:
  6132. * Not thread safe
  6133. *
  6134. * Availability:
  6135. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6136. * CarbonLib: in CarbonLib 1.0.2 and later
  6137. * Non-Carbon CFM: not available
  6138. }
  6139. function QDIsPortBuffered(port: CGrafPtr): boolean; external name '_QDIsPortBuffered';
  6140. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6141. {
  6142. * QDIsPortBufferDirty() *** DEPRECATED ***
  6143. *
  6144. * Mac OS X threading:
  6145. * Not thread safe
  6146. *
  6147. * Availability:
  6148. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6149. * CarbonLib: in CarbonLib 1.0.2 and later
  6150. * Non-Carbon CFM: not available
  6151. }
  6152. function QDIsPortBufferDirty(port: CGrafPtr): boolean; external name '_QDIsPortBufferDirty';
  6153. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6154. {
  6155. * QDFlushPortBuffer() *** DEPRECATED ***
  6156. *
  6157. * Mac OS X threading:
  6158. * Not thread safe
  6159. *
  6160. * Availability:
  6161. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6162. * CarbonLib: in CarbonLib 1.0.2 and later
  6163. * Non-Carbon CFM: not available
  6164. }
  6165. procedure QDFlushPortBuffer(port: CGrafPtr; region: RgnHandle); external name '_QDFlushPortBuffer';
  6166. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6167. {
  6168. * QDGetDirtyRegion() *** DEPRECATED ***
  6169. *
  6170. * Mac OS X threading:
  6171. * Not thread safe
  6172. *
  6173. * Availability:
  6174. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6175. * CarbonLib: in CarbonLib 1.1 and later
  6176. * Non-Carbon CFM: not available
  6177. }
  6178. function QDGetDirtyRegion(port: CGrafPtr; rgn: RgnHandle): OSStatus; external name '_QDGetDirtyRegion';
  6179. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6180. {
  6181. * QDSetDirtyRegion() *** DEPRECATED ***
  6182. *
  6183. * Mac OS X threading:
  6184. * Not thread safe
  6185. *
  6186. * Availability:
  6187. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6188. * CarbonLib: in CarbonLib 1.1 and later
  6189. * Non-Carbon CFM: not available
  6190. }
  6191. function QDSetDirtyRegion(port: CGrafPtr; rgn: RgnHandle): OSStatus; external name '_QDSetDirtyRegion';
  6192. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6193. {
  6194. * QDAddRectToDirtyRegion() *** DEPRECATED ***
  6195. *
  6196. * Mac OS X threading:
  6197. * Not thread safe
  6198. *
  6199. * Availability:
  6200. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6201. * CarbonLib: in CarbonLib 1.5 and later
  6202. * Non-Carbon CFM: not available
  6203. }
  6204. function QDAddRectToDirtyRegion(inPort: CGrafPtr; const (*var*) inBounds: Rect): OSStatus; external name '_QDAddRectToDirtyRegion';
  6205. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6206. {
  6207. * QDAddRegionToDirtyRegion() *** DEPRECATED ***
  6208. *
  6209. * Mac OS X threading:
  6210. * Not thread safe
  6211. *
  6212. * Availability:
  6213. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6214. * CarbonLib: in CarbonLib 1.5 and later
  6215. * Non-Carbon CFM: not available
  6216. }
  6217. function QDAddRegionToDirtyRegion(inPort: CGrafPtr; inRegion: RgnHandle): OSStatus; external name '_QDAddRegionToDirtyRegion';
  6218. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6219. {
  6220. * CreateCGContextForPort() *** DEPRECATED ***
  6221. *
  6222. * Mac OS X threading:
  6223. * Not thread safe
  6224. *
  6225. * Availability:
  6226. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6227. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.0 and later
  6228. * Non-Carbon CFM: not available
  6229. }
  6230. function CreateCGContextForPort(inPort: CGrafPtr; var outContext: CGContextRef): OSStatus; external name '_CreateCGContextForPort';
  6231. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6232. {
  6233. * ClipCGContextToRegion() *** DEPRECATED ***
  6234. *
  6235. * Summary:
  6236. * Set a CGContext's clip path to the equivalent of a RgnHandle
  6237. *
  6238. * Discussion:
  6239. * When Quickdraw and CoreGraphics drawing are being mixed, it is
  6240. * often necessary to convert a QD clipRgn to a clipPath in CG. In
  6241. * order to produce the expected outcome in ClipCGContextToRegion,
  6242. * this function needs to reset any CGContext clipPath before
  6243. * setting it to the converted region, in contrast to the usual
  6244. * behavior of CGContextClip which takes the intersection with the
  6245. * previous clip.
  6246. *
  6247. * Mac OS X threading:
  6248. * Not thread safe
  6249. *
  6250. * Parameters:
  6251. *
  6252. * gc:
  6253. * The CGContext
  6254. *
  6255. * portRect:
  6256. * A bounding box for the region (needed by conversion to
  6257. * clipPath). Can be the GrafPort bounds, or the region bounds
  6258. *
  6259. * region:
  6260. * The RgnHandle (usually a clipRgn) to be converted to the
  6261. * CGContextClip.
  6262. *
  6263. * Result:
  6264. * OSStatus noErr, or a memory error is some internal allocation
  6265. * failed.
  6266. *
  6267. * Availability:
  6268. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6269. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.0 and later
  6270. * Non-Carbon CFM: not available
  6271. }
  6272. function ClipCGContextToRegion(gc: CGContextRef; const (*var*) portRect: Rect; region: RgnHandle): OSStatus; external name '_ClipCGContextToRegion';
  6273. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6274. {
  6275. * SyncCGContextOriginWithPort() *** DEPRECATED ***
  6276. *
  6277. * Mac OS X threading:
  6278. * Not thread safe
  6279. *
  6280. * Availability:
  6281. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6282. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.0 and later
  6283. * Non-Carbon CFM: not available
  6284. }
  6285. function SyncCGContextOriginWithPort(inContext: CGContextRef; port: CGrafPtr): OSStatus; external name '_SyncCGContextOriginWithPort';
  6286. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6287. {
  6288. * QDBeginCGContext()
  6289. *
  6290. * Summary:
  6291. * Allow CoreGraphics drawing in a CGrafPort
  6292. *
  6293. * Discussion:
  6294. * So far, CreateCGContextForPort() was used to create a CGContext
  6295. * for CG drawing from a CGrafPort. However, if the current port is
  6296. * a printing port, the CreateCGContextForPort fails; consequently,
  6297. * there was no way to mix Quickdraw and CoreGraphics drawing and
  6298. * still print it. If, instead, the CoreGraphics drawing is
  6299. * bracketed by QDBeginCGContext/QDEndCGContext calls, the drawing
  6300. * will also appear in print. There are some restrictions on the
  6301. * usage of QDBeginCGContext/QDEndCGContext:
  6302. * - Between QDBeginCGContext and QDEndCGContext, Quickdraw drawing
  6303. * is disabled; only CoreGraphics drawing is allowed
  6304. * - QDBeginCGContext/QDEndCGContext calls can not be nested
  6305. * - QDEndCGContext releases the CGContext returned from
  6306. * QDBeginCGContext and sets it to NULL.
  6307. *
  6308. * Mac OS X threading:
  6309. * Not thread safe
  6310. *
  6311. * Parameters:
  6312. *
  6313. * inPort:
  6314. * The current port
  6315. *
  6316. * outContext:
  6317. * The CGContextRef to be used for CG drawing
  6318. *
  6319. * Availability:
  6320. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  6321. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.1 and later
  6322. * Non-Carbon CFM: not available
  6323. }
  6324. function QDBeginCGContext(inPort: CGrafPtr; var outContext: CGContextRef): OSStatus; external name '_QDBeginCGContext';
  6325. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  6326. {
  6327. * QDEndCGContext()
  6328. *
  6329. * Mac OS X threading:
  6330. * Not thread safe
  6331. *
  6332. * Availability:
  6333. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  6334. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.1 and later
  6335. * Non-Carbon CFM: not available
  6336. }
  6337. function QDEndCGContext(inPort: CGrafPtr; var inoutContext: CGContextRef): OSStatus; external name '_QDEndCGContext';
  6338. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  6339. {
  6340. The following routines are implemented in CarbonLib, and on Mac OS X in QD proper.
  6341. They save the pixel data of a region in a packed format for quick save/restore
  6342. without using a lot of memory to do a large, hollow region, such as the region
  6343. used when drag hiliting (which is where this is used).
  6344. }
  6345. type
  6346. QDRegionBitsRef = ^SInt32; { an opaque 32-bit type }
  6347. QDRegionBitsRefPtr = ^QDRegionBitsRef; { when a var xx:QDRegionBitsRef parameter can be nil, it is changed to xx: QDRegionBitsRefPtr }
  6348. {
  6349. * QDSaveRegionBits()
  6350. *
  6351. * Summary:
  6352. * Saves the pixel data of a region in a packed format for quick
  6353. * restore
  6354. *
  6355. * Discussion:
  6356. * Implemented in CarbonLib, and on Mac OS X in QD proper. Used in
  6357. * particular for drag hiliting. The packed format doesn't use too
  6358. * much memory for large hollow regions.
  6359. *
  6360. * Mac OS X threading:
  6361. * Not thread safe
  6362. *
  6363. * Parameters:
  6364. *
  6365. * region:
  6366. * The RgnHandle corresponding to the pixel data to be saved.
  6367. *
  6368. * Result:
  6369. * The QDRegionBitsRef to be passed later into QDRestoreRegionBits.
  6370. *
  6371. * Availability:
  6372. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  6373. * CarbonLib: in CarbonLib 1.0 and later
  6374. * Non-Carbon CFM: not available
  6375. }
  6376. function QDSaveRegionBits(region: RgnHandle): QDRegionBitsRef; external name '_QDSaveRegionBits';
  6377. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  6378. {
  6379. * QDRestoreRegionBits()
  6380. *
  6381. * Summary:
  6382. * Restores the pixel data of a region, as returned from
  6383. * QDSaveRegionBits
  6384. *
  6385. * Discussion:
  6386. * Implemented in CarbonLib, and on Mac OS X in QD proper. Used in
  6387. * particular for drag hiliting. NOTE: QDRestoreRegionBits also
  6388. * calls QDDisposeRegionBits on the regionBits passed in - don't
  6389. * call it again!
  6390. *
  6391. * Mac OS X threading:
  6392. * Not thread safe
  6393. *
  6394. * Parameters:
  6395. *
  6396. * region:
  6397. * The RgnHandle corresponding to the regionBits.
  6398. *
  6399. * regionBits:
  6400. * The QDRegionBitsRef returned from a preceding QDSaveRegionBits
  6401. * call
  6402. *
  6403. * Result:
  6404. * OSStatus noErr, or paramErr if a NULL parameter is passed in
  6405. *
  6406. * Availability:
  6407. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  6408. * CarbonLib: in CarbonLib 1.0 and later
  6409. * Non-Carbon CFM: not available
  6410. }
  6411. function QDRestoreRegionBits(region: RgnHandle; regionBits: QDRegionBitsRef): OSStatus; external name '_QDRestoreRegionBits';
  6412. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  6413. {
  6414. * QDDisposeRegionBits()
  6415. *
  6416. * Summary:
  6417. * Disposes of data allocated in QDSaveRegionBits, when the
  6418. * QDRegionBitsRef needs to be discarded without being passed to
  6419. * QDRestoreRegionBits.
  6420. *
  6421. * Discussion:
  6422. * Implemented in CarbonLib, and on Mac OS X in QD proper. NOTE: If
  6423. * the QDRegionBitsRef has been passed to QDRestoreRegionBits, it
  6424. * has been deallocated already - don't call QDDisposeRegionBits,
  6425. * then.
  6426. *
  6427. * Mac OS X threading:
  6428. * Not thread safe
  6429. *
  6430. * Parameters:
  6431. *
  6432. * regionBits:
  6433. * The QDRegionBitsRef returned from a preceding QDSaveRegionBits
  6434. * call
  6435. *
  6436. * Result:
  6437. * OSStatus noErr, or paramErr if a NULL parameter is passed in
  6438. *
  6439. * Availability:
  6440. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  6441. * CarbonLib: in CarbonLib 1.0 and later
  6442. * Non-Carbon CFM: not available
  6443. }
  6444. function QDDisposeRegionBits(regionBits: QDRegionBitsRef): OSStatus; external name '_QDDisposeRegionBits';
  6445. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  6446. {
  6447. Developers need a way to go from a CGDirectDisplay environment to Quickdraw.
  6448. The following is equivalent to CreateNewPort(), but instead of taking the
  6449. portPixMap from the current GDevice, it uses the GDevice corresponding to
  6450. the CGSDisplayID passed in. If the CGSDisplayID is invalid, the mainDevice
  6451. is used instead.
  6452. }
  6453. {
  6454. * CreateNewPortForCGDisplayID() *** DEPRECATED ***
  6455. *
  6456. * Mac OS X threading:
  6457. * Not thread safe
  6458. *
  6459. * Availability:
  6460. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6461. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.0 and later
  6462. * Non-Carbon CFM: not available
  6463. }
  6464. function CreateNewPortForCGDisplayID(inCGDisplayID: UInt32): CGrafPtr; external name '_CreateNewPortForCGDisplayID';
  6465. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6466. {
  6467. In Mac OS X, developers should be able to turn the WaitCursor (spinning wheel)
  6468. on and off. QDDisplayWaitCursor() keeps track of nested calls.
  6469. Passing FALSE will resume automatic wait cursor operation.
  6470. Call this function only from an application in the foreground.
  6471. }
  6472. {
  6473. * QDDisplayWaitCursor() *** DEPRECATED ***
  6474. *
  6475. * Mac OS X threading:
  6476. * Not thread safe
  6477. *
  6478. * Availability:
  6479. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6480. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.0 and later
  6481. * Non-Carbon CFM: not available
  6482. }
  6483. procedure QDDisplayWaitCursor(forceWaitCursor: boolean); external name '_QDDisplayWaitCursor';
  6484. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6485. {
  6486. * QDSetPatternOrigin()
  6487. *
  6488. * Summary:
  6489. * Sets the pattern origin for the current port.
  6490. *
  6491. * Discussion:
  6492. * When a QuickDraw drawing operation uses a pattern (either a
  6493. * black&white pattern or a PixPat), the pattern's image is aligned
  6494. * with port origin, modified by the pattern origin of the port. For
  6495. * example, if the background pattern is a 8x8 image, and a
  6496. * rectangle with coordinates (3, 3, 8, 8) is filled with that
  6497. * pattern, then only the bottom right 5x5 portion of the pattern
  6498. * image will be drawn into the rectangle. When drawing a pattern,
  6499. * QuickDraw always starts with the port origin and then adjusts it
  6500. * by the pattern origin to determine the actual origin point of
  6501. * pattern drawing. QDSetPatternOrigin can be used to set the
  6502. * pattern origin relative to the port origin. It is often used in
  6503. * conjuction with SetOrigin to maintain the pattern alignment at
  6504. * (0,0) in a window's content area, regardless of the port origin;
  6505. * for example, after changing the port's origin to (10,10), an
  6506. * application might change the port's pattern origin to (-10, -10)
  6507. * so that patterns are still aligned with the window's content area.
  6508. *
  6509. * Mac OS X threading:
  6510. * Not thread safe
  6511. *
  6512. * Parameters:
  6513. *
  6514. * origin:
  6515. * The new pattern origin of the port.
  6516. *
  6517. * Availability:
  6518. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  6519. * CarbonLib: in CarbonLib 1.3 and later
  6520. * Non-Carbon CFM: in NQD 8.5 and later
  6521. }
  6522. procedure QDSetPatternOrigin(origin: Point); external name '_QDSetPatternOrigin';
  6523. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  6524. {
  6525. * QDGetPatternOrigin()
  6526. *
  6527. * Summary:
  6528. * Returns the pattern origin of the current port.
  6529. *
  6530. * Mac OS X threading:
  6531. * Not thread safe
  6532. *
  6533. * Parameters:
  6534. *
  6535. * origin:
  6536. * On exit, contains the current port's pattern origin.
  6537. *
  6538. * Availability:
  6539. * Mac OS X: in version 10.1 and later in ApplicationServices.framework
  6540. * CarbonLib: in CarbonLib 1.3 and later
  6541. * Non-Carbon CFM: in NQD 8.5 and later
  6542. }
  6543. procedure QDGetPatternOrigin(var origin: Point); external name '_QDGetPatternOrigin';
  6544. (* AVAILABLE_MAC_OS_X_VERSION_10_1_AND_LATER *)
  6545. {
  6546. * QDIsNamedPixMapCursorRegistered()
  6547. *
  6548. * Summary:
  6549. * Returns whether a named cursor has already been registered.
  6550. *
  6551. * Discussion:
  6552. * The CoreGraphics Scalable Cursor Registry provides support for
  6553. * cursors based on PixMaps for crsrData and crsrMask, with sizes up
  6554. * to 64x64 pixels. Such cursors need to be registered via
  6555. * QDRegisterNamedPixMapCursor, and can then be set by
  6556. * QDSetNamedPixMapCursor.
  6557. *
  6558. * Mac OS X threading:
  6559. * Not thread safe
  6560. *
  6561. * Parameters:
  6562. *
  6563. * name:
  6564. * (see below at QDRegisterNamedPixMapCursor)
  6565. *
  6566. * Availability:
  6567. * Mac OS X: in version 10.2 and later in ApplicationServices.framework
  6568. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later
  6569. * Non-Carbon CFM: not available
  6570. }
  6571. function QDIsNamedPixMapCursorRegistered( name: ConstCStringPtr ): Boolean; external name '_QDIsNamedPixMapCursorRegistered';
  6572. (* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *)
  6573. {
  6574. * QDRegisterNamedPixMapCursor()
  6575. *
  6576. * Summary:
  6577. * Register a new cursor by name
  6578. *
  6579. * Discussion:
  6580. * In order to set a PixMapCursor, it needs to be registered first
  6581. * by name. This only succeeds if the system supports Hardware
  6582. * Cursors (depending on video circuits). There is also the obvious
  6583. * companion function QDUnregisterNamedPixMapCursor. NOTE: The
  6584. * original implementation of QDUnregisterNamedPixMapCursor was
  6585. * misspelled "QDUnregisterNamedPixMapCursur".
  6586. *
  6587. * Mac OS X threading:
  6588. * Not thread safe
  6589. *
  6590. * Parameters:
  6591. *
  6592. * crsrData:
  6593. * A PixMapHandle representing the cursor pixels. If the
  6594. * pixelDepth is 32, the crsrMask PixMapHandle can be NULL; in
  6595. * this case, the alpha channel in the ARGB PixMap is used as
  6596. * mask. If a crsrMask is provided, the alpha channel in crsrData
  6597. * is ignored. The pixelDepth can be any of 1, 2, 4, 8, 16 or 32.
  6598. *
  6599. * crsrMask:
  6600. * A PixMapHandle representing the mask. It is assumed to be in
  6601. * 8-bit deep grayScale format, although other depths are accepted
  6602. * and converted to 8-bit grayScale (using CopyBits). The
  6603. * (**crsrMask).bounds rectangle needs to match
  6604. * (**crsrData).bounds. If the crsrData are 32-bit deep, crsrMask
  6605. * can be NULL, and the alpha bytes in the crsrData ARGB pixels
  6606. * are used as mask.
  6607. *
  6608. * hotSpot:
  6609. * The usual cursor hotspot, in coordinates relativ to
  6610. * (**crsrData).bounds.topLeft.
  6611. *
  6612. * name:
  6613. * A naming convention involving the name of your application and
  6614. * descriptive cursor names or resource IDs is suggested. Cursor
  6615. * names are 0-terminated C-strings up to a length of 127. $result
  6616. * OSStatus: noErr = 0 for success, or (constants from
  6617. * MacErrors.h): kQDNoColorHWCursorSupport,
  6618. * kQDCursorAlreadyRegistered, paramErr, memFullErr, or a CGError
  6619. * as returned internally from CoreGraphics.
  6620. *
  6621. * Availability:
  6622. * Mac OS X: in version 10.2 and later in ApplicationServices.framework
  6623. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later
  6624. * Non-Carbon CFM: not available
  6625. }
  6626. function QDRegisterNamedPixMapCursor( crsrData: PixMapHandle; crsrMask: PixMapHandle; hotSpot: Point; name: ConstCStringPtr ): OSStatus; external name '_QDRegisterNamedPixMapCursor';
  6627. (* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *)
  6628. {
  6629. * QDUnregisterNamedPixMapCursur()
  6630. *
  6631. * Mac OS X threading:
  6632. * Not thread safe
  6633. *
  6634. * Availability:
  6635. * Mac OS X: in version 10.2 and later in ApplicationServices.framework
  6636. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later
  6637. * Non-Carbon CFM: not available
  6638. }
  6639. function QDUnregisterNamedPixMapCursur( name: ConstCStringPtr ): OSStatus; external name '_QDUnregisterNamedPixMapCursur';
  6640. (* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *)
  6641. {
  6642. * QDUnregisterNamedPixMapCursor()
  6643. *
  6644. * Mac OS X threading:
  6645. * Not thread safe
  6646. *
  6647. * Availability:
  6648. * Mac OS X: in version 10.3 and later in ApplicationServices.framework
  6649. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.3 and later
  6650. * Non-Carbon CFM: not available
  6651. }
  6652. function QDUnregisterNamedPixMapCursor( name: ConstCStringPtr ): OSStatus; external name '_QDUnregisterNamedPixMapCursor';
  6653. (* AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER *)
  6654. {
  6655. * QDSetNamedPixMapCursor()
  6656. *
  6657. * Mac OS X threading:
  6658. * Not thread safe
  6659. *
  6660. * Availability:
  6661. * Mac OS X: in version 10.2 and later in ApplicationServices.framework
  6662. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later
  6663. * Non-Carbon CFM: not available
  6664. }
  6665. function QDSetNamedPixMapCursor( name: ConstCStringPtr ): OSStatus; external name '_QDSetNamedPixMapCursor';
  6666. (* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *)
  6667. type
  6668. QDXSystemCursorID = UInt32;
  6669. const
  6670. kQDXArrowCursor = 0;
  6671. kQDXIBeamCursor = 1;
  6672. kQDXIBeamXORCursor = 2;
  6673. kQDXAliasCursor = 3;
  6674. kQDXCopyCursor = 4;
  6675. kQDXMoveCursor = 5;
  6676. kQDXNumberOfSystemCursors = 6; { Must be last }
  6677. {
  6678. * QDGetCursorNameForSystemCursor()
  6679. *
  6680. * Summary:
  6681. * Return the name of one of the predefined Mac OS X system cursors
  6682. *
  6683. * Mac OS X threading:
  6684. * Not thread safe
  6685. *
  6686. * Parameters:
  6687. *
  6688. * cursorID:
  6689. * UInt32 in the range 0 ... kQDXNumberOfSystemCursors - 1 (see
  6690. * enum above)
  6691. *
  6692. * Result:
  6693. * const char* name, or NULL if 'cursorID' is out of range
  6694. *
  6695. * Availability:
  6696. * Mac OS X: in version 10.3 and later in ApplicationServices.framework
  6697. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.3 and later
  6698. * Non-Carbon CFM: not available
  6699. }
  6700. function QDGetCursorNameForSystemCursor( cursorID: QDXSystemCursorID ): ConstCStringPtr; external name '_QDGetCursorNameForSystemCursor';
  6701. (* AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER *)
  6702. {
  6703. * QDSetCursorScale()
  6704. *
  6705. * Summary:
  6706. * Set a scaling factor for the cursor.
  6707. *
  6708. * Mac OS X threading:
  6709. * Not thread safe
  6710. *
  6711. * Parameters:
  6712. *
  6713. * scale:
  6714. * Must be at least 0.5, and integer values (1.0, 2.0, 3.0, 4.0)
  6715. * are recommended. The scaling factor is system-wide (applies to
  6716. * all apps), and is intended for use in such things as assisting
  6717. * the visually impaired. The scaling factor is treated as a hint
  6718. * to the system, and the exact scale applied may be limited by
  6719. * device driver capabilities and performance considerations.
  6720. *
  6721. * Availability:
  6722. * Mac OS X: in version 10.2 and later in ApplicationServices.framework
  6723. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later
  6724. * Non-Carbon CFM: not available
  6725. }
  6726. function QDSetCursorScale( scale: Float32 ): OSStatus; external name '_QDSetCursorScale';
  6727. (* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *)
  6728. {
  6729. * QDGetCursorScale()
  6730. *
  6731. * Mac OS X threading:
  6732. * Not thread safe
  6733. *
  6734. * Availability:
  6735. * Mac OS X: in version 10.3 and later in ApplicationServices.framework
  6736. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.3 and later
  6737. * Non-Carbon CFM: not available
  6738. }
  6739. function QDGetCursorScale( outScale: Float32Ptr ): OSStatus; external name '_QDGetCursorScale';
  6740. (* AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER *)
  6741. {
  6742. * QDGetCursorData()
  6743. *
  6744. * Summary:
  6745. * Allocate and return a PixMapHandle with the cursor data; also
  6746. * return the hotSpot. The caller is responsible for calling
  6747. * DisposePtr((**crsrData).baseAddr) and DisposePixMap(crsrData)
  6748. * when done with the crsrData returned.
  6749. *
  6750. * Mac OS X threading:
  6751. * Not thread safe
  6752. *
  6753. * Parameters:
  6754. *
  6755. * contextCursor:
  6756. * A Boolean; if true, return data for the current context cursor,
  6757. * if false, return data for the currently showing global cursor.
  6758. *
  6759. * crsrData:
  6760. * Allocates a PixMapHandle and pixelData in baseAddr,
  6761. * corresponding to the cursorData. The pixelData are in 32-bit
  6762. * ARGB format, with the mask contained in the alpha channel. This
  6763. * PixMapHandle can be passed as crsrData to
  6764. * QDRegisterNamedPixMapCursor, above (with crsrMask = NULL). If
  6765. * the return result indicates an error, NULL is returned.
  6766. *
  6767. * hotSpot:
  6768. * Contains the cursor hotSpot, if successful.
  6769. *
  6770. * Result:
  6771. * noErr if successful, or whatever error is returned from lower
  6772. * levels otherwise.
  6773. *
  6774. * Availability:
  6775. * Mac OS X: in version 10.3 and later in ApplicationServices.framework
  6776. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.3 and later
  6777. * Non-Carbon CFM: not available
  6778. }
  6779. function QDGetCursorData( contextCursor: Boolean; var crsrData: PixMapHandle; var hotSpot: Point ): OSStatus; external name '_QDGetCursorData';
  6780. (* AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER *)
  6781. const
  6782. kQDUseDefaultTextRendering = 0; { Sets whatever is specified in system defaults. }
  6783. { Currently sets kQDUseTrueTypeScalerGlyphs if nothing is specified.}
  6784. kQDUseTrueTypeScalerGlyphs = (1 shl 0); { bit 0}
  6785. kQDUseCGTextRendering = (1 shl 1); { bit 1}
  6786. kQDUseCGTextMetrics = (1 shl 2); { bit 2}
  6787. kQDSupportedFlags = kQDUseTrueTypeScalerGlyphs or kQDUseCGTextRendering or kQDUseCGTextMetrics;
  6788. kQDDontChangeFlags = $FFFFFFFF; { to request the current state, without changing anything }
  6789. {
  6790. * QDSwapTextFlags()
  6791. *
  6792. * Summary:
  6793. * Returns current flags and optionally sets new flags.
  6794. *
  6795. * Discussion:
  6796. * Currently, only the flag bits in the enum above are supported.
  6797. * The typical usage is UInt32 savedFlags =
  6798. * QDSwapTextFlags(newFlags); // ... draw text under the conditions
  6799. * of "newFlags" ... (void)QDSwapTextFlags(savedFlags); // restore
  6800. * previous setting
  6801. *
  6802. * Mac OS X threading:
  6803. * Not thread safe
  6804. *
  6805. * Parameters:
  6806. *
  6807. * newFlags:
  6808. * Use the enums above; example "kQDUseCGTextRendering |
  6809. * kQDUseCGTextMetrics".
  6810. *
  6811. * Availability:
  6812. * Mac OS X: in version 10.2 and later in ApplicationServices.framework
  6813. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later
  6814. * Non-Carbon CFM: not available
  6815. }
  6816. function QDSwapTextFlags( newFlags: UInt32 ): UInt32; external name '_QDSwapTextFlags';
  6817. (* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *)
  6818. {
  6819. * QDSwapPortTextFlags()
  6820. *
  6821. * Summary:
  6822. * Same as QDSwapTextFlags, but per GrafPort.
  6823. *
  6824. * Mac OS X threading:
  6825. * Not thread safe
  6826. *
  6827. * Parameters:
  6828. *
  6829. * port:
  6830. * Settings per port override any global settings. If port ==
  6831. * NULL, the current port is used.
  6832. *
  6833. * newFlags:
  6834. * As in QDSwapTextFlags, above.
  6835. *
  6836. * Availability:
  6837. * Mac OS X: in version 10.2 and later in ApplicationServices.framework
  6838. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.2 and later
  6839. * Non-Carbon CFM: not available
  6840. }
  6841. function QDSwapPortTextFlags( port: CGrafPtr; newFlags: UInt32 ): UInt32; external name '_QDSwapPortTextFlags';
  6842. (* AVAILABLE_MAC_OS_X_VERSION_10_2_AND_LATER *)
  6843. {
  6844. * QDGetCGDirectDisplayID()
  6845. *
  6846. * Summary:
  6847. * Return the CGDirectDisplayID corresponding to a GDHandle
  6848. *
  6849. * Mac OS X threading:
  6850. * Not thread safe
  6851. *
  6852. * Parameters:
  6853. *
  6854. * inGDevice:
  6855. * The GDevice handle corresponding to the device for which the
  6856. * CGDirectDisplayID is requested
  6857. *
  6858. * Result:
  6859. * The CGDirectDisplayID, or 0 if the GDHandle does not represent a
  6860. * display.
  6861. *
  6862. * Availability:
  6863. * Mac OS X: in version 10.3 and later in ApplicationServices.framework
  6864. * CarbonLib: not available in CarbonLib 1.x, is available on Mac OS X version 10.3 and later
  6865. * Non-Carbon CFM: not available
  6866. }
  6867. function QDGetCGDirectDisplayID( inGDevice: GDHandle ): CGDirectDisplayID; external name '_QDGetCGDirectDisplayID';
  6868. (* AVAILABLE_MAC_OS_X_VERSION_10_3_AND_LATER *)
  6869. {
  6870. LowMem accessor functions previously in LowMem.h
  6871. }
  6872. {
  6873. * LMGetScrVRes() *** DEPRECATED ***
  6874. *
  6875. * Mac OS X threading:
  6876. * Not thread safe
  6877. *
  6878. * Availability:
  6879. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6880. * CarbonLib: in CarbonLib 1.0 and later
  6881. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  6882. }
  6883. function LMGetScrVRes: SInt16; external name '_LMGetScrVRes';
  6884. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6885. {
  6886. * LMSetScrVRes() *** DEPRECATED ***
  6887. *
  6888. * Mac OS X threading:
  6889. * Not thread safe
  6890. *
  6891. * Availability:
  6892. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6893. * CarbonLib: in CarbonLib 1.0 and later
  6894. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  6895. }
  6896. procedure LMSetScrVRes(value: SInt16); external name '_LMSetScrVRes';
  6897. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6898. {
  6899. * LMGetScrHRes() *** DEPRECATED ***
  6900. *
  6901. * Mac OS X threading:
  6902. * Not thread safe
  6903. *
  6904. * Availability:
  6905. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6906. * CarbonLib: in CarbonLib 1.0 and later
  6907. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  6908. }
  6909. function LMGetScrHRes: SInt16; external name '_LMGetScrHRes';
  6910. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6911. {
  6912. * LMSetScrHRes() *** DEPRECATED ***
  6913. *
  6914. * Mac OS X threading:
  6915. * Not thread safe
  6916. *
  6917. * Availability:
  6918. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6919. * CarbonLib: in CarbonLib 1.0 and later
  6920. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  6921. }
  6922. procedure LMSetScrHRes(value: SInt16); external name '_LMSetScrHRes';
  6923. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6924. {
  6925. * LMGetMainDevice() *** DEPRECATED ***
  6926. *
  6927. * Mac OS X threading:
  6928. * Not thread safe
  6929. *
  6930. * Availability:
  6931. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6932. * CarbonLib: in CarbonLib 1.0 and later
  6933. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  6934. }
  6935. function LMGetMainDevice: GDHandle; external name '_LMGetMainDevice';
  6936. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6937. {
  6938. * LMSetMainDevice() *** DEPRECATED ***
  6939. *
  6940. * Mac OS X threading:
  6941. * Not thread safe
  6942. *
  6943. * Availability:
  6944. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6945. * CarbonLib: in CarbonLib 1.0 and later
  6946. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  6947. }
  6948. procedure LMSetMainDevice(value: GDHandle); external name '_LMSetMainDevice';
  6949. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6950. {
  6951. * LMGetDeviceList() *** DEPRECATED ***
  6952. *
  6953. * Mac OS X threading:
  6954. * Not thread safe
  6955. *
  6956. * Availability:
  6957. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6958. * CarbonLib: in CarbonLib 1.0 and later
  6959. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  6960. }
  6961. function LMGetDeviceList: GDHandle; external name '_LMGetDeviceList';
  6962. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6963. {
  6964. * LMSetDeviceList() *** DEPRECATED ***
  6965. *
  6966. * Mac OS X threading:
  6967. * Not thread safe
  6968. *
  6969. * Availability:
  6970. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6971. * CarbonLib: in CarbonLib 1.0 and later
  6972. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  6973. }
  6974. procedure LMSetDeviceList(value: GDHandle); external name '_LMSetDeviceList';
  6975. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6976. {
  6977. * LMGetQDColors() *** DEPRECATED ***
  6978. *
  6979. * Mac OS X threading:
  6980. * Not thread safe
  6981. *
  6982. * Availability:
  6983. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6984. * CarbonLib: in CarbonLib 1.0 and later
  6985. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  6986. }
  6987. function LMGetQDColors: Handle; external name '_LMGetQDColors';
  6988. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  6989. {
  6990. * LMSetQDColors() *** DEPRECATED ***
  6991. *
  6992. * Mac OS X threading:
  6993. * Not thread safe
  6994. *
  6995. * Availability:
  6996. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  6997. * CarbonLib: in CarbonLib 1.0 and later
  6998. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  6999. }
  7000. procedure LMSetQDColors(value: Handle); external name '_LMSetQDColors';
  7001. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7002. {
  7003. * LMGetWidthListHand() *** DEPRECATED ***
  7004. *
  7005. * Mac OS X threading:
  7006. * Not thread safe
  7007. *
  7008. * Availability:
  7009. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7010. * CarbonLib: in CarbonLib 1.0 and later
  7011. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7012. }
  7013. function LMGetWidthListHand: Handle; external name '_LMGetWidthListHand';
  7014. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7015. {
  7016. * LMSetWidthListHand() *** DEPRECATED ***
  7017. *
  7018. * Mac OS X threading:
  7019. * Not thread safe
  7020. *
  7021. * Availability:
  7022. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7023. * CarbonLib: in CarbonLib 1.0 and later
  7024. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7025. }
  7026. procedure LMSetWidthListHand(value: Handle); external name '_LMSetWidthListHand';
  7027. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7028. {
  7029. * LMGetHiliteMode() *** DEPRECATED ***
  7030. *
  7031. * Mac OS X threading:
  7032. * Not thread safe
  7033. *
  7034. * Availability:
  7035. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7036. * CarbonLib: in CarbonLib 1.0 and later
  7037. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7038. }
  7039. function LMGetHiliteMode: ByteParameter; external name '_LMGetHiliteMode';
  7040. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7041. {
  7042. * LMSetHiliteMode() *** DEPRECATED ***
  7043. *
  7044. * Mac OS X threading:
  7045. * Not thread safe
  7046. *
  7047. * Availability:
  7048. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7049. * CarbonLib: in CarbonLib 1.0 and later
  7050. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7051. }
  7052. procedure LMSetHiliteMode(value: ByteParameter); external name '_LMSetHiliteMode';
  7053. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7054. {
  7055. * LMGetWidthPtr() *** DEPRECATED ***
  7056. *
  7057. * Mac OS X threading:
  7058. * Not thread safe
  7059. *
  7060. * Availability:
  7061. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7062. * CarbonLib: in CarbonLib 1.0 and later
  7063. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7064. }
  7065. function LMGetWidthPtr: Ptr; external name '_LMGetWidthPtr';
  7066. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7067. {
  7068. * LMSetWidthPtr() *** DEPRECATED ***
  7069. *
  7070. * Mac OS X threading:
  7071. * Not thread safe
  7072. *
  7073. * Availability:
  7074. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7075. * CarbonLib: in CarbonLib 1.0 and later
  7076. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7077. }
  7078. procedure LMSetWidthPtr(value: Ptr); external name '_LMSetWidthPtr';
  7079. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7080. {
  7081. * LMGetWidthTabHandle() *** DEPRECATED ***
  7082. *
  7083. * Mac OS X threading:
  7084. * Not thread safe
  7085. *
  7086. * Availability:
  7087. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7088. * CarbonLib: in CarbonLib 1.0 and later
  7089. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7090. }
  7091. function LMGetWidthTabHandle: Handle; external name '_LMGetWidthTabHandle';
  7092. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7093. {
  7094. * LMSetWidthTabHandle() *** DEPRECATED ***
  7095. *
  7096. * Mac OS X threading:
  7097. * Not thread safe
  7098. *
  7099. * Availability:
  7100. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7101. * CarbonLib: in CarbonLib 1.0 and later
  7102. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7103. }
  7104. procedure LMSetWidthTabHandle(value: Handle); external name '_LMSetWidthTabHandle';
  7105. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7106. {
  7107. * LMGetLastSPExtra() *** DEPRECATED ***
  7108. *
  7109. * Mac OS X threading:
  7110. * Not thread safe
  7111. *
  7112. * Availability:
  7113. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7114. * CarbonLib: in CarbonLib 1.0 and later
  7115. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7116. }
  7117. function LMGetLastSPExtra: SInt32; external name '_LMGetLastSPExtra';
  7118. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7119. {
  7120. * LMSetLastSPExtra() *** DEPRECATED ***
  7121. *
  7122. * Mac OS X threading:
  7123. * Not thread safe
  7124. *
  7125. * Availability:
  7126. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7127. * CarbonLib: in CarbonLib 1.0 and later
  7128. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7129. }
  7130. procedure LMSetLastSPExtra(value: SInt32); external name '_LMSetLastSPExtra';
  7131. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7132. {
  7133. * LMGetLastFOND() *** DEPRECATED ***
  7134. *
  7135. * Mac OS X threading:
  7136. * Not thread safe
  7137. *
  7138. * Availability:
  7139. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7140. * CarbonLib: in CarbonLib 1.0 and later
  7141. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7142. }
  7143. function LMGetLastFOND: Handle; external name '_LMGetLastFOND';
  7144. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7145. {
  7146. * LMSetLastFOND() *** DEPRECATED ***
  7147. *
  7148. * Mac OS X threading:
  7149. * Not thread safe
  7150. *
  7151. * Availability:
  7152. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7153. * CarbonLib: in CarbonLib 1.0 and later
  7154. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7155. }
  7156. procedure LMSetLastFOND(value: Handle); external name '_LMSetLastFOND';
  7157. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7158. {
  7159. * LMGetFractEnable() *** DEPRECATED ***
  7160. *
  7161. * Mac OS X threading:
  7162. * Not thread safe
  7163. *
  7164. * Availability:
  7165. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7166. * CarbonLib: in CarbonLib 1.0 and later
  7167. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7168. }
  7169. function LMGetFractEnable: ByteParameter; external name '_LMGetFractEnable';
  7170. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7171. {
  7172. * LMSetFractEnable() *** DEPRECATED ***
  7173. *
  7174. * Mac OS X threading:
  7175. * Not thread safe
  7176. *
  7177. * Availability:
  7178. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7179. * CarbonLib: in CarbonLib 1.0 and later
  7180. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7181. }
  7182. procedure LMSetFractEnable(value: ByteParameter); external name '_LMSetFractEnable';
  7183. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7184. {
  7185. * LMGetTheGDevice() *** DEPRECATED ***
  7186. *
  7187. * Mac OS X threading:
  7188. * Not thread safe
  7189. *
  7190. * Availability:
  7191. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7192. * CarbonLib: in CarbonLib 1.0 and later
  7193. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7194. }
  7195. function LMGetTheGDevice: GDHandle; external name '_LMGetTheGDevice';
  7196. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7197. {
  7198. * LMSetTheGDevice() *** DEPRECATED ***
  7199. *
  7200. * Mac OS X threading:
  7201. * Not thread safe
  7202. *
  7203. * Availability:
  7204. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7205. * CarbonLib: in CarbonLib 1.0 and later
  7206. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7207. }
  7208. procedure LMSetTheGDevice(value: GDHandle); external name '_LMSetTheGDevice';
  7209. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7210. {
  7211. * LMGetHiliteRGB() *** DEPRECATED ***
  7212. *
  7213. * Mac OS X threading:
  7214. * Not thread safe
  7215. *
  7216. * Availability:
  7217. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7218. * CarbonLib: in CarbonLib 1.0 and later
  7219. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7220. }
  7221. procedure LMGetHiliteRGB(var hiliteRGBValue: RGBColor); external name '_LMGetHiliteRGB';
  7222. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7223. {
  7224. * LMSetHiliteRGB() *** DEPRECATED ***
  7225. *
  7226. * Mac OS X threading:
  7227. * Not thread safe
  7228. *
  7229. * Availability:
  7230. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7231. * CarbonLib: in CarbonLib 1.0 and later
  7232. * Non-Carbon CFM: in InterfaceLib 7.1 and later
  7233. }
  7234. procedure LMSetHiliteRGB(const (*var*) hiliteRGBValue: RGBColor); external name '_LMSetHiliteRGB';
  7235. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7236. {
  7237. * LMGetCursorNew() *** DEPRECATED ***
  7238. *
  7239. * Mac OS X threading:
  7240. * Not thread safe
  7241. *
  7242. * Availability:
  7243. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7244. * CarbonLib: in CarbonLib 1.0 and later
  7245. * Non-Carbon CFM: in InterfaceLib 8.5 and later
  7246. }
  7247. function LMGetCursorNew: boolean; external name '_LMGetCursorNew';
  7248. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7249. {
  7250. * LMSetCursorNew() *** DEPRECATED ***
  7251. *
  7252. * Mac OS X threading:
  7253. * Not thread safe
  7254. *
  7255. * Availability:
  7256. * Mac OS X: in version 10.0 and later in ApplicationServices.framework but deprecated in 10.4
  7257. * CarbonLib: in CarbonLib 1.0 and later
  7258. * Non-Carbon CFM: in InterfaceLib 8.5 and later
  7259. }
  7260. procedure LMSetCursorNew(value: boolean); external name '_LMSetCursorNew';
  7261. (* AVAILABLE_MAC_OS_X_VERSION_10_0_AND_LATER_BUT_DEPRECATED_IN_MAC_OS_X_VERSION_10_4 *)
  7262. {$ALIGN MAC68K}
  7263. end.