/ Mac Power 1997 May / macpower199705.bin / AMUG / UTILITY / Smart Scroll 2.02.sit / Smart Scroll 2.02 / for Developers / SmartScrollAPI.c

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 10 53 6d 61 72 74 53 | 63 72 6f 6c 6c 41 50 49 |..SmartS|crollAPI|
|00000010| 2e 63 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.c......|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 01 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 11 23 00 | 00 01 c8 ae 71 f7 55 ae |......#.|....q.U.|
|00000060| 71 f7 55 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |q.U.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 68 57 00 00 |........|....hW..|
|00000080| 2f 2a 0d 20 09 46 69 6c | 65 3a 09 09 53 6d 61 72 |/*. .Fil|e:..Smar|
|00000090| 74 53 63 72 6f 6c 6c 41 | 50 49 2e 63 0d 20 0d 20 |tScrollA|PI.c. . |
|000000a0| 09 43 6f 6e 74 61 69 6e | 73 3a 09 53 6d 61 72 74 |.Contain|s:.Smart|
|000000b0| 20 53 63 72 6f 6c 6c 20 | 41 70 70 6c 69 63 61 74 | Scroll |Applicat|
|000000c0| 69 6f 6e 20 50 72 6f 67 | 72 61 6d 6d 69 6e 67 20 |ion Prog|ramming |
|000000d0| 49 6e 74 65 72 66 61 63 | 65 20 63 6f 64 65 0d 20 |Interfac|e code. |
|000000e0| 0d 20 09 56 65 72 73 69 | 6f 6e 3a 09 31 2e 32 0d |. .Versi|on:.1.2.|
|000000f0| 20 0d 20 09 43 6f 70 79 | 72 69 67 68 74 3a 09 a9 | . .Copy|right:..|
|00000100| 20 31 39 39 36 20 62 79 | 20 4d 61 72 63 20 4d 6f | 1996 by| Marc Mo|
|00000110| 69 6e 69 2c 20 70 6f 72 | 74 69 6f 6e 73 20 62 79 |ini, por|tions by|
|00000120| 20 4d 61 72 63 20 4d 65 | 6e 73 63 68 65 6e 66 72 | Marc Me|nschenfr|
|00000130| 65 75 6e 64 2c 0d 09 09 | 09 09 41 6c 65 73 73 61 |eund,...|..Alessa|
|00000140| 6e 64 72 6f 20 4c 65 76 | 69 20 4d 6f 6e 74 61 6c |ndro Lev|i Montal|
|00000150| 63 69 6e 69 20 61 6e 64 | 20 4d 61 72 6b 20 53 68 |cini and| Mark Sh|
|00000160| 69 72 6c 65 79 20 28 54 | 68 61 6e 6b 73 21 29 0d |irley (T|hanks!).|
|00000170| 20 09 09 09 09 41 6c 6c | 20 72 69 67 68 74 73 20 | ....All| rights |
|00000180| 72 65 73 65 72 76 65 64 | 2e 0d 20 0d 20 09 42 75 |reserved|.. . .Bu|
|00000190| 67 73 3f 3a 09 09 49 66 | 20 79 6f 75 20 66 69 6e |gs?:..If| you fin|
|000001a0| 64 20 61 20 70 72 6f 62 | 6c 65 6d 20 77 69 74 68 |d a prob|lem with|
|000001b0| 20 74 68 69 73 20 66 69 | 6c 65 2c 20 70 6c 65 61 | this fi|le, plea|
|000001c0| 73 65 20 65 6d 61 69 6c | 20 4d 61 72 63 40 4b 61 |se email| Marc@Ka|
|000001d0| 67 69 2e 63 6f 6d 0d 20 | 0d 2a 2f 0d 23 69 66 6e |gi.com. |.*/.#ifn|
|000001e0| 64 65 66 20 5f 5f 53 4d | 41 52 54 53 43 52 4f 4c |def __SM|ARTSCROL|
|000001f0| 4c 41 50 49 5f 5f 0d 23 | 69 6e 63 6c 75 64 65 20 |LAPI__.#|include |
|00000200| 22 53 6d 61 72 74 53 63 | 72 6f 6c 6c 41 50 49 2e |"SmartSc|rollAPI.|
|00000210| 68 22 0d 23 65 6e 64 69 | 66 0d 0d 23 69 66 20 50 |h".#endi|f..#if P|
|00000220| 52 41 47 4d 41 5f 41 4c | 49 47 4e 5f 53 55 50 50 |RAGMA_AL|IGN_SUPP|
|00000230| 4f 52 54 45 44 0d 23 70 | 72 61 67 6d 61 20 6f 70 |ORTED.#p|ragma op|
|00000240| 74 69 6f 6e 73 20 61 6c | 69 67 6e 3d 6d 61 63 36 |tions al|ign=mac6|
|00000250| 38 6b 0d 23 65 6e 64 69 | 66 0d 0d 23 69 66 20 50 |8k.#endi|f..#if P|
|00000260| 52 41 47 4d 41 5f 49 4d | 50 4f 52 54 5f 53 55 50 |RAGMA_IM|PORT_SUP|
|00000270| 50 4f 52 54 45 44 0d 23 | 70 72 61 67 6d 61 20 69 |PORTED.#|pragma i|
|00000280| 6d 70 6f 72 74 20 6f 6e | 0d 23 65 6e 64 69 66 0d |mport on|.#endif.|
|00000290| 0d 23 64 65 66 69 6e 65 | 09 6b 67 65 73 74 61 6c |.#define|.kgestal|
|000002a0| 74 53 6d 61 72 74 53 63 | 72 6f 6c 6c 09 27 4d 4d |tSmartSc|roll.'MM|
|000002b0| 42 53 27 0d 0d 65 6e 75 | 6d 0d 09 7b 0d 09 6b 53 |BS'..enu|m..{..kS|
|000002c0| 65 74 53 6d 61 72 74 53 | 63 72 6f 6c 6c 49 6e 66 |etSmartS|crollInf|
|000002d0| 6f 20 3d 20 30 4c 2c 0d | 09 6b 53 65 74 53 6d 61 |o = 0L,.|.kSetSma|
|000002e0| 72 74 53 63 72 6f 6c 6c | 50 72 6f 70 2c 0d 09 6b |rtScroll|Prop,..k|
|000002f0| 47 65 74 53 6d 61 72 74 | 53 63 72 6f 6c 6c 50 72 |GetSmart|ScrollPr|
|00000300| 6f 70 2c 0d 09 6b 44 69 | 73 70 6f 73 65 41 6c 6c |op,..kDi|sposeAll|
|00000310| 53 6d 61 72 74 53 63 72 | 6f 6c 6c 73 0d 09 7d 3b |SmartScr|olls..};|
|00000320| 0d 0d 74 79 70 65 64 65 | 66 20 70 61 73 63 61 6c |..typede|f pascal|
|00000330| 20 76 6f 69 64 20 28 2a | 53 6d 61 72 74 53 63 72 | void (*|SmartScr|
|00000340| 6f 6c 6c 50 72 6f 63 50 | 74 72 29 20 28 6c 6f 6e |ollProcP|tr) (lon|
|00000350| 67 20 73 65 6c 65 63 74 | 6f 72 2c 6c 6f 6e 67 20 |g select|or,long |
|00000360| 2a 72 65 73 75 6c 74 2c | 43 6f 6e 74 72 6f 6c 52 |*result,|ControlR|
|00000370| 65 66 20 74 68 65 53 63 | 72 6f 6c 6c 42 61 72 2c |ef theSc|rollBar,|
|00000380| 6c 6f 6e 67 20 70 61 72 | 61 6d 31 2c 6c 6f 6e 67 |long par|am1,long|
|00000390| 20 70 61 72 61 6d 32 29 | 3b 0d 0d 74 79 70 65 64 | param2)|;..typed|
|000003a0| 65 66 20 73 74 72 75 63 | 74 20 7b 0d 09 63 68 61 |ef struc|t {..cha|
|000003b0| 72 09 09 09 09 70 72 69 | 76 61 74 65 53 74 75 66 |r....pri|vateStuf|
|000003c0| 66 5b 31 36 5d 3b 0d 09 | 53 6d 61 72 74 53 63 72 |f[16];..|SmartScr|
|000003d0| 6f 6c 6c 50 72 6f 63 50 | 74 72 09 64 69 73 70 61 |ollProcP|tr.dispa|
|000003e0| 74 63 68 50 72 6f 63 3b | 0d 09 6c 6f 6e 67 09 09 |tchProc;|..long..|
|000003f0| 09 09 73 6d 61 72 74 53 | 63 72 6f 6c 6c 53 69 67 |..smartS|crollSig|
|00000400| 6e 61 74 75 72 65 3b 0d | 7d 20 53 6d 61 72 74 53 |nature;.|} SmartS|
|00000410| 63 72 6f 6c 6c 47 65 73 | 74 61 6c 74 52 65 63 2c |crollGes|taltRec,|
|00000420| 20 2a 53 6d 61 72 74 53 | 63 72 6f 6c 6c 47 65 73 | *SmartS|crollGes|
|00000430| 74 61 6c 74 50 74 72 3b | 0d 0d 0d 23 69 66 20 47 |taltPtr;|...#if G|
|00000440| 45 4e 45 52 41 54 49 4e | 47 43 46 4d 0d 23 64 65 |ENERATIN|GCFM.#de|
|00000450| 66 69 6e 65 20 43 61 6c | 6c 53 6d 61 72 74 53 63 |fine Cal|lSmartSc|
|00000460| 72 6f 6c 6c 50 72 6f 63 | 28 75 73 65 72 52 6f 75 |rollProc|(userRou|
|00000470| 74 69 6e 65 2c 20 73 65 | 6c 65 63 74 6f 72 2c 20 |tine, se|lector, |
|00000480| 72 65 73 75 6c 74 2c 20 | 74 68 65 43 6f 6e 74 72 |result, |theContr|
|00000490| 6f 6c 2c 20 70 61 72 61 | 6d 31 2c 20 70 61 72 61 |ol, para|m1, para|
|000004a0| 6d 32 29 09 09 5c 0d 09 | 09 43 61 6c 6c 55 6e 69 |m2)..\..|.CallUni|
|000004b0| 76 65 72 73 61 6c 50 72 | 6f 63 28 28 55 6e 69 76 |versalPr|oc((Univ|
|000004c0| 65 72 73 61 6c 50 72 6f | 63 50 74 72 29 28 75 73 |ersalPro|cPtr)(us|
|000004d0| 65 72 52 6f 75 74 69 6e | 65 29 2c 20 75 70 70 53 |erRoutin|e), uppS|
|000004e0| 6d 61 72 74 53 63 72 6f | 6c 6c 50 72 6f 63 49 6e |martScro|llProcIn|
|000004f0| 66 6f 2c 20 28 73 65 6c | 65 63 74 6f 72 29 2c 20 |fo, (sel|ector), |
|00000500| 28 72 65 73 75 6c 74 29 | 2c 20 28 74 68 65 43 6f |(result)|, (theCo|
|00000510| 6e 74 72 6f 6c 29 2c 20 | 28 70 61 72 61 6d 31 29 |ntrol), |(param1)|
|00000520| 2c 20 28 70 61 72 61 6d | 32 29 29 0d 23 65 6c 73 |, (param|2)).#els|
|00000530| 65 0d 23 64 65 66 69 6e | 65 20 43 61 6c 6c 53 6d |e.#defin|e CallSm|
|00000540| 61 72 74 53 63 72 6f 6c | 6c 50 72 6f 63 28 75 73 |artScrol|lProc(us|
|00000550| 65 72 52 6f 75 74 69 6e | 65 2c 20 73 65 6c 65 63 |erRoutin|e, selec|
|00000560| 74 6f 72 2c 20 72 65 73 | 75 6c 74 2c 20 74 68 65 |tor, res|ult, the|
|00000570| 43 6f 6e 74 72 6f 6c 2c | 20 70 61 72 61 6d 31 2c |Control,| param1,|
|00000580| 20 70 61 72 61 6d 32 29 | 09 09 5c 0d 09 09 28 2a | param2)|..\...(*|
|00000590| 28 75 73 65 72 52 6f 75 | 74 69 6e 65 29 29 28 28 |(userRou|tine))((|
|000005a0| 73 65 6c 65 63 74 6f 72 | 29 2c 20 28 72 65 73 75 |selector|), (resu|
|000005b0| 6c 74 29 2c 20 28 74 68 | 65 43 6f 6e 74 72 6f 6c |lt), (th|eControl|
|000005c0| 29 2c 20 28 70 61 72 61 | 6d 31 29 2c 20 28 70 61 |), (para|m1), (pa|
|000005d0| 72 61 6d 32 29 29 0d 23 | 65 6e 64 69 66 0d 0d 65 |ram2)).#|endif..e|
|000005e0| 6e 75 6d 09 7b 0d 09 75 | 70 70 53 6d 61 72 74 53 |num.{..u|ppSmartS|
|000005f0| 63 72 6f 6c 6c 50 72 6f | 63 49 6e 66 6f 20 3d 20 |crollPro|cInfo = |
|00000600| 6b 50 61 73 63 61 6c 53 | 74 61 63 6b 42 61 73 65 |kPascalS|tackBase|
|00000610| 64 0d 09 09 7c 20 53 54 | 41 43 4b 5f 52 4f 55 54 |d...| ST|ACK_ROUT|
|00000620| 49 4e 45 5f 50 41 52 41 | 4d 45 54 45 52 20 28 31 |INE_PARA|METER (1|
|00000630| 2c 20 53 49 5a 45 5f 43 | 4f 44 45 28 73 69 7a 65 |, SIZE_C|ODE(size|
|00000640| 6f 66 28 6c 6f 6e 67 29 | 29 29 0d 09 09 7c 20 53 |of(long)|))...| S|
|00000650| 54 41 43 4b 5f 52 4f 55 | 54 49 4e 45 5f 50 41 52 |TACK_ROU|TINE_PAR|
|00000660| 41 4d 45 54 45 52 20 28 | 32 2c 20 53 49 5a 45 5f |AMETER (|2, SIZE_|
|00000670| 43 4f 44 45 28 73 69 7a | 65 6f 66 28 6c 6f 6e 67 |CODE(siz|eof(long|
|00000680| 20 2a 29 29 29 0d 09 09 | 7c 20 53 54 41 43 4b 5f | *)))...|| STACK_|
|00000690| 52 4f 55 54 49 4e 45 5f | 50 41 52 41 4d 45 54 45 |ROUTINE_|PARAMETE|
|000006a0| 52 20 28 33 2c 20 53 49 | 5a 45 5f 43 4f 44 45 28 |R (3, SI|ZE_CODE(|
|000006b0| 73 69 7a 65 6f 66 28 43 | 6f 6e 74 72 6f 6c 52 65 |sizeof(C|ontrolRe|
|000006c0| 66 29 29 29 0d 09 09 7c | 20 53 54 41 43 4b 5f 52 |f)))...|| STACK_R|
|000006d0| 4f 55 54 49 4e 45 5f 50 | 41 52 41 4d 45 54 45 52 |OUTINE_P|ARAMETER|
|000006e0| 20 28 34 2c 20 53 49 5a | 45 5f 43 4f 44 45 28 73 | (4, SIZ|E_CODE(s|
|000006f0| 69 7a 65 6f 66 28 6c 6f | 6e 67 29 29 29 0d 09 09 |izeof(lo|ng)))...|
|00000700| 7c 20 53 54 41 43 4b 5f | 52 4f 55 54 49 4e 45 5f || STACK_|ROUTINE_|
|00000710| 50 41 52 41 4d 45 54 45 | 52 20 28 35 2c 20 53 49 |PARAMETE|R (5, SI|
|00000720| 5a 45 5f 43 4f 44 45 28 | 73 69 7a 65 6f 66 28 6c |ZE_CODE(|sizeof(l|
|00000730| 6f 6e 67 29 29 29 0d 7d | 3b 0d 2f 2a 2a 2a 2a 2a |ong))).}|;./*****|
|00000740| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000750| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000760| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000770| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000780| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000790| 2a 2a 2a 2f 0d 0d 73 74 | 61 74 69 63 20 4f 53 45 |***/..st|atic OSE|
|000007a0| 72 72 20 5f 5f 53 6d 61 | 72 74 53 63 72 6f 6c 6c |rr __Sma|rtScroll|
|000007b0| 44 69 73 70 61 74 63 68 | 28 6c 6f 6e 67 20 73 65 |Dispatch|(long se|
|000007c0| 6c 65 63 74 6f 72 2c 6c | 6f 6e 67 20 2a 72 65 73 |lector,l|ong *res|
|000007d0| 75 6c 74 2c 43 6f 6e 74 | 72 6f 6c 52 65 66 20 74 |ult,Cont|rolRef t|
|000007e0| 68 65 43 6f 6e 74 72 6f | 6c 2c 6c 6f 6e 67 20 70 |heContro|l,long p|
|000007f0| 61 72 61 6d 31 2c 6c 6f | 6e 67 20 70 61 72 61 6d |aram1,lo|ng param|
|00000800| 32 29 0d 09 7b 0d 09 4f | 53 45 72 72 20 09 09 09 |2)..{..O|SErr ...|
|00000810| 09 09 72 65 74 20 3d 20 | 70 61 72 61 6d 45 72 72 |..ret = |paramErr|
|00000820| 3b 0d 09 53 6d 61 72 74 | 53 63 72 6f 6c 6c 47 65 |;..Smart|ScrollGe|
|00000830| 73 74 61 6c 74 50 74 72 | 09 73 73 52 65 63 3b 0d |staltPtr|.ssRec;.|
|00000840| 09 0d 09 69 66 20 28 4e | 47 65 74 54 72 61 70 41 |...if (N|GetTrapA|
|00000850| 64 64 72 65 73 73 20 28 | 5f 47 65 73 74 61 6c 74 |ddress (|_Gestalt|
|00000860| 2c 20 4f 53 54 72 61 70 | 29 20 21 3d 20 4e 47 65 |, OSTrap|) != NGe|
|00000870| 74 54 72 61 70 41 64 64 | 72 65 73 73 20 28 5f 55 |tTrapAdd|ress (_U|
|00000880| 6e 69 6d 70 6c 65 6d 65 | 6e 74 65 64 2c 20 4f 53 |nimpleme|nted, OS|
|00000890| 54 72 61 70 29 29 0d 09 | 09 7b 0d 09 09 69 66 20 |Trap))..|.{...if |
|000008a0| 28 47 65 73 74 61 6c 74 | 20 28 20 6b 67 65 73 74 |(Gestalt| ( kgest|
|000008b0| 61 6c 74 53 6d 61 72 74 | 53 63 72 6f 6c 6c 2c 20 |altSmart|Scroll, |
|000008c0| 28 6c 6f 6e 67 20 2a 29 | 26 73 73 52 65 63 29 3d |(long *)|&ssRec)=|
|000008d0| 3d 6e 6f 45 72 72 0d 09 | 09 09 26 26 20 73 73 52 |=noErr..|..&& ssR|
|000008e0| 65 63 20 26 26 20 73 73 | 52 65 63 2d 3e 73 6d 61 |ec && ss|Rec->sma|
|000008f0| 72 74 53 63 72 6f 6c 6c | 53 69 67 6e 61 74 75 72 |rtScroll|Signatur|
|00000900| 65 3d 3d 6b 67 65 73 74 | 61 6c 74 53 6d 61 72 74 |e==kgest|altSmart|
|00000910| 53 63 72 6f 6c 6c 29 0d | 09 09 09 7b 0d 09 09 09 |Scroll).|...{....|
|00000920| 09 43 61 6c 6c 53 6d 61 | 72 74 53 63 72 6f 6c 6c |.CallSma|rtScroll|
|00000930| 50 72 6f 63 28 73 73 52 | 65 63 2d 3e 64 69 73 70 |Proc(ssR|ec->disp|
|00000940| 61 74 63 68 50 72 6f 63 | 2c 73 65 6c 65 63 74 6f |atchProc|,selecto|
|00000950| 72 2c 72 65 73 75 6c 74 | 2c 74 68 65 43 6f 6e 74 |r,result|,theCont|
|00000960| 72 6f 6c 2c 70 61 72 61 | 6d 31 2c 70 61 72 61 6d |rol,para|m1,param|
|00000970| 32 29 3b 0d 09 09 09 09 | 72 65 74 20 3d 20 6e 6f |2);.....|ret = no|
|00000980| 45 72 72 3b 0d 09 09 09 | 7d 0d 09 09 7d 0d 09 72 |Err;....|}...}..r|
|00000990| 65 74 75 72 6e 20 72 65 | 74 3b 0d 09 7d 0d 09 0d |eturn re|t;..}...|
|000009a0| 2f 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/*******|********|
|000009b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000009c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000009d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000009e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000009f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2f 0d 2f 2a 20 43 61 |********|*/./* Ca|
|00000a00| 6c 6c 20 74 68 69 73 20 | 72 6f 75 74 69 6e 65 20 |ll this |routine |
|00000a10| 74 6f 20 73 65 74 20 74 | 68 65 20 56 69 73 69 62 |to set t|he Visib|
|00000a20| 6c 65 2f 54 6f 74 61 6c | 20 70 72 6f 70 6f 72 74 |le/Total| proport|
|00000a30| 69 6f 6e 20 66 6f 72 20 | 61 20 73 63 72 6f 6c 6c |ion for |a scroll|
|00000a40| 62 61 72 2e 20 2a 2f 0d | 2f 2a 20 20 61 6d 6f 75 |bar. */.|/*  amou|
|00000a50| 6e 74 56 69 73 69 62 6c | 65 20 69 73 20 61 20 33 |ntVisibl|e is a 3|
|00000a60| 32 62 69 74 20 76 61 6c | 75 65 20 72 65 70 72 65 |2bit val|ue repre|
|00000a70| 73 65 6e 74 69 6e 67 20 | 74 68 65 20 73 69 7a 65 |senting |the size|
|00000a80| 20 6f 66 20 74 68 65 20 | 70 6f 72 74 69 6f 6e 20 | of the |portion |
|00000a90| 6f 66 20 74 68 65 20 64 | 6f 63 75 6d 65 6e 74 20 |of the d|ocument |
|00000aa0| 74 68 61 74 20 69 73 20 | 76 69 73 69 62 6c 65 20 |that is |visible |
|00000ab0| 6e 6f 77 2e 20 2a 2f 0d | 2f 2a 20 20 61 6d 6f 75 |now. */.|/*  amou|
|00000ac0| 6e 74 54 6f 74 61 6c 20 | 69 73 20 61 20 33 32 62 |ntTotal |is a 32b|
|00000ad0| 69 74 20 76 61 6c 75 65 | 20 72 65 70 72 65 73 65 |it value| represe|
|00000ae0| 6e 74 69 6e 67 20 74 68 | 65 20 73 69 7a 65 20 6f |nting th|e size o|
|00000af0| 66 20 74 68 65 20 77 68 | 6f 6c 65 20 64 6f 63 75 |f the wh|ole docu|
|00000b00| 6d 65 6e 74 2e 20 2a 2f | 0d 2f 2a 20 20 74 68 65 |ment. */|./*  the|
|00000b10| 73 65 20 74 77 6f 20 70 | 61 72 61 6d 65 74 65 72 |se two p|arameter|
|00000b20| 73 20 6d 75 73 74 20 73 | 68 61 72 65 20 74 68 65 |s must s|hare the|
|00000b30| 20 73 61 6d 65 20 75 6e | 69 74 20 28 70 69 78 65 | same un|it (pixe|
|00000b40| 6c 73 2c 20 6c 69 6e 65 | 73 2c 20 63 68 61 72 61 |ls, line|s, chara|
|00000b50| 63 74 65 72 73 2c 20 66 | 72 61 6d 65 73 2c 20 65 |cters, f|rames, e|
|00000b60| 74 63 29 2e 20 2a 2f 0d | 0d 70 61 73 63 61 6c 20 |tc). */.|.pascal |
|00000b70| 76 6f 69 64 20 53 65 74 | 53 6d 61 72 74 53 63 72 |void Set|SmartScr|
|00000b80| 6f 6c 6c 49 6e 66 6f 20 | 28 43 6f 6e 74 72 6f 6c |ollInfo |(Control|
|00000b90| 52 65 66 20 74 68 65 53 | 63 72 6f 6c 6c 42 61 72 |Ref theS|crollBar|
|00000ba0| 2c 20 6c 6f 6e 67 20 61 | 6d 6f 75 6e 74 56 69 73 |, long a|mountVis|
|00000bb0| 69 62 6c 65 20 2c 20 6c | 6f 6e 67 20 61 6d 6f 75 |ible , l|ong amou|
|00000bc0| 6e 74 54 6f 74 61 6c 29 | 0d 09 7b 0d 09 6c 6f 6e |ntTotal)|..{..lon|
|00000bd0| 67 20 09 64 75 6d 6d 79 | 3b 0d 09 0d 09 28 76 6f |g .dummy|;....(vo|
|00000be0| 69 64 29 5f 5f 53 6d 61 | 72 74 53 63 72 6f 6c 6c |id)__Sma|rtScroll|
|00000bf0| 44 69 73 70 61 74 63 68 | 28 6b 53 65 74 53 6d 61 |Dispatch|(kSetSma|
|00000c00| 72 74 53 63 72 6f 6c 6c | 49 6e 66 6f 2c 26 64 75 |rtScroll|Info,&du|
|00000c10| 6d 6d 79 2c 74 68 65 53 | 63 72 6f 6c 6c 42 61 72 |mmy,theS|crollBar|
|00000c20| 2c 61 6d 6f 75 6e 74 56 | 69 73 69 62 6c 65 2c 61 |,amountV|isible,a|
|00000c30| 6d 6f 75 6e 74 54 6f 74 | 61 6c 29 3b 0d 09 7d 0d |mountTot|al);..}.|
|00000c40| 0d 2f 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |./******|********|
|00000c50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000c60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000c70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000c80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000c90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2f 0d 2f 2a 20 43 |********|**/./* C|
|00000ca0| 61 6c 6c 20 74 68 69 73 | 20 72 6f 75 74 69 6e 65 |all this| routine|
|00000cb0| 20 74 6f 20 73 65 74 20 | 74 68 65 20 56 69 73 69 | to set |the Visi|
|00000cc0| 62 6c 65 2f 54 6f 74 61 | 6c 20 70 72 6f 70 6f 72 |ble/Tota|l propor|
|00000cd0| 74 69 6f 6e 20 66 6f 72 | 20 61 20 73 63 72 6f 6c |tion for| a scrol|
|00000ce0| 6c 62 61 72 2e 20 2a 2f | 0d 2f 2a 20 20 70 72 6f |lbar. */|./*  pro|
|00000cf0| 70 6f 72 74 69 6f 6e 20 | 69 73 20 61 20 46 72 61 |portion |is a Fra|
|00000d00| 63 74 20 76 61 6c 75 65 | 20 28 33 32 62 69 74 29 |ct value| (32bit)|
|00000d10| 20 72 65 70 72 65 73 65 | 6e 74 69 6e 67 20 74 68 | represe|nting th|
|00000d20| 65 20 56 69 73 69 62 6c | 65 2f 54 6f 74 61 6c 20 |e Visibl|e/Total |
|00000d30| 72 61 74 69 6f 20 2a 2f | 0d 2f 2a 20 20 54 68 69 |ratio */|./*  Thi|
|00000d40| 73 20 63 61 6c 6c 20 68 | 61 73 20 74 68 65 20 65 |s call h|as the e|
|00000d50| 78 61 63 74 20 73 61 6d | 65 20 65 66 66 65 63 74 |xact sam|e effect|
|00000d60| 20 61 73 20 53 65 74 53 | 6d 61 72 74 53 63 72 6f | as SetS|martScro|
|00000d70| 6c 6c 49 6e 66 6f 2c 20 | 79 6f 75 20 6d 61 79 20 |llInfo, |you may |
|00000d80| 75 73 65 20 65 69 74 68 | 65 72 20 6f 6e 65 2e 20 |use eith|er one. |
|00000d90| 2a 2f 0d 0d 70 61 73 63 | 61 6c 20 76 6f 69 64 20 |*/..pasc|al void |
|00000da0| 53 65 74 53 6d 61 72 74 | 53 63 72 6f 6c 6c 50 72 |SetSmart|ScrollPr|
|00000db0| 6f 70 20 28 43 6f 6e 74 | 72 6f 6c 48 61 6e 64 6c |op (Cont|rolHandl|
|00000dc0| 65 20 74 68 65 53 63 72 | 6f 6c 6c 42 61 72 2c 20 |e theScr|ollBar, |
|00000dd0| 46 72 61 63 74 20 70 72 | 6f 70 6f 72 74 69 6f 6e |Fract pr|oportion|
|00000de0| 29 0d 2f 2a 0d 43 6f 6d | 6d 65 6e 74 0d 2a 2f 0d |)./*.Com|ment.*/.|
|00000df0| 09 7b 0d 09 6c 6f 6e 67 | 20 09 64 75 6d 6d 79 3b |.{..long| .dummy;|
|00000e00| 0d 09 0d 09 28 76 6f 69 | 64 29 5f 5f 53 6d 61 72 |....(voi|d)__Smar|
|00000e10| 74 53 63 72 6f 6c 6c 44 | 69 73 70 61 74 63 68 28 |tScrollD|ispatch(|
|00000e20| 6b 53 65 74 53 6d 61 72 | 74 53 63 72 6f 6c 6c 50 |kSetSmar|tScrollP|
|00000e30| 72 6f 70 2c 26 64 75 6d | 6d 79 2c 74 68 65 53 63 |rop,&dum|my,theSc|
|00000e40| 72 6f 6c 6c 42 61 72 2c | 28 6c 6f 6e 67 29 70 72 |rollBar,|(long)pr|
|00000e50| 6f 70 6f 72 74 69 6f 6e | 2c 30 29 3b 0d 09 7d 0d |oportion|,0);..}.|
|00000e60| 0d 2f 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |./******|********|
|00000e70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000e80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000e90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ea0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000eb0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2f 0d 2f 2a 20 43 |********|**/./* C|
|00000ec0| 61 6c 6c 20 74 68 69 73 | 20 72 6f 75 74 69 6e 65 |all this| routine|
|00000ed0| 20 74 6f 20 67 65 74 20 | 74 68 65 20 6c 61 73 74 | to get |the last|
|00000ee0| 20 70 72 6f 70 6f 72 74 | 69 6f 6e 20 79 6f 75 20 | proport|ion you |
|00000ef0| 73 74 6f 72 65 64 20 66 | 6f 72 20 74 68 69 73 20 |stored f|or this |
|00000f00| 73 63 72 6f 6c 6c 62 61 | 72 2e 20 2a 2f 0d 2f 2a |scrollba|r. */./*|
|00000f10| 20 74 68 65 20 76 61 6c | 75 65 20 72 65 74 75 72 | the val|ue retur|
|00000f20| 6e 65 64 20 77 69 6c 6c | 20 62 65 20 30 20 69 66 |ned will| be 0 if|
|00000f30| 20 74 68 65 72 65 20 69 | 73 20 61 6e 20 65 72 72 | there i|s an err|
|00000f40| 6f 72 20 28 53 6d 61 72 | 74 20 53 63 72 6f 6c 6c |or (Smar|t Scroll|
|00000f50| 20 6e 6f 74 20 69 6e 73 | 74 61 6c 6c 65 64 2c 20 | not ins|talled, |
|00000f60| 6f 72 20 6e 6f 20 76 61 | 6c 75 65 20 73 74 6f 72 |or no va|lue stor|
|00000f70| 65 64 29 20 20 2a 2f 0d | 0d 70 61 73 63 61 6c 20 |ed)  */.|.pascal |
|00000f80| 46 72 61 63 74 20 47 65 | 74 53 6d 61 72 74 53 63 |Fract Ge|tSmartSc|
|00000f90| 72 6f 6c 6c 50 72 6f 70 | 20 28 43 6f 6e 74 72 6f |rollProp| (Contro|
|00000fa0| 6c 48 61 6e 64 6c 65 20 | 74 68 65 53 63 72 6f 6c |lHandle |theScrol|
|00000fb0| 6c 42 61 72 29 0d 09 7b | 0d 09 46 72 61 63 74 20 |lBar)..{|..Fract |
|00000fc0| 09 72 65 73 75 6c 74 20 | 3d 20 30 4c 3b 0d 09 0d |.result |= 0L;...|
|00000fd0| 09 5f 5f 53 6d 61 72 74 | 53 63 72 6f 6c 6c 44 69 |.__Smart|ScrollDi|
|00000fe0| 73 70 61 74 63 68 28 6b | 47 65 74 53 6d 61 72 74 |spatch(k|GetSmart|
|00000ff0| 53 63 72 6f 6c 6c 50 72 | 6f 70 2c 28 6c 6f 6e 67 |ScrollPr|op,(long|
|00001000| 20 2a 29 26 72 65 73 75 | 6c 74 2c 74 68 65 53 63 | *)&resu|lt,theSc|
|00001010| 72 6f 6c 6c 42 61 72 2c | 30 2c 30 29 3b 0d 09 72 |rollBar,|0,0);..r|
|00001020| 65 74 75 72 6e 20 72 65 | 73 75 6c 74 3b 0d 09 7d |eturn re|sult;..}|
|00001030| 0d 0d 2f 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |../*****|********|
|00001040| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001050| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001060| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001070| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001080| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2f 0d 2f 2a 20 |********|***/./* |
|00001090| 43 61 6c 6c 20 74 68 69 | 73 20 72 6f 75 74 69 6e |Call thi|s routin|
|000010a0| 65 20 62 65 66 6f 72 65 | 20 79 6f 75 72 20 63 6f |e before| your co|
|000010b0| 64 65 20 51 75 69 74 73 | 2c 20 74 6f 20 68 65 6c |de Quits|, to hel|
|000010c0| 70 20 53 6d 61 72 74 53 | 63 72 6f 6c 6c 20 2a 2f |p SmartS|croll */|
|000010d0| 0d 2f 2a 20 66 72 65 65 | 20 74 68 65 20 6d 65 6d |./* free| the mem|
|000010e0| 6f 72 79 20 69 74 20 72 | 65 73 65 72 76 65 64 20 |ory it r|eserved |
|000010f0| 66 6f 72 20 74 68 65 20 | 73 63 72 6f 6c 6c 62 61 |for the |scrollba|
|00001100| 72 73 20 69 6e 20 79 6f | 75 72 20 41 70 70 6c 69 |rs in yo|ur Appli|
|00001110| 63 61 74 69 6f 6e 2e 20 | 2a 2f 0d 0d 70 61 73 63 |cation. |*/..pasc|
|00001120| 61 6c 20 76 6f 69 64 20 | 44 69 73 70 6f 73 65 41 |al void |DisposeA|
|00001130| 6c 6c 53 6d 61 72 74 53 | 63 72 6f 6c 6c 73 20 28 |llSmartS|crolls (|
|00001140| 76 6f 69 64 29 0d 09 7b | 0d 09 6c 6f 6e 67 20 09 |void)..{|..long .|
|00001150| 64 75 6d 6d 79 3b 0d 09 | 0d 09 28 76 6f 69 64 29 |dummy;..|..(void)|
|00001160| 5f 5f 53 6d 61 72 74 53 | 63 72 6f 6c 6c 44 69 73 |__SmartS|crollDis|
|00001170| 70 61 74 63 68 28 6b 44 | 69 73 70 6f 73 65 41 6c |patch(kD|isposeAl|
|00001180| 6c 53 6d 61 72 74 53 63 | 72 6f 6c 6c 73 2c 26 64 |lSmartSc|rolls,&d|
|00001190| 75 6d 6d 79 2c 4e 55 4c | 4c 2c 30 2c 30 29 3b 0d |ummy,NUL|L,0,0);.|
|000011a0| 09 7d 0d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.}......|........|
|000011b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000011f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001200| 00 00 01 00 00 00 01 76 | 00 00 00 76 00 00 00 52 |.......v|...v...R|
|00001210| 6e 72 69 63 68 65 79 2f | 73 33 61 63 6f 6c 6c 2e |nrichey/|s3acoll.|
|00001220| 67 69 66 00 a7 de 1d 32 | 68 74 74 70 3a 2f 2f 6f |gif....2|http://o|
|00001230| 10 53 6d 61 72 74 53 63 | 72 6f 6c 6c 41 50 49 2e |.SmartSc|rollAPI.|
|00001240| 63 6c 02 00 00 00 54 45 | 58 54 43 57 49 45 01 00 |cl....TE|XTCWIE..|
|00001250| 00 00 54 45 58 54 43 57 | 49 45 01 00 00 9c 01 40 |..TEXTCW|IE.....@|
|00001260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001270| 00 00 ae 64 99 36 00 00 | 11 23 00 00 01 c8 73 65 |...d.6..|.#....se|
|00001280| 72 76 65 2e 63 6f 6d 2f | 68 6f 6d 65 70 61 67 65 |rve.com/|homepage|
|00001290| 73 2f 73 6c 69 74 63 68 | 66 69 65 6c 64 2f 6a 62 |s/slitch|field/jb|
|000012a0| 64 61 74 61 2e 67 69 66 | 00 3d dc 1d 32 68 74 74 |data.gif|.=..2htt|
|000012b0| 70 3a 2f 2f 65 6d 70 6f | 72 69 75 6d 2e 74 75 72 |p://empo|rium.tur|
|000012c0| 6e 70 69 6b 65 2e 6e 65 | 74 2f 50 2f 70 73 69 6f |npike.ne|t/P/psio|
|000012d0| 6e 2d 67 6d 62 68 2f 73 | 75 70 70 6f 72 74 2f 6f |n-gmbh/s|upport/o|
|000012e0| 72 67 32 2e 68 74 6d 6c | 00 08 dc 1d 32 68 74 74 |rg2.html|....2htt|
|000012f0| 70 3a 2f 2f 6f 75 72 77 | 6f 72 6c 64 2e 63 6f 6d |p://ourw|orld.com|
|00001300| 00 00 00 1e 00 6c 00 09 | 02 60 02 68 00 6c 00 09 |.....l..|.`.h.l..|
|00001310| 02 60 02 68 00 00 00 00 | 00 00 00 00 00 00 00 00 |.`.h....|........|
|00001320| 00 00 00 00 00 48 00 09 | 4d 6f 6e 61 63 6f 00 00 |.....H..|Monaco..|
|00001330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001340| 00 00 00 00 00 00 00 00 | 00 03 00 04 00 58 00 14 |........|.....X..|
|00001350| 02 68 02 8b 00 58 00 14 | 02 68 02 8b ae 71 c7 a0 |.h...X..|.h...q..|
|00001360| 00 00 01 d2 00 00 01 d2 | 00 00 01 93 01 00 00 00 |........|........|
|00001370| 00 04 00 01 00 01 00 00 | 01 00 00 00 01 76 00 00 |........|.....v..|
|00001380| 00 76 00 00 00 52 02 e9 | 7c 14 29 de 00 00 00 1c |.v...R..||.).....|
|00001390| 00 52 00 01 4d 50 53 52 | 00 01 00 12 4d 57 42 42 |.R..MPSR|....MWBB|
|000013a0| 00 00 00 2a 03 f0 ff ff | 00 00 00 00 00 00 00 00 |...*....|........|
|000013b0| 03 ed ff ff 00 00 00 22 | 00 00 00 00 03 f0 ff ff |......."|........|
|000013c0| 00 00 00 6e 00 00 00 00 | 00 00 00 00 00 00 00 00 |...n....|........|
|000013d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000013f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+