home *** CD-ROM | disk | FTP | other *** search
/ CD Shareware Magazine 1996 December / CD_shareware_12-96.iso / WIN / Programa / AD3DCAL3.ZIP / AD3DCAL.DCU < prev    next >
Borland Delphi Compiled Unit  |  1996-09-04  |  89.7 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was processed as: Borland Delphi Compiled Unit (other/borlandDelphiCompiledUnit).
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert OS/2 Help File (document/os2Help) magic Supported
1% dexvert Borland Delphi Compiled Unit (other/borlandDelphiCompiledUnit) magic Unsupported
1% dexvert Kylix 3 Compiled Unit (other/kylix3CompiledUnit) ext Unsupported
100% file data default
100% TrID Delphi 3 Compiled Unit default
100% detectItEasy Format: OS/2 help file default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 48 53 50 50 d0 66 01 00 | 0b 6e 24 21 00 70 19 45 |HSPP.f..|.n$!.p.E|
|00000010| 3a 5c 57 4f 52 4b 5c 33 | 32 42 49 54 5c 41 44 33 |:\WORK\3|2BIT\AD3|
|00000020| 44 43 41 4c 2e 50 41 53 | 8b 49 f7 20 00 72 0b 41 |DCAL.PAS|.I. .r.A|
|00000030| 44 33 44 43 41 4c 2e 52 | 45 53 00 00 00 00 02 64 |D3DCAL.R|ES.....d|
|00000040| 06 41 64 44 61 74 65 00 | 00 00 00 66 0c 54 41 64 |.AdDate.|...f.TAd|
|00000050| 72 6f 63 6b 44 61 74 65 | 73 8c 36 18 21 67 1a 54 |rockDate|s.6.!g.T|
|00000060| 41 64 72 6f 63 6b 44 61 | 74 65 73 2e 49 73 44 61 |AdrockDa|tes.IsDa|
|00000070| 74 65 49 6e 52 61 6e 67 | 65 26 d1 38 15 67 18 54 |teInRang|e&.8.g.T|
|00000080| 41 64 72 6f 63 6b 44 61 | 74 65 73 2e 49 73 4c 65 |AdrockDa|tes.IsLe|
|00000090| 61 70 59 65 61 72 69 26 | d1 38 15 67 17 54 41 64 |apYeari&|.8.g.TAd|
|000000a0| 72 6f 63 6b 44 61 74 65 | 73 2e 52 65 74 75 72 6e |rockDate|s.Return|
|000000b0| 59 65 61 72 26 d1 38 15 | 67 14 54 41 64 72 6f 63 |Year&.8.|g.TAdroc|
|000000c0| 6b 44 61 74 65 73 2e 41 | 64 64 44 61 79 73 26 d1 |kDates.A|ddDays&.|
|000000d0| 38 15 67 15 54 41 64 72 | 6f 63 6b 44 61 74 65 73 |8.g.TAdr|ockDates|
|000000e0| 2e 41 64 64 57 65 65 6b | 73 26 d1 38 15 67 16 54 |.AddWeek|s&.8.g.T|
|000000f0| 41 64 72 6f 63 6b 44 61 | 74 65 73 2e 41 64 64 4d |AdrockDa|tes.AddM|
|00000100| 6f 6e 74 68 73 26 d1 38 | 15 67 18 54 41 64 72 6f |onths&.8|.g.TAdro|
|00000110| 63 6b 44 61 74 65 73 2e | 41 64 64 51 75 61 72 74 |ckDates.|AddQuart|
|00000120| 65 72 73 26 d1 38 15 67 | 15 54 41 64 72 6f 63 6b |ers&.8.g|.TAdrock|
|00000130| 44 61 74 65 73 2e 41 64 | 64 59 65 61 72 73 26 d1 |Dates.Ad|dYears&.|
|00000140| 38 15 67 19 54 41 64 72 | 6f 63 6b 44 61 74 65 73 |8.g.TAdr|ockDates|
|00000150| 2e 44 61 79 73 49 6e 4d | 6f 6e 74 68 69 26 d1 38 |.DaysInM|onthi&.8|
|00000160| 15 67 18 54 41 64 72 6f | 63 6b 44 61 74 65 73 2e |.g.TAdro|ckDates.|
|00000170| 44 61 79 73 49 6e 4d 6f | 6e 74 68 26 d1 38 15 67 |DaysInMo|nth&.8.g|
|00000180| 1d 54 41 64 72 6f 63 6b | 44 61 74 65 73 2e 44 61 |.TAdrock|Dates.Da|
|00000190| 79 73 4c 65 66 74 49 6e | 4d 6f 6e 74 68 69 26 d1 |ysLeftIn|Monthi&.|
|000001a0| 38 15 67 1c 54 41 64 72 | 6f 63 6b 44 61 74 65 73 |8.g.TAdr|ockDates|
|000001b0| 2e 44 61 79 73 4c 65 66 | 74 49 6e 4d 6f 6e 74 68 |.DaysLef|tInMonth|
|000001c0| 26 d1 38 15 67 1c 54 41 | 64 72 6f 63 6b 44 61 74 |&.8.g.TA|drockDat|
|000001d0| 65 73 2e 44 61 79 73 4c | 65 66 74 49 6e 59 65 61 |es.DaysL|eftInYea|
|000001e0| 72 69 26 d1 38 15 67 1b | 54 41 64 72 6f 63 6b 44 |ri&.8.g.|TAdrockD|
|000001f0| 61 74 65 73 2e 44 61 79 | 73 4c 65 66 74 49 6e 59 |ates.Day|sLeftInY|
|00000200| 65 61 72 26 d1 38 15 67 | 18 54 41 64 72 6f 63 6b |ear&.8.g|.TAdrock|
|00000210| 44 61 74 65 73 2e 44 61 | 79 73 49 6e 59 65 61 72 |Dates.Da|ysInYear|
|00000220| 69 26 d1 38 15 67 17 54 | 41 64 72 6f 63 6b 44 61 |i&.8.g.T|AdrockDa|
|00000230| 74 65 73 2e 44 61 79 73 | 49 6e 59 65 61 72 26 d1 |tes.Days|InYear&.|
|00000240| 38 15 67 1d 54 41 64 72 | 6f 63 6b 44 61 74 65 73 |8.g.TAdr|ockDates|
|00000250| 2e 52 65 74 75 72 6e 44 | 61 79 4f 66 4d 6f 6e 74 |.ReturnD|ayOfMont|
|00000260| 68 26 d1 38 15 67 18 54 | 41 64 72 6f 63 6b 44 61 |h&.8.g.T|AdrockDa|
|00000270| 74 65 73 2e 52 65 74 75 | 72 6e 4d 6f 6e 74 68 26 |tes.Retu|rnMonth&|
|00000280| d1 38 15 67 1a 54 41 64 | 72 6f 63 6b 44 61 74 65 |.8.g.TAd|rockDate|
|00000290| 73 2e 52 65 74 75 72 6e | 51 75 61 72 74 65 72 26 |s.Return|Quarter&|
|000002a0| d1 38 15 67 1a 54 41 64 | 72 6f 63 6b 44 61 74 65 |.8.g.TAd|rockDate|
|000002b0| 73 2e 52 65 74 75 72 6e | 43 65 6e 74 75 72 79 26 |s.Return|Century&|
|000002c0| d1 38 15 67 18 54 41 64 | 72 6f 63 6b 44 61 74 65 |.8.g.TAd|rockDate|
|000002d0| 73 2e 49 73 56 61 6c 69 | 64 44 61 74 65 26 d1 38 |s.IsVali|dDate&.8|
|000002e0| 15 67 16 54 41 64 72 6f | 63 6b 44 61 74 65 73 2e |.g.TAdro|ckDates.|
|000002f0| 44 61 74 65 54 6f 49 6e | 74 26 d1 38 15 67 16 54 |DateToIn|t&.8.g.T|
|00000300| 41 64 72 6f 63 6b 44 61 | 74 65 73 2e 49 6e 74 54 |AdrockDa|tes.IntT|
|00000310| 6f 44 61 74 65 26 d1 38 | 15 67 23 54 41 64 72 6f |oDate&.8|.g#TAdro|
|00000320| 63 6b 44 61 74 65 73 2e | 52 65 74 75 72 6e 44 61 |ckDates.|ReturnDa|
|00000330| 79 73 42 65 74 77 65 65 | 6e 44 61 74 65 73 26 d1 |ysBetwee|nDates&.|
|00000340| 38 15 67 24 54 41 64 72 | 6f 63 6b 44 61 74 65 73 |8.g$TAdr|ockDates|
|00000350| 2e 52 65 74 75 72 6e 57 | 65 65 6b 73 42 65 74 77 |.ReturnW|eeksBetw|
|00000360| 65 65 6e 44 61 74 65 73 | 26 d1 38 15 67 2f 54 41 |eenDates|&.8.g/TA|
|00000370| 64 72 6f 63 6b 44 61 74 | 65 73 2e 52 65 74 75 72 |drockDat|es.Retur|
|00000380| 6e 42 6f 75 6e 64 61 72 | 79 51 75 61 72 74 65 72 |nBoundar|yQuarter|
|00000390| 73 42 65 74 77 65 65 6e | 44 61 74 65 73 26 d1 38 |sBetween|Dates&.8|
|000003a0| 15 67 2c 54 41 64 72 6f | 63 6b 44 61 74 65 73 2e |.g,TAdro|ckDates.|
|000003b0| 52 65 74 75 72 6e 42 6f | 75 6e 64 61 72 79 59 65 |ReturnBo|undaryYe|
|000003c0| 61 72 73 42 65 74 77 65 | 65 6e 44 61 74 65 73 26 |arsBetwe|enDates&|
|000003d0| d1 38 15 67 2d 54 41 64 | 72 6f 63 6b 44 61 74 65 |.8.g-TAd|rockDate|
|000003e0| 73 2e 52 65 74 75 72 6e | 42 6f 75 6e 64 61 72 79 |s.Return|Boundary|
|000003f0| 4d 6f 6e 74 68 73 42 65 | 74 77 65 65 6e 44 61 74 |MonthsBe|tweenDat|
|00000400| 65 73 26 d1 38 15 67 2c | 54 41 64 72 6f 63 6b 44 |es&.8.g,|TAdrockD|
|00000410| 61 74 65 73 2e 52 65 74 | 75 72 6e 42 6f 75 6e 64 |ates.Ret|urnBound|
|00000420| 61 72 79 57 65 65 6b 73 | 42 65 74 77 65 65 6e 44 |aryWeeks|BetweenD|
|00000430| 61 74 65 73 26 d1 38 15 | 67 25 54 41 64 72 6f 63 |ates&.8.|g%TAdroc|
|00000440| 6b 44 61 74 65 73 2e 52 | 65 74 75 72 6e 4d 6f 6e |kDates.R|eturnMon|
|00000450| 74 68 73 42 65 74 77 65 | 65 6e 44 61 74 65 73 26 |thsBetwe|enDates&|
|00000460| d1 38 15 67 27 54 41 64 | 72 6f 63 6b 44 61 74 65 |.8.g'TAd|rockDate|
|00000470| 73 2e 52 65 74 75 72 6e | 51 75 61 72 74 65 72 73 |s.Return|Quarters|
|00000480| 42 65 74 77 65 65 6e 44 | 61 74 65 73 26 d1 38 15 |BetweenD|ates&.8.|
|00000490| 67 24 54 41 64 72 6f 63 | 6b 44 61 74 65 73 2e 52 |g$TAdroc|kDates.R|
|000004a0| 65 74 75 72 6e 59 65 61 | 72 73 42 65 74 77 65 65 |eturnYea|rsBetwee|
|000004b0| 6e 44 61 74 65 73 26 d1 | 38 15 67 20 54 41 64 72 |nDates&.|8.g TAdr|
|000004c0| 6f 63 6b 44 61 74 65 73 | 2e 41 72 65 44 61 74 65 |ockDates|.AreDate|
|000004d0| 73 49 6e 53 61 6d 65 4d | 6f 6e 74 68 26 d1 38 15 |sInSameM|onth&.8.|
|000004e0| 67 1f 54 41 64 72 6f 63 | 6b 44 61 74 65 73 2e 41 |g.TAdroc|kDates.A|
|000004f0| 72 65 44 61 74 65 73 49 | 6e 53 61 6d 65 59 65 61 |reDatesI|nSameYea|
|00000500| 72 26 d1 38 15 67 27 54 | 41 64 72 6f 63 6b 44 61 |r&.8.g'T|AdrockDa|
|00000510| 74 65 73 2e 41 72 65 44 | 61 74 65 73 49 6e 53 61 |tes.AreD|atesInSa|
|00000520| 6d 65 4d 6f 6e 74 68 41 | 6e 64 59 65 61 72 26 d1 |meMonthA|ndYear&.|
|00000530| 38 15 67 21 54 41 64 72 | 6f 63 6b 44 61 74 65 73 |8.g!TAdr|ockDates|
|00000540| 2e 52 65 74 75 72 6e 46 | 69 72 73 74 4f 66 54 68 |.ReturnF|irstOfTh|
|00000550| 65 57 65 65 6b 26 d1 38 | 15 67 20 54 41 64 72 6f |eWeek&.8|.g TAdro|
|00000560| 63 6b 44 61 74 65 73 2e | 52 65 74 75 72 6e 4c 61 |ckDates.|ReturnLa|
|00000570| 73 74 4f 66 54 68 65 57 | 65 65 6b 26 d1 38 15 67 |stOfTheW|eek&.8.g|
|00000580| 22 54 41 64 72 6f 63 6b | 44 61 74 65 73 2e 52 65 |"TAdrock|Dates.Re|
|00000590| 74 75 72 6e 46 69 72 73 | 74 4f 66 54 68 65 4d 6f |turnFirs|tOfTheMo|
|000005a0| 6e 74 68 26 d1 38 15 67 | 21 54 41 64 72 6f 63 6b |nth&.8.g|!TAdrock|
|000005b0| 44 61 74 65 73 2e 52 65 | 74 75 72 6e 4c 61 73 74 |Dates.Re|turnLast|
|000005c0| 4f 66 54 68 65 4d 6f 6e | 74 68 26 d1 38 15 67 21 |OfTheMon|th&.8.g!|
|000005d0| 54 41 64 72 6f 63 6b 44 | 61 74 65 73 2e 52 65 74 |TAdrockD|ates.Ret|
|000005e0| 75 72 6e 46 69 72 73 74 | 4f 66 54 68 65 59 65 61 |urnFirst|OfTheYea|
|000005f0| 72 26 d1 38 15 67 20 54 | 41 64 72 6f 63 6b 44 61 |r&.8.g T|AdrockDa|
|00000600| 74 65 73 2e 52 65 74 75 | 72 6e 4c 61 73 74 4f 66 |tes.Retu|rnLastOf|
|00000610| 54 68 65 59 65 61 72 26 | d1 38 15 67 22 54 41 64 |TheYear&|.8.g"TAd|
|00000620| 72 6f 63 6b 44 61 74 65 | 73 2e 52 65 74 75 72 6e |rockDate|s.Return|
|00000630| 46 69 72 73 74 4f 66 4c | 61 73 74 57 65 65 6b 26 |FirstOfL|astWeek&|
|00000640| d1 38 15 67 21 54 41 64 | 72 6f 63 6b 44 61 74 65 |.8.g!TAd|rockDate|
|00000650| 73 2e 52 65 74 75 72 6e | 4c 61 73 74 4f 66 4c 61 |s.Return|LastOfLa|
|00000660| 73 74 57 65 65 6b 26 d1 | 38 15 67 23 54 41 64 72 |stWeek&.|8.g#TAdr|
|00000670| 6f 63 6b 44 61 74 65 73 | 2e 52 65 74 75 72 6e 46 |ockDates|.ReturnF|
|00000680| 69 72 73 74 4f 66 4c 61 | 73 74 4d 6f 6e 74 68 26 |irstOfLa|stMonth&|
|00000690| d1 38 15 67 22 54 41 64 | 72 6f 63 6b 44 61 74 65 |.8.g"TAd|rockDate|
|000006a0| 73 2e 52 65 74 75 72 6e | 4c 61 73 74 4f 66 4c 61 |s.Return|LastOfLa|
|000006b0| 73 74 4d 6f 6e 74 68 26 | d1 38 15 67 22 54 41 64 |stMonth&|.8.g"TAd|
|000006c0| 72 6f 63 6b 44 61 74 65 | 73 2e 52 65 74 75 72 6e |rockDate|s.Return|
|000006d0| 46 69 72 73 74 4f 66 4c | 61 73 74 59 65 61 72 26 |FirstOfL|astYear&|
|000006e0| d1 38 15 67 21 54 41 64 | 72 6f 63 6b 44 61 74 65 |.8.g!TAd|rockDate|
|000006f0| 73 2e 52 65 74 75 72 6e | 4c 61 73 74 4f 66 4c 61 |s.Return|LastOfLa|
|00000700| 73 74 59 65 61 72 26 d1 | 38 15 67 14 54 41 64 72 |stYear&.|8.g.TAdr|
|00000710| 6f 63 6b 44 61 74 65 73 | 2e 41 64 64 44 61 74 65 |ockDates|.AddDate|
|00000720| 26 d1 38 15 67 15 54 41 | 64 72 6f 63 6b 44 61 74 |&.8.g.TA|drockDat|
|00000730| 65 73 2e 44 61 74 65 44 | 69 66 66 26 d1 38 15 67 |es.DateD|iff&.8.g|
|00000740| 1d 54 41 64 72 6f 63 6b | 44 61 74 65 73 2e 52 65 |.TAdrock|Dates.Re|
|00000750| 74 75 72 6e 50 65 72 73 | 6f 6e 73 41 67 65 26 d1 |turnPers|onsAge&.|
|00000760| 38 15 67 18 54 41 64 72 | 6f 63 6b 44 61 74 65 73 |8.g.TAdr|ockDates|
|00000770| 2e 52 65 74 75 72 6e 44 | 61 79 54 68 26 d1 38 15 |.ReturnD|ayTh&.8.|
|00000780| 67 19 54 41 64 72 6f 63 | 6b 44 61 74 65 73 2e 52 |g.TAdroc|kDates.R|
|00000790| 65 74 75 72 6e 44 61 79 | 54 68 69 26 d1 38 15 67 |eturnDay|Thi&.8.g|
|000007a0| 1a 54 41 64 72 6f 63 6b | 44 61 74 65 73 2e 52 65 |.TAdrock|Dates.Re|
|000007b0| 74 75 72 6e 44 61 79 73 | 41 67 6f 26 d1 38 15 67 |turnDays|Ago&.8.g|
|000007c0| 1b 54 41 64 72 6f 63 6b | 44 61 74 65 73 2e 52 65 |.TAdrock|Dates.Re|
|000007d0| 74 75 72 6e 57 65 65 6b | 73 41 67 6f 26 d1 38 15 |turnWeek|sAgo&.8.|
|000007e0| 67 1c 54 41 64 72 6f 63 | 6b 44 61 74 65 73 2e 52 |g.TAdroc|kDates.R|
|000007f0| 65 74 75 72 6e 4d 6f 6e | 74 68 73 41 67 6f 26 d1 |eturnMon|thsAgo&.|
|00000800| 38 15 67 1b 54 41 64 72 | 6f 63 6b 44 61 74 65 73 |8.g.TAdr|ockDates|
|00000810| 2e 52 65 74 75 72 6e 59 | 65 61 72 73 41 67 6f 26 |.ReturnY|earsAgo&|
|00000820| d1 38 15 67 1e 54 41 64 | 72 6f 63 6b 44 61 74 65 |.8.g.TAd|rockDate|
|00000830| 73 2e 52 65 74 75 72 6e | 51 75 61 72 74 65 72 73 |s.Return|Quarters|
|00000840| 41 67 6f 26 d1 38 15 67 | 20 54 41 64 72 6f 63 6b |Ago&.8.g| TAdrock|
|00000850| 44 61 74 65 73 2e 52 65 | 74 75 72 6e 44 61 79 73 |Dates.Re|turnDays|
|00000860| 49 6e 74 68 65 50 61 73 | 74 26 d1 38 15 67 21 54 |InthePas|t&.8.g!T|
|00000870| 41 64 72 6f 63 6b 44 61 | 74 65 73 2e 52 65 74 75 |AdrockDa|tes.Retu|
|00000880| 72 6e 57 65 65 6b 73 49 | 6e 74 68 65 50 61 73 74 |rnWeeksI|nthePast|
|00000890| 26 d1 38 15 67 22 54 41 | 64 72 6f 63 6b 44 61 74 |&.8.g"TA|drockDat|
|000008a0| 65 73 2e 52 65 74 75 72 | 6e 4d 6f 6e 74 68 73 49 |es.Retur|nMonthsI|
|000008b0| 6e 74 68 65 50 61 73 74 | 26 d1 38 15 67 24 54 41 |nthePast|&.8.g$TA|
|000008c0| 64 72 6f 63 6b 44 61 74 | 65 73 2e 52 65 74 75 72 |drockDat|es.Retur|
|000008d0| 6e 51 75 61 72 74 65 72 | 73 49 6e 74 68 65 50 61 |nQuarter|sInthePa|
|000008e0| 73 74 26 d1 38 15 67 21 | 54 41 64 72 6f 63 6b 44 |st&.8.g!|TAdrockD|
|000008f0| 61 74 65 73 2e 52 65 74 | 75 72 6e 59 65 61 72 73 |ates.Ret|urnYears|
|00000900| 49 6e 74 68 65 50 61 73 | 74 26 d1 38 15 67 17 54 |InthePas|t&.8.g.T|
|00000910| 41 64 72 6f 63 6b 44 61 | 74 65 73 2e 46 6f 72 6d |AdrockDa|tes.Form|
|00000920| 61 74 44 61 74 65 26 d1 | 38 15 63 64 08 65 78 74 |atDate&.|8.cd.ext|
|00000930| 43 74 72 6c 73 00 00 00 | 00 66 0b 54 50 61 6e 65 |Ctrls...|.f.TPane|
|00000940| 6c 42 65 76 65 6c f7 20 | 88 40 67 08 62 76 52 61 |lBevel. |.@g.bvRa|
|00000950| 69 73 65 64 ec 58 a4 7a | 67 09 62 76 4c 6f 77 65 |ised.X.z|g.bvLowe|
|00000960| 72 65 64 eb 58 a4 7a 67 | 06 62 76 4e 6f 6e 65 ea |red.X.zg|.bvNone.|
|00000970| 58 a4 7a 67 07 46 72 61 | 6d 65 33 44 44 2e 50 b9 |X.zg.Fra|me3DD.P.|
|00000980| 63 64 08 53 74 64 43 74 | 72 6c 73 00 00 00 00 66 |cd.StdCt|rls....f|
|00000990| 09 54 43 6f 6d 62 6f 42 | 6f 78 fa 98 db 5e 67 0a |.TComboB|ox...^g.|
|000009a0| 2e 54 43 6f 6d 62 6f 42 | 6f 78 54 0a fe 03 67 16 |.TComboB|oxT...g.|
|000009b0| 54 43 75 73 74 6f 6d 43 | 6f 6d 62 6f 42 6f 78 2e |TCustomC|omboBox.|
|000009c0| 43 72 65 61 74 65 26 d1 | 38 15 66 0e 54 43 6f 6d |Create&.|8.f.TCom|
|000009d0| 62 6f 42 6f 78 53 74 79 | 6c 65 21 96 b5 76 67 0e |boBoxSty|le!..vg.|
|000009e0| 63 73 44 72 6f 70 44 6f | 77 6e 4c 69 73 74 16 ce |csDropDo|wnList..|
|000009f0| d1 b0 67 1c 54 43 75 73 | 74 6f 6d 43 6f 6d 62 6f |..g.TCus|tomCombo|
|00000a00| 42 6f 78 2e 53 65 74 49 | 74 65 6d 49 6e 64 65 78 |Box.SetI|temIndex|
|00000a10| 26 d1 38 15 67 1c 54 43 | 75 73 74 6f 6d 43 6f 6d |&.8.g.TC|ustomCom|
|00000a20| 62 6f 42 6f 78 2e 47 65 | 74 49 74 65 6d 49 6e 64 |boBox.Ge|tItemInd|
|00000a30| 65 78 26 d1 38 15 66 06 | 54 4c 61 62 65 6c 99 07 |ex&.8.f.|TLabel..|
|00000a40| 5e fa 67 07 2e 54 4c 61 | 62 65 6c f3 78 80 9f 67 |^.g..TLa|bel.x..g|
|00000a50| 13 54 43 75 73 74 6f 6d | 4c 61 62 65 6c 2e 43 72 |.TCustom|Label.Cr|
|00000a60| 65 61 74 65 26 d1 38 15 | 67 18 54 43 75 73 74 6f |eate&.8.|g.TCusto|
|00000a70| 6d 4c 61 62 65 6c 2e 53 | 65 74 57 6f 72 64 57 72 |mLabel.S|etWordWr|
|00000a80| 61 70 26 d1 38 15 67 19 | 54 43 75 73 74 6f 6d 4c |ap&.8.g.|TCustomL|
|00000a90| 61 62 65 6c 2e 53 65 74 | 41 6c 69 67 6e 6d 65 6e |abel.Set|Alignmen|
|00000aa0| 74 26 d1 38 15 63 64 07 | 44 69 61 6c 6f 67 73 00 |t&.8.cd.|Dialogs.|
|00000ab0| 00 00 00 63 64 05 46 6f | 72 6d 73 00 00 00 00 66 |...cd.Fo|rms....f|
|00000ac0| 0c 54 42 6f 72 64 65 72 | 53 74 79 6c 65 52 1c f5 |.TBorder|StyleR..|
|00000ad0| ab 66 05 54 46 6f 72 6d | 74 77 88 8d 66 10 54 46 |.f.TForm|tw..f.TF|
|00000ae0| 6f 72 6d 42 6f 72 64 65 | 72 53 74 79 6c 65 11 03 |ormBorde|rStyle..|
|00000af0| 8e c0 67 08 62 73 53 69 | 6e 67 6c 65 05 3b aa fa |..g.bsSi|ngle.;..|
|00000b00| 67 06 53 63 72 65 65 6e | ee 0d f5 57 67 12 54 53 |g.Screen|...Wg.TS|
|00000b10| 63 72 65 65 6e 2e 53 65 | 74 43 75 72 73 6f 72 73 |creen.Se|tCursors|
|00000b20| 26 d1 38 15 67 06 62 73 | 4e 6f 6e 65 04 3b aa fa |&.8.g.bs|None.;..|
|00000b30| 67 11 54 53 63 72 65 65 | 6e 2e 53 65 74 43 75 72 |g.TScree|n.SetCur|
|00000b40| 73 6f 72 26 d1 38 15 67 | 06 2e 54 46 6f 72 6d ce |sor&.8.g|..TForm.|
|00000b50| e8 aa 32 67 0c 54 46 6f | 72 6d 2e 43 72 65 61 74 |..2g.TFo|rm.Creat|
|00000b60| 65 26 d1 38 15 67 0b 41 | 70 70 6c 69 63 61 74 69 |e&.8.g.A|pplicati|
|00000b70| 6f 6e 6f 37 28 bc 67 14 | 54 46 6f 72 6d 2e 53 65 |ono7(.g.|TForm.Se|
|00000b80| 74 42 6f 72 64 65 72 53 | 74 79 6c 65 26 d1 38 15 |tBorderS|tyle&.8.|
|00000b90| 67 08 62 73 44 69 61 6c | 6f 67 07 3b aa fa 67 14 |g.bsDial|og.;..g.|
|00000ba0| 54 46 6f 72 6d 2e 53 65 | 74 42 6f 72 64 65 72 49 |TForm.Se|tBorderI|
|00000bb0| 63 6f 6e 73 26 d1 38 15 | 67 11 54 46 6f 72 6d 2e |cons&.8.|g.TForm.|
|00000bc0| 53 65 74 50 6f 73 69 74 | 69 6f 6e 26 d1 38 15 66 |SetPosit|ion&.8.f|
|00000bd0| 09 54 50 6f 73 69 74 69 | 6f 6e fc 2c 3e 1b 67 0e |.TPositi|on.,>.g.|
|00000be0| 70 6f 53 63 72 65 65 6e | 43 65 6e 74 65 72 f3 64 |poScreen|Center.d|
|00000bf0| 5a 55 67 0f 54 46 6f 72 | 6d 2e 53 68 6f 77 4d 6f |ZUg.TFor|m.ShowMo|
|00000c00| 64 61 6c 26 d1 38 15 63 | 64 07 42 75 74 74 6f 6e |dal&.8.c|d.Button|
|00000c10| 73 00 00 00 00 66 0c 54 | 53 70 65 65 64 42 75 74 |s....f.T|SpeedBut|
|00000c20| 74 6f 6e 70 d8 7b 49 67 | 0d 2e 54 53 70 65 65 64 |tonp.{Ig|..TSpeed|
|00000c30| 42 75 74 74 6f 6e ca 49 | 9e ee 67 14 54 53 70 65 |Button.I|..g.TSpe|
|00000c40| 65 64 42 75 74 74 6f 6e | 2e 44 65 73 74 72 6f 79 |edButton|.Destroy|
|00000c50| 26 d1 38 15 67 13 54 53 | 70 65 65 64 42 75 74 74 |&.8.g.TS|peedButt|
|00000c60| 6f 6e 2e 4c 6f 61 64 65 | 64 26 d1 38 15 67 13 54 |on.Loade|d&.8.g.T|
|00000c70| 53 70 65 65 64 42 75 74 | 74 6f 6e 2e 43 72 65 61 |SpeedBut|ton.Crea|
|00000c80| 74 65 26 d1 38 15 67 12 | 54 53 70 65 65 64 42 75 |te&.8.g.|TSpeedBu|
|00000c90| 74 74 6f 6e 2e 50 61 69 | 6e 74 26 d1 38 15 67 19 |tton.Pai|nt&.8.g.|
|00000ca0| 54 53 70 65 65 64 42 75 | 74 74 6f 6e 2e 53 65 74 |TSpeedBu|tton.Set|
|00000cb0| 4e 75 6d 47 6c 79 70 68 | 73 26 d1 38 15 67 16 54 |NumGlyph|s&.8.g.T|
|00000cc0| 53 70 65 65 64 42 75 74 | 74 6f 6e 2e 53 65 74 4c |SpeedBut|ton.SetL|
|00000cd0| 61 79 6f 75 74 26 d1 38 | 15 66 0d 54 42 75 74 74 |ayout&.8|.f.TButt|
|00000ce0| 6f 6e 4c 61 79 6f 75 74 | 5a e8 b3 2d 67 0c 62 6c |onLayout|Z..-g.bl|
|00000cf0| 47 6c 79 70 68 52 69 67 | 68 74 4e 20 d0 67 67 15 |GlyphRig|htN .gg.|
|00000d00| 54 53 70 65 65 64 42 75 | 74 74 6f 6e 2e 47 65 74 |TSpeedBu|tton.Get|
|00000d10| 47 6c 79 70 68 26 d1 38 | 15 63 64 08 43 6f 6e 74 |Glyph&.8|.cd.Cont|
|00000d20| 72 6f 6c 73 00 00 00 00 | 67 17 54 43 6f 6e 74 72 |rols....|g.TContr|
|00000d30| 6f 6c 2e 44 65 66 61 75 | 6c 74 48 61 6e 64 6c 65 |ol.Defau|ltHandle|
|00000d40| 72 26 d1 38 15 67 19 54 | 43 6f 6e 74 72 6f 6c 2e |r&.8.g.T|Control.|
|00000d50| 44 65 66 69 6e 65 50 72 | 6f 70 65 72 74 69 65 73 |DefinePr|operties|
|00000d60| 26 d1 38 15 67 15 54 43 | 6f 6e 74 72 6f 6c 2e 4e |&.8.g.TC|ontrol.N|
|00000d70| 6f 74 69 66 69 63 61 74 | 69 6f 6e 26 d1 38 15 67 |otificat|ion&.8.g|
|00000d80| 12 54 43 6f 6e 74 72 6f | 6c 2e 52 65 61 64 53 74 |.TContro|l.ReadSt|
|00000d90| 61 74 65 26 d1 38 15 67 | 10 54 43 6f 6e 74 72 6f |ate&.8.g|.TContro|
|00000da0| 6c 2e 53 65 74 4e 61 6d | 65 26 d1 38 15 67 18 54 |l.SetNam|e&.8.g.T|
|00000db0| 43 6f 6e 74 72 6f 6c 2e | 47 65 74 43 6c 69 65 6e |Control.|GetClien|
|00000dc0| 74 4f 72 69 67 69 6e 26 | d1 38 15 67 16 54 43 6f |tOrigin&|.8.g.TCo|
|00000dd0| 6e 74 72 6f 6c 2e 47 65 | 74 43 6c 69 65 6e 74 52 |ntrol.Ge|tClientR|
|00000de0| 65 63 74 26 d1 38 15 67 | 19 54 43 6f 6e 74 72 6f |ect&.8.g|.TContro|
|00000df0| 6c 2e 47 65 74 44 65 76 | 69 63 65 43 6f 6e 74 65 |l.GetDev|iceConte|
|00000e00| 78 74 26 d1 38 15 67 16 | 54 43 6f 6e 74 72 6f 6c |xt&.8.g.|TControl|
|00000e10| 2e 47 65 74 44 72 61 67 | 49 6d 61 67 65 73 26 d1 |.GetDrag|Images&.|
|00000e20| 38 15 67 14 54 43 6f 6e | 74 72 6f 6c 2e 53 65 74 |8.g.TCon|trol.Set|
|00000e30| 44 72 61 67 4d 6f 64 65 | 26 d1 38 15 67 12 54 43 |DragMode|&.8.g.TC|
|00000e40| 6f 6e 74 72 6f 6c 2e 53 | 65 74 50 61 72 65 6e 74 |ontrol.S|etParent|
|00000e50| 26 d1 38 15 67 10 54 43 | 6f 6e 74 72 6f 6c 2e 57 |&.8.g.TC|ontrol.W|
|00000e60| 6e 64 50 72 6f 63 26 d1 | 38 15 67 13 54 43 6f 6e |ndProc&.|8.g.TCon|
|00000e70| 74 72 6f 6c 2e 49 6e 76 | 61 6c 69 64 61 74 65 26 |trol.Inv|alidate&|
|00000e80| d1 38 15 67 10 54 43 6f | 6e 74 72 6f 6c 2e 52 65 |.8.g.TCo|ntrol.Re|
|00000e90| 70 61 69 6e 74 26 d1 38 | 15 67 12 54 43 6f 6e 74 |paint&.8|.g.TCont|
|00000ea0| 72 6f 6c 2e 53 65 74 42 | 6f 75 6e 64 73 26 d1 38 |rol.SetB|ounds&.8|
|00000eb0| 15 67 0f 54 43 6f 6e 74 | 72 6f 6c 2e 55 70 64 61 |.g.TCont|rol.Upda|
|00000ec0| 74 65 26 d1 38 15 67 11 | 54 43 6f 6e 74 72 6f 6c |te&.8.g.|TControl|
|00000ed0| 2e 53 65 74 43 6f 6c 6f | 72 26 d1 38 15 67 16 54 |.SetColo|r&.8.g.T|
|00000ee0| 43 6f 6e 74 72 6f 6c 2e | 49 73 43 6f 6c 6f 72 53 |Control.|IsColorS|
|00000ef0| 74 6f 72 65 64 26 d1 38 | 15 66 0e 54 43 75 73 74 |tored&.8|.f.TCust|
|00000f00| 6f 6d 43 6f 6e 74 72 6f | 6c cb 17 e3 1f 66 0b 54 |omContro|l....f.T|
|00000f10| 57 69 6e 43 6f 6e 74 72 | 6f 6c ac b1 c3 ca 66 0c |WinContr|ol....f.|
|00000f20| 54 4d 6f 75 73 65 42 75 | 74 74 6f 6e 6e d6 58 72 |TMouseBu|ttonn.Xr|
|00000f30| 66 07 54 43 75 72 73 6f | 72 c8 40 89 1d 67 0f 2e |f.TCurso|r.@..g..|
|00000f40| 54 43 75 73 74 6f 6d 43 | 6f 6e 74 72 6f 6c 25 89 |TCustomC|ontrol%.|
|00000f50| 05 c5 67 1a 54 57 69 6e | 43 6f 6e 74 72 6f 6c 2e |..g.TWin|Control.|
|00000f60| 44 65 66 61 75 6c 74 48 | 61 6e 64 6c 65 72 26 d1 |DefaultH|andler&.|
|00000f70| 38 15 67 15 54 57 69 6e | 43 6f 6e 74 72 6f 6c 2e |8.g.TWin|Control.|
|00000f80| 52 65 61 64 53 74 61 74 | 65 26 d1 38 15 67 1b 54 |ReadStat|e&.8.g.T|
|00000f90| 57 69 6e 43 6f 6e 74 72 | 6f 6c 2e 47 65 74 43 6c |WinContr|ol.GetCl|
|00000fa0| 69 65 6e 74 4f 72 69 67 | 69 6e 26 d1 38 15 67 19 |ientOrig|in&.8.g.|
|00000fb0| 54 57 69 6e 43 6f 6e 74 | 72 6f 6c 2e 47 65 74 43 |TWinCont|rol.GetC|
|00000fc0| 6c 69 65 6e 74 52 65 63 | 74 26 d1 38 15 67 1c 54 |lientRec|t&.8.g.T|
|00000fd0| 57 69 6e 43 6f 6e 74 72 | 6f 6c 2e 47 65 74 44 65 |WinContr|ol.GetDe|
|00000fe0| 76 69 63 65 43 6f 6e 74 | 65 78 74 26 d1 38 15 67 |viceCont|ext&.8.g|
|00000ff0| 13 54 57 69 6e 43 6f 6e | 74 72 6f 6c 2e 57 6e 64 |.TWinCon|trol.Wnd|
|00001000| 50 72 6f 63 26 d1 38 15 | 67 16 54 57 69 6e 43 6f |Proc&.8.|g.TWinCo|
|00001010| 6e 74 72 6f 6c 2e 49 6e | 76 61 6c 69 64 61 74 65 |ntrol.In|validate|
|00001020| 26 d1 38 15 67 13 54 57 | 69 6e 43 6f 6e 74 72 6f |&.8.g.TW|inContro|
|00001030| 6c 2e 52 65 70 61 69 6e | 74 26 d1 38 15 67 15 54 |l.Repain|t&.8.g.T|
|00001040| 57 69 6e 43 6f 6e 74 72 | 6f 6c 2e 53 65 74 42 6f |WinContr|ol.SetBo|
|00001050| 75 6e 64 73 26 d1 38 15 | 67 12 54 57 69 6e 43 6f |unds&.8.|g.TWinCo|
|00001060| 6e 74 72 6f 6c 2e 55 70 | 64 61 74 65 26 d1 38 15 |ntrol.Up|date&.8.|
|00001070| 67 19 54 57 69 6e 43 6f | 6e 74 72 6f 6c 2e 41 6c |g.TWinCo|ntrol.Al|
|00001080| 69 67 6e 43 6f 6e 74 72 | 6f 6c 73 26 d1 38 15 67 |ignContr|ols&.8.g|
|00001090| 18 54 57 69 6e 43 6f 6e | 74 72 6f 6c 2e 43 72 65 |.TWinCon|trol.Cre|
|000010a0| 61 74 65 48 61 6e 64 6c | 65 26 d1 38 15 67 18 54 |ateHandl|e&.8.g.T|
|000010b0| 57 69 6e 43 6f 6e 74 72 | 6f 6c 2e 43 72 65 61 74 |WinContr|ol.Creat|
|000010c0| 65 50 61 72 61 6d 73 26 | d1 38 15 67 1e 54 57 69 |eParams&|.8.g.TWi|
|000010d0| 6e 43 6f 6e 74 72 6f 6c | 2e 43 72 65 61 74 65 57 |nControl|.CreateW|
|000010e0| 69 6e 64 6f 77 48 61 6e | 64 6c 65 26 d1 38 15 67 |indowHan|dle&.8.g|
|000010f0| 15 54 57 69 6e 43 6f 6e | 74 72 6f 6c 2e 43 72 65 |.TWinCon|trol.Cre|
|00001100| 61 74 65 57 6e 64 26 d1 | 38 15 67 1f 54 57 69 6e |ateWnd&.|8.g.TWin|
|00001110| 43 6f 6e 74 72 6f 6c 2e | 44 65 73 74 72 6f 79 57 |Control.|DestroyW|
|00001120| 69 6e 64 6f 77 48 61 6e | 64 6c 65 26 d1 38 15 67 |indowHan|dle&.8.g|
|00001130| 16 54 57 69 6e 43 6f 6e | 74 72 6f 6c 2e 44 65 73 |.TWinCon|trol.Des|
|00001140| 74 72 6f 79 57 6e 64 26 | d1 38 15 67 1a 54 43 75 |troyWnd&|.8.g.TCu|
|00001150| 73 74 6f 6d 43 6f 6e 74 | 72 6f 6c 2e 50 61 69 6e |stomCont|rol.Pain|
|00001160| 74 57 69 6e 64 6f 77 26 | d1 38 15 67 17 54 57 69 |tWindow&|.8.g.TWi|
|00001170| 6e 43 6f 6e 74 72 6f 6c | 2e 53 68 6f 77 43 6f 6e |nControl|.ShowCon|
|00001180| 74 72 6f 6c 26 d1 38 15 | 67 14 54 57 69 6e 43 6f |trol&.8.|g.TWinCo|
|00001190| 6e 74 72 6f 6c 2e 53 65 | 74 46 6f 63 75 73 26 d1 |ntrol.Se|tFocus&.|
|000011a0| 38 15 66 06 54 41 6c 69 | 67 6e 59 80 eb 65 67 11 |8.f.TAli|gnY..eg.|
|000011b0| 54 43 6f 6e 74 72 6f 6c | 2e 53 65 74 41 6c 69 67 |TControl|.SetAlig|
|000011c0| 6e 26 d1 38 15 67 16 54 | 57 69 6e 43 6f 6e 74 72 |n&.8.g.T|WinContr|
|000011d0| 6f 6c 2e 53 65 74 54 61 | 62 53 74 6f 70 26 d1 38 |ol.SetTa|bStop&.8|
|000011e0| 15 67 13 54 43 6f 6e 74 | 72 6f 6c 2e 53 65 74 45 |.g.TCont|rol.SetE|
|000011f0| 6e 61 62 6c 65 64 26 d1 | 38 15 67 13 54 43 6f 6e |nabled&.|8.g.TCon|
|00001200| 74 72 6f 6c 2e 53 65 74 | 56 69 73 69 62 6c 65 26 |trol.Set|Visible&|
|00001210| d1 38 15 66 0e 54 44 72 | 61 67 44 72 6f 70 45 76 |.8.f.TDr|agDropEv|
|00001220| 65 6e 74 4c 48 16 2d 66 | 0e 54 44 72 61 67 4f 76 |entLH.-f|.TDragOv|
|00001230| 65 72 45 76 65 6e 74 7d | 03 17 74 66 0d 54 45 6e |erEvent}|..tf.TEn|
|00001240| 64 44 72 61 67 45 76 65 | 6e 74 fe 8c 13 32 66 09 |dDragEve|nt...2f.|
|00001250| 54 4b 65 79 45 76 65 6e | 74 91 e3 67 1f 66 0e 54 |TKeyEven|t..g.f.T|
|00001260| 4b 65 79 50 72 65 73 73 | 45 76 65 6e 74 25 16 7e |KeyPress|Event%.~|
|00001270| 5a 66 0b 54 4d 6f 75 73 | 65 45 76 65 6e 74 a0 8f |Zf.TMous|eEvent..|
|00001280| a9 59 66 0f 54 4d 6f 75 | 73 65 4d 6f 76 65 45 76 |.Yf.TMou|seMoveEv|
|00001290| 65 6e 74 3a 88 7d 39 67 | 15 54 43 75 73 74 6f 6d |ent:.}9g|.TCustom|
|000012a0| 43 6f 6e 74 72 6f 6c 2e | 43 72 65 61 74 65 26 d1 |Control.|Create&.|
|000012b0| 38 15 66 01 37 b9 31 74 | 5e 67 11 63 73 41 63 63 |8.f.7.1t|^g.csAcc|
|000012c0| 65 70 74 73 43 6f 6e 74 | 72 6f 6c 73 ac 69 90 98 |eptsCont|rols.i..|
|000012d0| 67 0d 63 73 43 6c 69 63 | 6b 45 76 65 6e 74 73 af |g.csClic|kEvents.|
|000012e0| 69 90 98 67 0e 63 73 44 | 6f 75 62 6c 65 43 6c 69 |i..g.csD|oubleCli|
|000012f0| 63 6b 73 b3 69 90 98 67 | 11 54 43 6f 6e 74 72 6f |cks.i..g|.TContro|
|00001300| 6c 2e 53 65 74 57 69 64 | 74 68 26 d1 38 15 67 12 |l.SetWid|th&.8.g.|
|00001310| 54 43 6f 6e 74 72 6f 6c | 2e 53 65 74 48 65 69 67 |TControl|.SetHeig|
|00001320| 68 74 26 d1 38 15 67 10 | 54 43 6f 6e 74 72 6f 6c |ht&.8.g.|TControl|
|00001330| 2e 53 65 74 4c 65 66 74 | 26 d1 38 15 67 16 54 43 |.SetLeft|&.8.g.TC|
|00001340| 75 73 74 6f 6d 43 6f 6e | 74 72 6f 6c 2e 44 65 73 |ustomCon|trol.Des|
|00001350| 74 72 6f 79 26 d1 38 15 | 67 0f 54 43 6f 6e 74 72 |troy&.8.|g.TContr|
|00001360| 6f 6c 2e 53 65 74 54 6f | 70 26 d1 38 15 67 10 54 |ol.SetTo|p&.8.g.T|
|00001370| 43 6f 6e 74 72 6f 6c 2e | 53 65 74 54 65 78 74 26 |Control.|SetText&|
|00001380| d1 38 15 67 10 54 43 6f | 6e 74 72 6f 6c 2e 52 65 |.8.g.TCo|ntrol.Re|
|00001390| 66 72 65 73 68 26 d1 38 | 15 67 10 54 43 6f 6e 74 |fresh&.8|.g.TCont|
|000013a0| 72 6f 6c 2e 47 65 74 54 | 65 78 74 26 d1 38 15 67 |rol.GetT|ext&.8.g|
|000013b0| 12 54 43 6f 6e 74 72 6f | 6c 2e 4d 6f 75 73 65 4d |.TContro|l.MouseM|
|000013c0| 6f 76 65 26 d1 38 15 67 | 09 63 72 44 65 66 61 75 |ove&.8.g|.crDefau|
|000013d0| 6c 74 88 bf 39 d9 67 10 | 54 43 6f 6e 74 72 6f 6c |lt..9.g.|TControl|
|000013e0| 2e 4d 6f 75 73 65 55 70 | 26 d1 38 15 67 06 6d 62 |.MouseUp|&.8.g.mb|
|000013f0| 4c 65 66 74 61 0e 75 ac | 67 17 54 43 6f 6e 74 72 |Lefta.u.|g.TContr|
|00001400| 6f 6c 2e 53 63 72 65 65 | 6e 54 6f 43 6c 69 65 6e |ol.Scree|nToClien|
|00001410| 74 26 d1 38 15 67 12 54 | 43 6f 6e 74 72 6f 6c 2e |t&.8.g.T|Control.|
|00001420| 4d 6f 75 73 65 44 6f 77 | 6e 26 d1 38 15 67 12 54 |MouseDow|n&.8.g.T|
|00001430| 43 6f 6e 74 72 6f 6c 2e | 42 65 67 69 6e 44 72 61 |Control.|BeginDra|
|00001440| 67 26 d1 38 15 67 13 54 | 57 69 6e 43 6f 6e 74 72 |g&.8.g.T|WinContr|
|00001450| 6f 6c 2e 44 6f 45 6e 74 | 65 72 26 d1 38 15 67 12 |ol.DoEnt|er&.8.g.|
|00001460| 54 57 69 6e 43 6f 6e 74 | 72 6f 6c 2e 44 6f 45 78 |TWinCont|rol.DoEx|
|00001470| 69 74 26 d1 38 15 67 04 | 6d 72 4f 6b 89 bf 39 d9 |it&.8.g.|mrOk..9.|
|00001480| 63 64 08 47 72 61 70 68 | 69 63 73 00 00 00 00 66 |cd.Graph|ics....f|
|00001490| 06 54 43 6f 6c 6f 72 2b | 8a 97 a6 66 05 54 46 6f |.TColor+|...f.TFo|
|000014a0| 6e 74 97 fe 25 db 67 08 | 63 6c 57 69 6e 64 6f 77 |nt..%.g.|clWindow|
|000014b0| 44 f0 aa 89 67 05 63 6c | 52 65 64 1d c3 b3 e0 67 |D...g.cl|Red....g|
|000014c0| 06 63 6c 42 6c 75 65 1e | c2 b2 e1 67 09 63 6c 42 |.clBlue.|...g.clB|
|000014d0| 74 6e 46 61 63 65 4e f0 | aa 89 67 06 63 6c 47 72 |tnFaceN.|..g.clGr|
|000014e0| 61 79 9e 42 34 e1 67 0e | 63 6c 42 74 6e 48 69 67 |ay.B4.g.|clBtnHig|
|000014f0| 68 6c 69 67 68 74 53 f0 | aa 89 67 0b 63 6c 42 74 |hlightS.|..g.clBt|
|00001500| 6e 53 68 61 64 6f 77 4f | f0 aa 89 66 07 54 43 61 |nShadowO|...f.TCa|
|00001510| 6e 76 61 73 4b 53 7a 09 | 67 06 2e 54 46 6f 6e 74 |nvasKSz.|g..TFont|
|00001520| f1 6f 48 80 67 0c 54 46 | 6f 6e 74 2e 43 72 65 61 |.oH.g.TF|ont.Crea|
|00001530| 74 65 26 d1 38 15 67 11 | 54 42 69 74 6d 61 70 2e |te&.8.g.|TBitmap.|
|00001540| 53 65 74 48 61 6e 64 6c | 65 26 d1 38 15 67 0f 54 |SetHandl|e&.8.g.T|
|00001550| 42 72 75 73 68 2e 53 65 | 74 43 6f 6c 6f 72 26 d1 |Brush.Se|tColor&.|
|00001560| 38 15 67 10 54 43 61 6e | 76 61 73 2e 46 69 6c 6c |8.g.TCan|vas.Fill|
|00001570| 52 65 63 74 26 d1 38 15 | 67 0d 54 50 65 6e 2e 53 |Rect&.8.|g.TPen.S|
|00001580| 65 74 43 6f 6c 6f 72 26 | d1 38 15 67 07 63 6c 42 |etColor&|.8.g.clB|
|00001590| 6c 61 63 6b 1e c2 b3 e0 | 67 11 54 43 61 6e 76 61 |lack....|g.TCanva|
|000015a0| 73 2e 52 65 63 74 61 6e | 67 6c 65 26 d1 38 15 67 |s.Rectan|gle&.8.g|
|000015b0| 0e 54 46 6f 6e 74 2e 53 | 65 74 43 6f 6c 6f 72 26 |.TFont.S|etColor&|
|000015c0| d1 38 15 67 12 54 43 61 | 6e 76 61 73 2e 54 65 78 |.8.g.TCa|nvas.Tex|
|000015d0| 74 48 65 69 67 68 74 26 | d1 38 15 67 11 54 43 61 |tHeight&|.8.g.TCa|
|000015e0| 6e 76 61 73 2e 47 65 74 | 48 61 6e 64 6c 65 26 d1 |nvas.Get|Handle&.|
|000015f0| 38 15 67 11 54 43 61 6e | 76 61 73 2e 54 65 78 74 |8.g.TCan|vas.Text|
|00001600| 57 69 64 74 68 26 d1 38 | 15 67 0d 54 50 65 6e 2e |Width&.8|.g.TPen.|
|00001610| 53 65 74 57 69 64 74 68 | 26 d1 38 15 67 0e 54 43 |SetWidth|&.8.g.TC|
|00001620| 61 6e 76 61 73 2e 4d 6f | 76 65 54 6f 26 d1 38 15 |anvas.Mo|veTo&.8.|
|00001630| 67 0e 54 43 61 6e 76 61 | 73 2e 4c 69 6e 65 54 6f |g.TCanva|s.LineTo|
|00001640| 26 d1 38 15 67 0f 54 43 | 61 6e 76 61 73 2e 53 65 |&.8.g.TC|anvas.Se|
|00001650| 74 46 6f 6e 74 26 d1 38 | 15 67 15 54 43 61 6e 76 |tFont&.8|.g.TCanv|
|00001660| 61 73 2e 44 72 61 77 46 | 6f 63 75 73 52 65 63 74 |as.DrawF|ocusRect|
|00001670| 26 d1 38 15 67 0f 54 42 | 72 75 73 68 2e 53 65 74 |&.8.g.TB|rush.Set|
|00001680| 53 74 79 6c 65 26 d1 38 | 15 66 0b 54 42 72 75 73 |Style&.8|.f.TBrus|
|00001690| 68 53 74 79 6c 65 31 68 | 95 0e 67 07 62 73 43 6c |hStyle1h|..g.bsCl|
|000016a0| 65 61 72 25 a0 b1 48 67 | 0a 63 6c 47 72 61 79 54 |ear%..Hg|.clGrayT|
|000016b0| 65 78 74 50 f0 aa 89 67 | 0d 54 46 6f 6e 74 2e 53 |extP...g|.TFont.S|
|000016c0| 65 74 4e 61 6d 65 26 d1 | 38 15 67 0d 54 46 6f 6e |etName&.|8.g.TFon|
|000016d0| 74 2e 53 65 74 53 69 7a | 65 26 d1 38 15 67 0e 54 |t.SetSiz|e&.8.g.T|
|000016e0| 46 6f 6e 74 2e 53 65 74 | 53 74 79 6c 65 26 d1 38 |Font.Set|Style&.8|
|000016f0| 15 66 0a 54 46 6f 6e 74 | 53 74 79 6c 65 48 69 91 |.f.TFont|StyleHi.|
|00001700| a3 67 06 66 73 42 6f 6c | 64 3b a1 ad dd 63 64 07 |.g.fsBol|d;...cd.|
|00001710| 43 6c 61 73 73 65 73 00 | 00 00 00 67 14 54 50 65 |Classes.|...g.TPe|
|00001720| 72 73 69 73 74 65 6e 74 | 2e 41 73 73 69 67 6e 54 |rsistent|.AssignT|
|00001730| 6f 26 d1 38 15 67 12 54 | 50 65 72 73 69 73 74 65 |o&.8.g.T|Persiste|
|00001740| 6e 74 2e 41 73 73 69 67 | 6e 26 d1 38 15 67 19 54 |nt.Assig|n&.8.g.T|
|00001750| 43 6f 6d 70 6f 6e 65 6e | 74 2e 56 61 6c 69 64 61 |Componen|t.Valida|
|00001760| 74 65 52 65 6e 61 6d 65 | 26 d1 38 15 67 15 54 43 |teRename|&.8.g.TC|
|00001770| 6f 6d 70 6f 6e 65 6e 74 | 2e 57 72 69 74 65 53 74 |omponent|.WriteSt|
|00001780| 61 74 65 26 d1 38 15 66 | 0c 54 4e 6f 74 69 66 79 |ate&.8.f|.TNotify|
|00001790| 45 76 65 6e 74 54 fd c7 | 4f 66 0b 54 53 68 69 66 |EventT..|Of.TShif|
|000017a0| 74 53 74 61 74 65 c6 d0 | f8 54 66 0a 54 43 6f 6d |tState..|.Tf.TCom|
|000017b0| 70 6f 6e 65 6e 74 f8 18 | 50 09 67 11 54 43 6f 6d |ponent..|P.g.TCom|
|000017c0| 70 6f 6e 65 6e 74 2e 4c | 6f 61 64 65 64 26 d1 38 |ponent.L|oaded&.8|
|000017d0| 15 67 04 52 65 63 74 c7 | b2 50 69 66 01 31 12 31 |.g.Rect.|.Pif.1.1|
|000017e0| 74 5e 67 06 73 73 43 74 | 72 6c 07 69 90 98 67 07 |t^g.ssCt|rl.i..g.|
|000017f0| 73 73 53 68 69 66 74 05 | 69 90 98 66 0a 54 41 6c |ssShift.|i..f.TAl|
|00001800| 69 67 6e 6d 65 6e 74 78 | 23 18 33 67 0d 74 61 4c |ignmentx|#.3g.taL|
|00001810| 65 66 74 4a 75 73 74 69 | 66 79 6b 5b 34 6d 67 08 |eftJusti|fyk[4mg.|
|00001820| 74 61 43 65 6e 74 65 72 | 6d 5b 34 6d 67 12 52 65 |taCenter|m[4mg.Re|
|00001830| 67 69 73 74 65 72 43 6f | 6d 70 6f 6e 65 6e 74 73 |gisterCo|mponents|
|00001840| c6 49 02 72 63 64 08 4d | 65 73 73 61 67 65 73 00 |.I.rcd.M|essages.|
|00001850| 00 00 00 66 0b 54 57 4d | 53 65 74 46 6f 63 75 73 |...f.TWM|SetFocus|
|00001860| 0d 70 2f 40 67 0b 57 4d | 5f 53 45 54 46 4f 43 55 |.p/@g.WM|_SETFOCU|
|00001870| 53 8f bf 39 d9 66 0c 54 | 57 4d 4b 69 6c 6c 46 6f |S..9.f.T|WMKillFo|
|00001880| 63 75 73 2d a9 3c 31 67 | 0c 57 4d 5f 4b 49 4c 4c |cus-.<1g|.WM_KILL|
|00001890| 46 4f 43 55 53 90 bf 39 | d9 66 07 54 57 4d 53 69 |FOCUS..9|.f.TWMSi|
|000018a0| 7a 65 60 38 50 76 67 07 | 57 4d 5f 53 49 5a 45 8d |ze`8Pvg.|WM_SIZE.|
|000018b0| bf 39 d9 66 0d 54 57 4d | 47 65 74 44 6c 67 43 6f |.9.f.TWM|GetDlgCo|
|000018c0| 64 65 88 e1 76 82 67 0d | 57 4d 5f 47 45 54 44 4c |de..v.g.|WM_GETDL|
|000018d0| 47 43 4f 44 45 0f c0 39 | d9 63 64 08 57 69 6e 50 |GCODE..9|.cd.WinP|
|000018e0| 72 6f 63 73 00 00 00 00 | 66 05 54 52 65 63 74 25 |rocs....|f.TRect%|
|000018f0| b8 3d a1 67 0a 4c 6f 61 | 64 43 75 72 73 6f 72 4f |.=.g.Loa|dCursorO|
|00001900| ad 3b c3 67 0a 4c 6f 61 | 64 42 69 74 6d 61 70 4f |.;.g.Loa|dBitmapO|
|00001910| ad 3b c3 67 0b 49 6e 66 | 6c 61 74 65 52 65 63 74 |.;.g.Inf|lateRect|
|00001920| c0 53 04 6e 67 0d 44 54 | 5f 53 49 4e 47 4c 45 4c |.S.ng.DT|_SINGLEL|
|00001930| 49 4e 45 a8 bf 39 d9 67 | 0a 44 54 5f 56 43 45 4e |INE..9.g|.DT_VCEN|
|00001940| 54 45 52 8c bf 39 d9 67 | 09 44 54 5f 43 45 4e 54 |TER..9.g|.DT_CENT|
|00001950| 45 52 89 bf 39 d9 67 07 | 44 54 5f 4c 45 46 54 88 |ER..9.g.|DT_LEFT.|
|00001960| bf 39 d9 67 08 44 54 5f | 52 49 47 48 54 8a bf 39 |.9.g.DT_|RIGHT..9|
|00001970| d9 66 0b 54 54 65 78 74 | 4d 65 74 72 69 63 dd 44 |.f.TText|Metric.D|
|00001980| 53 c9 67 0e 47 65 74 54 | 65 78 74 4d 65 74 72 69 |S.g.GetT|extMetri|
|00001990| 63 73 5f fb 15 7d 67 06 | 44 54 5f 54 4f 50 88 bf |cs_..}g.|DT_TOP..|
|000019a0| 39 d9 67 09 44 54 5f 42 | 4f 54 54 4f 4d 90 bf 39 |9.g.DT_B|OTTOM..9|
|000019b0| d9 66 06 54 50 6f 69 6e | 74 f5 20 8f 09 67 0c 47 |.f.TPoin|t. ..g.G|
|000019c0| 65 74 43 75 72 73 6f 72 | 50 6f 73 72 b3 2d 50 67 |etCursor|Posr.-Pg|
|000019d0| 0b 44 54 5f 4e 4f 50 52 | 45 46 49 58 89 30 45 d9 |.DT_NOPR|EFIX.0E.|
|000019e0| 67 0a 4f 66 66 73 65 74 | 52 65 63 74 c0 53 04 6e |g.Offset|Rect.S.n|
|000019f0| 67 08 44 72 61 77 54 65 | 78 74 16 91 7f cd 67 07 |g.DrawTe|xt....g.|
|00001a00| 56 4b 5f 4e 45 58 54 aa | bf 39 d9 67 08 56 4b 5f |VK_NEXT.|.9.g.VK_|
|00001a10| 52 49 47 48 54 af bf 39 | d9 67 08 56 4b 5f 50 52 |RIGHT..9|.g.VK_PR|
|00001a20| 49 4f 52 a9 bf 39 d9 67 | 07 56 4b 5f 4c 45 46 54 |IOR..9.g|.VK_LEFT|
|00001a30| ad bf 39 d9 67 07 56 4b | 5f 44 4f 57 4e b0 bf 39 |..9.g.VK|_DOWN..9|
|00001a40| d9 67 05 56 4b 5f 55 50 | ae bf 39 d9 67 0f 44 4c |.g.VK_UP|..9.g.DL|
|00001a50| 47 43 5f 57 41 4e 54 41 | 52 52 4f 57 53 89 bf 39 |GC_WANTA|RROWS..9|
|00001a60| d9 66 04 48 57 4e 44 fa | 6c 80 42 67 0a 46 69 6e |.f.HWND.|l.Bg.Fin|
|00001a70| 64 57 69 6e 64 6f 77 e7 | 7b 6c 0f 63 64 08 57 69 |dWindow.|{l.cd.Wi|
|00001a80| 6e 54 79 70 65 73 00 00 | 00 00 63 64 08 53 79 73 |nTypes..|..cd.Sys|
|00001a90| 55 74 69 6c 73 00 00 00 | 00 67 03 4e 6f 77 39 87 |Utils...|.g.Now9.|
|00001aa0| 90 c9 67 0a 44 65 63 6f | 64 65 44 61 74 65 2e 94 |..g.Deco|deDate..|
|00001ab0| bc 4d 67 0e 4c 6f 6e 67 | 4d 6f 6e 74 68 4e 61 6d |.Mg.Long|MonthNam|
|00001ac0| 65 73 97 66 46 c1 67 08 | 49 6e 74 54 6f 53 74 72 |es.fF.g.|IntToStr|
|00001ad0| 11 cd 84 9f 67 0c 4c 6f | 6e 67 44 61 79 4e 61 6d |....g.Lo|ngDayNam|
|00001ae0| 65 73 2c 54 46 c1 67 0a | 45 6e 63 6f 64 65 44 61 |es,TF.g.|EncodeDa|
|00001af0| 74 65 4a ca e9 43 67 09 | 53 74 72 54 6f 44 61 74 |teJ..Cg.|StrToDat|
|00001b00| 65 8e 3a b9 d8 67 0e 46 | 6f 72 6d 61 74 44 61 74 |e.:..g.F|ormatDat|
|00001b10| 65 54 69 6d 65 93 b7 6e | 32 67 0e 4c 6f 6e 67 44 |eTime..n|2g.LongD|
|00001b20| 61 74 65 46 6f 72 6d 61 | 74 8c 35 23 f5 67 09 44 |ateForma|t.5#.g.D|
|00001b30| 61 79 4f 66 57 65 65 6b | fa 4d 0a 5c 67 08 53 74 |ayOfWeek|.M.\g.St|
|00001b40| 72 41 6c 6c 6f 63 57 a5 | 96 47 67 08 53 74 72 50 |rAllocW.|.Gg.StrP|
|00001b50| 43 6f 70 79 12 96 75 2f | 67 0a 53 74 72 44 69 73 |Copy..u/|g.StrDis|
|00001b60| 70 6f 73 65 65 06 0f 3b | 67 08 53 74 72 54 6f 49 |posee..;|g.StrToI|
|00001b70| 6e 74 11 cd 84 9f 67 06 | 53 74 72 4c 65 6e 57 a5 |nt....g.|StrLenW.|
|00001b80| 96 47 63 64 06 53 79 73 | 74 65 6d 00 00 00 00 66 |.Gcd.Sys|tem....f|
|00001b90| 0a 41 6e 73 69 53 74 72 | 69 6e 67 7e cf 09 f5 66 |.AnsiStr|ing~...f|
|00001ba0| 07 49 6e 74 65 67 65 72 | fa 6c 80 42 67 13 54 4f |.Integer|.l.Bg.TO|
|00001bb0| 62 6a 65 63 74 2e 4e 65 | 77 49 6e 73 74 61 6e 63 |bject.Ne|wInstanc|
|00001bc0| 65 26 d1 38 15 67 14 54 | 4f 62 6a 65 63 74 2e 46 |e&.8.g.T|Object.F|
|00001bd0| 72 65 65 49 6e 73 74 61 | 6e 63 65 26 d1 38 15 66 |reeInsta|nce&.8.f|
|00001be0| 07 54 4f 62 6a 65 63 74 | 31 57 b8 85 66 07 42 6f |.TObject|1W..f.Bo|
|00001bf0| 6f 6c 65 61 6e 5b d6 65 | eb 66 06 44 6f 75 62 6c |olean[.e|.f.Doubl|
|00001c00| 65 ad 16 7b 37 66 09 54 | 44 61 74 65 54 69 6d 65 |e..{7f.T|DateTime|
|00001c10| 13 b6 57 b4 66 04 57 6f | 72 64 30 30 2d 12 66 04 |..W.f.Wo|rd00-.f.|
|00001c20| 43 68 61 72 10 76 10 2e | 66 07 4c 6f 6e 67 69 6e |Char.v..|f.Longin|
|00001c30| 74 21 f6 5f 89 67 05 46 | 61 6c 73 65 4e 0e 82 25 |t!._.g.F|alseN..%|
|00001c40| 67 04 54 72 75 65 4f 0e | 82 25 66 06 73 74 72 69 |g.TrueO.|.%f.stri|
|00001c50| 6e 67 7e cf 09 f5 67 09 | 48 49 6e 73 74 61 6e 63 |ng~...g.|HInstanc|
|00001c60| 65 2f 5c 79 89 66 09 50 | 41 6e 73 69 43 68 61 72 |e/\y.f.P|AnsiChar|
|00001c70| 52 23 78 97 67 05 54 72 | 75 6e 63 00 00 00 00 67 |R#x.g.Tr|unc....g|
|00001c80| 0c 40 43 6c 61 73 73 43 | 72 65 61 74 65 90 c2 99 |.@ClassC|reate...|
|00001c90| 07 67 08 40 4c 53 74 72 | 41 73 67 90 c2 99 07 67 |.g.@LStr|Asg....g|
|00001ca0| 06 40 54 52 55 4e 43 90 | c2 99 07 67 0c 54 4f 62 |.@TRUNC.|...g.TOb|
|00001cb0| 6a 65 63 74 2e 46 72 65 | 65 26 d1 38 15 67 0d 40 |ject.Fre|e&.8.g.@|
|00001cc0| 43 6c 61 73 73 44 65 73 | 74 72 6f 79 90 c2 99 07 |ClassDes|troy....|
|00001cd0| 67 08 40 4c 53 74 72 43 | 6c 72 90 c2 99 07 67 0e |g.@LStrC|lr....g.|
|00001ce0| 40 48 61 6e 64 6c 65 46 | 69 6e 61 6c 6c 79 90 c2 |@HandleF|inally..|
|00001cf0| 99 07 67 04 45 78 69 74 | 00 00 00 00 67 04 43 6f |..g.Exit|....g.Co|
|00001d00| 70 79 00 00 00 00 67 09 | 40 4c 53 74 72 43 6f 70 |py....g.|@LStrCop|
|00001d10| 79 90 c2 99 07 67 08 41 | 73 73 69 67 6e 65 64 00 |y....g.A|ssigned.|
|00001d20| 00 00 00 67 0b 40 4c 53 | 74 72 41 64 64 52 65 66 |...g.@LS|trAddRef|
|00001d30| 90 c2 99 07 67 08 40 4c | 53 74 72 43 6d 70 90 c2 |....g.@L|StrCmp..|
|00001d40| 99 07 67 05 52 6f 75 6e | 64 00 00 00 00 67 06 40 |..g.Roun|d....g.@|
|00001d50| 52 4f 55 4e 44 90 c2 99 | 07 67 0d 40 4c 53 74 72 |ROUND...|.g.@LStr|
|00001d60| 54 6f 53 74 72 69 6e 67 | 90 c2 99 07 67 09 40 50 |ToString|....g.@P|
|00001d70| 53 74 72 4e 43 70 79 90 | c2 99 07 67 03 44 65 63 |StrNCpy.|...g.Dec|
|00001d80| 00 00 00 00 66 05 50 43 | 68 61 72 52 23 78 97 67 |....f.PC|harR#x.g|
|00001d90| 0f 40 4c 53 74 72 46 72 | 6f 6d 53 74 72 69 6e 67 |.@LStrFr|omString|
|00001da0| 90 c2 99 07 67 09 40 4c | 53 74 72 4c 41 73 67 90 |....g.@L|StrLAsg.|
|00001db0| c2 99 07 66 04 42 79 74 | 65 97 bf 14 12 67 08 40 |...f.Byt|e....g.@|
|00001dc0| 41 53 74 72 43 6d 70 90 | c2 99 07 67 03 49 6e 63 |AStrCmp.|...g.Inc|
|00001dd0| 00 00 00 00 63 25 0d 56 | 65 72 73 69 6f 6e 53 74 |....c%.V|ersionSt|
|00001de0| 72 69 6e 67 8a 0d 57 3a | 2f 56 1a ff ff ff ff 04 |ring..W:|/V......|
|00001df0| 00 00 00 31 2e 32 35 00 | 25 0d 63 72 50 6f 69 6e |...1.25.|%.crPoin|
|00001e00| 74 43 75 72 73 6f 72 8a | 9c bf 39 d9 70 00 28 25 |tCursor.|..9.p.(%|
|00001e10| 0d 63 72 43 6c 69 63 6b | 43 75 72 73 6f 72 8a 9d |.crClick|Cursor..|
|00001e20| bf 39 d9 70 00 2a 25 0c | 63 72 4e 6f 47 6f 43 75 |.9.p.*%.|crNoGoCu|
|00001e30| 72 73 6f 72 8a 9e bf 39 | d9 70 00 2c 25 0e 44 61 |rsor...9|.p.,%.Da|
|00001e40| 79 48 65 61 64 65 72 5f | 52 45 43 54 8a 87 f0 38 |yHeader_|RECT...8|
|00001e50| d9 72 00 fe 27 0e 6d 5f | 44 61 79 73 50 65 72 4d |.r..'.m_|DaysPerM|
|00001e60| 6f 6e 74 68 e6 7e 47 a1 | a1 74 00 26 1d 2e 54 41 |onth.~G.|.t.&..TA|
|00001e70| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 53 |drock3dC|alendarS|
|00001e80| 70 65 65 64 42 75 74 74 | 6f 6e 80 6d 25 4c 0d 76 |peedButt|on.m%L.v|
|00001e90| 00 2a 1c 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |.*.TAdro|ck3dCale|
|00001ea0| 6e 64 61 72 53 70 65 65 | 64 42 75 74 74 6f 6e 88 |ndarSpee|dButton.|
|00001eb0| 13 b4 29 68 78 25 06 53 | 75 6e 64 61 79 8a db 79 |..)hx%.S|unday..y|
|00001ec0| af b4 7a 00 00 25 06 4d | 6f 6e 64 61 79 8a dc 79 |..z..%.M|onday..y|
|00001ed0| af b4 7a 00 02 25 07 54 | 75 65 73 64 61 79 8a dd |..z..%.T|uesday..|
|00001ee0| 79 af b4 7a 00 04 25 09 | 57 65 64 6e 65 73 64 61 |y..z..%.|Wednesda|
|00001ef0| 79 8a de 79 af b4 7a 00 | 06 25 08 54 68 75 72 73 |y..y..z.|.%.Thurs|
|00001f00| 64 61 79 8a df 79 af b4 | 7a 00 08 25 06 46 72 69 |day..y..|z..%.Fri|
|00001f10| 64 61 79 8a e0 79 af b4 | 7a 00 0a 25 08 53 61 74 |day..y..|z..%.Sat|
|00001f20| 75 72 64 61 79 8a e1 79 | af b4 7a 00 0c 2a 10 54 |urday..y|..z..*.T|
|00001f30| 41 64 72 6f 63 6b 44 61 | 79 4f 66 57 65 65 6b 88 |AdrockDa|yOfWeek.|
|00001f40| e8 41 93 7a 7a 25 09 64 | 66 4e 6f 74 68 69 6e 67 |.A.zz%.d|fNothing|
|00001f50| 8a 31 ce 80 01 7c 00 00 | 25 05 64 66 41 6c 6c 8a |.1...|..|%.dfAll.|
|00001f60| 32 ce 80 01 7c 00 02 25 | 0a 64 66 53 61 74 75 72 |2...|..%|.dfSatur|
|00001f70| 64 61 79 8a 33 ce 80 01 | 7c 00 04 25 08 64 66 53 |day.3...||..%.dfS|
|00001f80| 75 6e 64 61 79 8a 34 ce | 80 01 7c 00 06 25 0f 64 |unday.4.|..|..%.d|
|00001f90| 66 50 72 65 76 4e 65 78 | 74 4d 6f 6e 74 68 8a 35 |fPrevNex|tMonth.5|
|00001fa0| ce 80 01 7c 00 08 25 0e | 64 66 43 75 72 72 65 6e |...|..%.|dfCurren|
|00001fb0| 74 4d 6f 6e 74 68 8a 36 | ce 80 01 7c 00 0a 2a 1a |tMonth.6|...|..*.|
|00001fc0| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00001fd0| 72 44 72 61 77 46 6c 61 | 67 73 88 3e 96 64 c7 7c |rDrawFla|gs.>.d.||
|00001fe0| 25 0a 6f 64 53 74 61 6e | 64 61 72 64 8a f7 b0 6d |%.odStan|dard...m|
|00001ff0| e1 7e 00 00 25 0b 6f 64 | 4f 77 6e 65 72 44 72 61 |.~..%.od|OwnerDra|
|00002000| 77 8a f8 b0 6d e1 7e 00 | 02 2a 1d 54 41 64 72 6f |w...m.~.|.*.TAdro|
|00002010| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 44 72 61 77 |ck3dCale|ndarDraw|
|00002020| 69 6e 67 53 74 79 6c 65 | 88 04 79 51 a7 7e 25 09 |ingStyle|..yQ.~%.|
|00002030| 64 6d 45 6e 61 62 6c 65 | 64 8a 2d 94 6c 62 80 00 |dmEnable|d.-.lb..|
|00002040| 00 25 0a 64 6d 44 69 73 | 61 62 6c 65 64 8a 2e 94 |.%.dmDis|abled...|
|00002050| 6c 62 80 00 02 2a 19 54 | 41 64 72 6f 63 6b 33 64 |lb...*.T|Adrock3d|
|00002060| 43 61 6c 65 6e 64 61 72 | 44 72 61 67 4d 6f 64 65 |Calendar|DragMode|
|00002070| 88 3a 5c 50 28 80 25 05 | 76 74 54 6f 70 8a 5b c9 |.:\P(.%.|vtTop.[.|
|00002080| 6e b2 82 00 00 25 08 76 | 74 43 65 6e 74 65 72 8a |n....%.v|tCenter.|
|00002090| 5c c9 6e b2 82 00 02 25 | 08 76 74 42 6f 74 74 6f |\.n....%|.vtBotto|
|000020a0| 6d 8a 5d c9 6e b2 82 00 | 04 2a 22 54 41 64 72 6f |m.].n...|.*"TAdro|
|000020b0| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 56 65 72 74 |ck3dCale|ndarVert|
|000020c0| 69 63 61 6c 54 65 78 74 | 41 6c 69 67 6e 88 68 91 |icalText|Align.h.|
|000020d0| 52 78 82 25 06 68 74 4c | 65 66 74 8a 7b 0a c9 11 |Rx.%.htL|eft.{...|
|000020e0| 84 00 00 25 08 68 74 43 | 65 6e 74 65 72 8a 7c 0a |...%.htC|enter.|.|
|000020f0| c9 11 84 00 02 25 07 68 | 74 52 69 67 68 74 8a 7d |.....%.h|tRight.}|
|00002100| 0a c9 11 84 00 04 2a 24 | 54 41 64 72 6f 63 6b 33 |......*$|TAdrock3|
|00002110| 64 43 61 6c 65 6e 64 61 | 72 48 6f 72 69 7a 6f 6e |dCalenda|rHorizon|
|00002120| 74 61 6c 54 65 78 74 41 | 6c 69 67 6e 88 88 d2 ac |talTextA|lign....|
|00002130| d7 84 25 09 73 63 4e 6f | 74 68 69 6e 67 8a 69 21 |..%.scNo|thing.i!|
|00002140| aa 58 86 00 00 25 08 73 | 63 43 6f 6d 62 6f 73 8a |.X...%.s|cCombos.|
|00002150| 6a 21 aa 58 86 00 02 25 | 08 73 63 4c 61 62 65 6c |j!.X...%|.scLabel|
|00002160| 73 8a 6b 21 aa 58 86 00 | 04 2a 1f 54 41 64 72 6f |s.k!.X..|.*.TAdro|
|00002170| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 53 68 6f 77 |ck3dCale|ndarShow|
|00002180| 4f 6e 43 61 6c 65 6e 64 | 61 72 88 76 e9 8d 1e 86 |OnCalend|ar.v....|
|00002190| 25 06 74 73 4e 6f 6e 65 | 8a 37 78 0d e1 88 00 00 |%.tsNone|.7x.....|
|000021a0| 25 08 74 73 52 61 69 73 | 65 64 8a 38 78 0d e1 88 |%.tsRais|ed.8x...|
|000021b0| 00 02 25 0a 74 73 52 65 | 63 65 73 73 65 64 8a 39 |..%.tsRe|cessed.9|
|000021c0| 78 0d e1 88 00 04 2a 1a | 54 41 64 72 6f 63 6b 33 |x.....*.|TAdrock3|
|000021d0| 64 43 61 6c 65 6e 64 61 | 72 54 65 78 74 53 74 79 |dCalenda|rTextSty|
|000021e0| 6c 65 88 44 40 f1 a6 88 | 25 12 73 6d 4f 6e 6c 79 |le.D@...|%.smOnly|
|000021f0| 41 66 74 65 72 4d 6f 75 | 73 65 55 70 8a df 83 be |AfterMou|seUp....|
|00002200| 92 8a 00 00 25 11 73 6d | 44 75 72 69 6e 67 4d 6f |....%.sm|DuringMo|
|00002210| 75 73 65 4d 6f 76 65 8a | e0 83 be 92 8a 00 02 2a |useMove.|.......*|
|00002220| 1b 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |.TAdrock|3dCalend|
|00002230| 61 72 53 65 6c 65 63 74 | 4d 6f 64 65 88 ec 4b a2 |arSelect|Mode..K.|
|00002240| 58 8a 25 0d 63 6d 43 6c | 69 63 6b 4f 6e 43 65 6c |X.%.cmCl|ickOnCel|
|00002250| 6c 8a f8 f6 fe 42 8c 00 | 00 25 19 63 6d 43 6c 69 |l....B..|.%.cmCli|
|00002260| 63 6b 41 6e 64 4d 6f 76 | 65 41 72 6f 75 6e 64 43 |ckAndMov|eAroundC|
|00002270| 65 6c 6c 73 8a f9 f6 fe | 42 8c 00 02 2a 1a 54 61 |ells....|B...*.Ta|
|00002280| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 4d |drock3dC|alendarM|
|00002290| 6f 75 73 65 4d 6f 64 65 | 88 05 bf e2 08 8c 25 08 |ouseMode|......%.|
|000022a0| 73 77 53 75 6e 64 61 79 | 8a 79 a6 2f d5 8e 00 00 |swSunday|.y./....|
|000022b0| 25 08 73 77 4d 6f 6e 64 | 61 79 8a 7a a6 2f d5 8e |%.swMond|ay.z./..|
|000022c0| 00 02 2a 1c 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |..*.TAdr|ock3dCal|
|000022d0| 65 6e 64 61 72 53 74 61 | 72 74 4f 66 57 65 65 6b |endarSta|rtOfWeek|
|000022e0| 88 86 6e 13 9b 8e 25 09 | 63 75 44 65 66 61 75 6c |..n...%.|cuDefaul|
|000022f0| 74 8a 76 fc c3 75 90 00 | 00 25 0c 63 75 53 65 6c |t.v..u..|.%.cuSel|
|00002300| 65 63 74 61 62 6c 65 8a | 77 fc c3 75 90 00 02 25 |ectable.|w..u...%|
|00002310| 0f 63 75 4e 6f 6e 53 65 | 6c 65 63 74 61 62 6c 65 |.cuNonSe|lectable|
|00002320| 8a 78 fc c3 75 90 00 04 | 25 07 63 75 43 6c 69 63 |.x..u...|%.cuClic|
|00002330| 6b 8a 79 fc c3 75 90 00 | 06 2a 17 54 41 64 72 6f |k.y..u..|.*.TAdro|
|00002340| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 43 75 72 73 |ck3dCale|ndarCurs|
|00002350| 6f 72 88 83 c4 a7 3b 90 | 2a 19 54 41 64 72 6f 63 |or....;.|*.TAdroc|
|00002360| 6b 33 64 43 61 6c 65 6e | 64 61 72 44 72 61 77 43 |k3dCalen|darDrawC|
|00002370| 65 6c 6c 88 0d a4 c2 9e | 92 2a 1a 54 41 64 72 6f |ell.....|.*.TAdro|
|00002380| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 43 65 6c 6c |ck3dCale|ndarCell|
|00002390| 43 6c 69 63 6b 88 20 96 | 83 2f 94 2a 1d 54 41 64 |Click. .|./.*.TAd|
|000023a0| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 43 65 |rock3dCa|lendarCe|
|000023b0| 6c 6c 44 62 6c 43 6c 69 | 63 6b 88 22 10 07 91 96 |llDblCli|ck."....|
|000023c0| 26 12 2e 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |&..TAdro|ck3dCale|
|000023d0| 6e 64 61 72 80 a5 a2 62 | d6 98 00 2a 11 54 41 64 |ndar...b|...*.TAd|
|000023e0| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 88 4b |rock3dCa|lendar.K|
|000023f0| 31 40 31 9a 20 22 54 41 | 64 72 6f 63 6b 33 64 43 |1@1. "TA|drock3dC|
|00002400| 61 6c 65 6e 64 61 72 53 | 68 6f 77 6e 55 6e 72 65 |alendarS|hownUnre|
|00002410| 67 69 73 74 65 72 65 64 | 66 5c d9 0d 28 18 54 41 |gistered|f\..(.TA|
|00002420| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 2e |drock3dC|alendar.|
|00002430| 43 72 65 61 74 65 80 26 | d1 38 15 00 81 23 9c 21 |Create.&|.8...#.!|
|00002440| 04 53 65 6c 66 16 9a 08 | 21 01 2e 66 9e fe 21 06 |.Self...|!..f..!.|
|00002450| 41 6f 77 6e 65 72 16 40 | 04 63 28 19 54 41 64 72 |Aowner.@|.c(.TAdr|
|00002460| 6f 63 6b 33 64 43 61 6c | 65 6e 64 61 72 2e 44 65 |ock3dCal|endar.De|
|00002470| 73 74 72 6f 79 80 26 d1 | 38 15 00 99 03 9c 21 04 |stroy.&.|8.....!.|
|00002480| 53 65 6c 66 16 9a 08 21 | 01 2e 16 9e 06 63 28 18 |Self...!|.....c(.|
|00002490| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|000024a0| 72 2e 4c 6f 61 64 65 64 | 80 26 d1 38 15 00 d1 02 |r.Loaded|.&.8....|
|000024b0| 9c 21 04 53 65 6c 66 16 | 9a 0a 20 08 54 6d 70 4d |.!.Self.|.. .TmpM|
|000024c0| 6f 6e 74 68 16 58 08 63 | 28 18 54 41 64 72 6f 63 |onth.X.c|(.TAdroc|
|000024d0| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 52 65 73 69 |k3dCalen|dar.Resi|
|000024e0| 7a 65 80 26 d1 38 15 00 | 0c 9c 21 04 53 65 6c 66 |ze.&.8..|..!.Self|
|000024f0| 16 9a 00 22 07 4d 65 73 | 73 61 67 65 16 4a 02 63 |...".Mes|sage.J.c|
|00002500| 28 1d 54 41 64 72 6f 63 | 6b 33 64 43 61 6c 65 6e |(.TAdroc|k3dCalen|
|00002510| 64 61 72 2e 52 65 73 69 | 7a 65 43 65 6c 6c 73 80 |dar.Resi|zeCells.|
|00002520| 26 d1 38 15 00 85 02 9c | 21 04 53 65 6c 66 16 9a |&.8.....|!.Self..|
|00002530| 06 20 06 63 57 69 64 74 | 68 16 58 08 20 07 63 48 |. .cWidt|h.X. .cH|
|00002540| 65 69 67 68 74 16 58 0a | 63 28 20 54 41 64 72 6f |eight.X.|c( TAdro|
|00002550| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 53 65 74 |ck3dCale|ndar.Set|
|00002560| 75 70 43 6f 6d 62 6f 42 | 6f 78 73 80 26 d1 38 15 |upComboB|oxs.&.8.|
|00002570| 00 61 04 9c 21 04 53 65 | 6c 66 16 9a 06 20 07 54 |.a..!.Se|lf... .T|
|00002580| 6d 70 59 65 61 72 66 62 | 00 20 08 54 6d 70 4d 6f |mpYearfb|. .TmpMo|
|00002590| 6e 74 68 66 62 04 20 06 | 54 6d 70 44 61 79 66 62 |nthfb. .|TmpDayfb|
|000025a0| 08 63 28 1d 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c(.TAdr|ock3dCal|
|000025b0| 65 6e 64 61 72 2e 53 65 | 74 75 70 4c 61 62 65 6c |endar.Se|tupLabel|
|000025c0| 73 80 26 d1 38 15 00 4d | 03 9c 21 04 53 65 6c 66 |s.&.8..M|..!.Self|
|000025d0| 16 9a 06 63 28 1e 54 41 | 64 72 6f 63 6b 33 64 43 |...c(.TA|drock3dC|
|000025e0| 61 6c 65 6e 64 61 72 2e | 53 65 74 75 70 42 75 74 |alendar.|SetupBut|
|000025f0| 74 6f 6e 73 80 26 d1 38 | 15 00 59 08 9c 21 04 53 |tons.&.8|..Y..!.S|
|00002600| 65 6c 66 16 9a 06 20 09 | 43 65 6c 6c 73 52 65 63 |elf... .|CellsRec|
|00002610| 74 66 4e 00 20 0a 4d 6f | 6e 74 68 57 69 64 74 68 |tfN. .Mo|nthWidth|
|00002620| 16 58 08 20 09 59 65 61 | 72 57 69 64 74 68 16 58 |.X. .Yea|rWidth.X|
|00002630| 0a 20 12 48 61 6c 66 43 | 65 6c 6c 73 52 65 63 74 |. .HalfC|ellsRect|
|00002640| 57 69 64 74 68 16 58 0a | 63 28 28 54 41 64 72 6f |Width.X.|c((TAdro|
|00002650| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 52 65 74 |ck3dCale|ndar.Ret|
|00002660| 75 72 6e 49 6e 73 69 64 | 65 43 6c 69 65 6e 74 52 |urnInsid|eClientR|
|00002670| 65 63 74 80 26 d1 38 15 | 00 ca 4e 21 04 53 65 6c |ect.&.8.|..N!.Sel|
|00002680| 66 16 9a 06 23 06 52 65 | 73 75 6c 74 16 4e 08 20 |f...#.Re|sult.N. |
|00002690| 06 4d 79 52 65 63 74 66 | 4e 00 63 28 25 54 41 64 |.MyRectf|N.c(%TAd|
|000026a0| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 52 |rock3dCa|lendar.R|
|000026b0| 65 74 75 72 6e 44 61 79 | 48 65 61 64 65 72 52 65 |eturnDay|HeaderRe|
|000026c0| 63 74 80 26 d1 38 15 00 | 39 03 4e 21 04 53 65 6c |ct.&.8..|9.N!.Sel|
|000026d0| 66 16 9a 06 23 06 52 65 | 73 75 6c 74 16 4e 0c 20 |f...#.Re|sult.N. |
|000026e0| 13 44 61 79 48 65 61 64 | 65 72 44 69 6d 65 6e 73 |.DayHead|erDimens|
|000026f0| 69 6f 6e 73 66 4e 00 20 | 0e 53 69 6e 67 6c 65 43 |ionsfN. |.SingleC|
|00002700| 65 6c 6c 52 65 63 74 66 | 4e 20 20 05 4c 6f 6f 70 |ellRectf|N .Loop|
|00002710| 58 16 58 08 63 28 29 54 | 41 64 72 6f 63 6b 33 64 |X.X.c()T|Adrock3d|
|00002720| 43 61 6c 65 6e 64 61 72 | 2e 52 65 74 75 72 6e 44 |Calendar|.ReturnD|
|00002730| 61 79 48 65 61 64 65 72 | 43 65 6c 6c 52 65 63 74 |ayHeader|CellRect|
|00002740| 80 26 d1 38 15 00 39 02 | 4e 21 04 53 65 6c 66 16 |.&.8..9.|N!.Self.|
|00002750| 9a 06 21 05 43 65 6c 6c | 58 16 58 08 23 06 52 65 |..!.Cell|X.X.#.Re|
|00002760| 73 75 6c 74 16 4e 0a 20 | 0e 53 69 6e 67 6c 65 43 |sult.N. |.SingleC|
|00002770| 65 6c 6c 52 65 63 74 66 | 4e 00 20 11 44 61 79 48 |ellRectf|N. .DayH|
|00002780| 65 61 64 65 72 43 65 6c | 6c 52 65 63 74 66 4e 20 |eaderCel|lRectfN |
|00002790| 20 0d 44 61 79 48 65 61 | 64 65 72 52 65 63 74 66 | .DayHea|derRectf|
|000027a0| 4e 40 20 05 4c 6f 6f 70 | 58 16 58 00 63 28 2c 54 |N@ .Loop|X.X.c(,T|
|000027b0| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|000027c0| 2e 53 65 74 53 65 6c 65 | 63 74 50 72 65 76 69 6f |.SetSele|ctPrevio|
|000027d0| 75 73 4e 65 78 74 4d 6f | 6e 74 68 80 26 d1 38 15 |usNextMo|nth.&.8.|
|000027e0| 00 1e 9c 21 04 53 65 6c | 66 16 9a 00 21 0b 53 65 |...!.Sel|f...!.Se|
|000027f0| 6c 65 63 74 44 61 74 65 | 73 16 5c 02 63 28 20 54 |lectDate|s.\.c( T|
|00002800| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|00002810| 2e 53 65 74 42 6f 72 64 | 65 72 53 74 79 6c 65 80 |.SetBord|erStyle.|
|00002820| 26 d1 38 15 00 28 9c 21 | 04 53 65 6c 66 16 9a 00 |&.8..(.!|.Self...|
|00002830| 21 0e 4e 65 77 42 6f 72 | 64 65 72 53 74 79 6c 65 |!.NewBor|derStyle|
|00002840| 16 0c 02 63 28 21 54 41 | 64 72 6f 63 6b 33 64 43 |...c(!TA|drock3dC|
|00002850| 61 6c 65 6e 64 61 72 2e | 53 65 74 44 72 61 77 69 |alendar.|SetDrawi|
|00002860| 6e 67 53 74 79 6c 65 80 | 26 d1 38 15 00 38 9c 21 |ngStyle.|&.8..8.!|
|00002870| 04 53 65 6c 66 16 9a 00 | 21 0f 4e 65 77 44 72 61 |.Self...|!.NewDra|
|00002880| 77 69 6e 67 53 74 79 6c | 65 16 7e 02 63 28 27 54 |wingStyl|e.~.c('T|
|00002890| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|000028a0| 2e 52 65 74 75 72 6e 54 | 6f 70 4c 61 62 65 6c 73 |.ReturnT|opLabels|
|000028b0| 48 65 69 67 68 74 80 26 | d1 38 15 00 70 58 21 04 |Height.&|.8..pX!.|
|000028c0| 53 65 6c 66 16 9a 00 20 | 06 52 65 73 75 6c 74 16 |Self... |.Result.|
|000028d0| 58 00 63 28 27 54 41 64 | 72 6f 63 6b 33 64 43 61 |X.c('TAd|rock3dCa|
|000028e0| 6c 65 6e 64 61 72 2e 52 | 65 74 75 72 6e 48 65 69 |lendar.R|eturnHei|
|000028f0| 67 68 74 4f 66 42 75 74 | 74 6f 6e 73 80 26 d1 38 |ghtOfBut|tons.&.8|
|00002900| 15 00 26 58 21 04 53 65 | 6c 66 16 9a 00 20 06 52 |..&X!.Se|lf... .R|
|00002910| 65 73 75 6c 74 16 58 00 | 63 28 27 54 41 64 72 6f |esult.X.|c('TAdro|
|00002920| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 52 65 74 |ck3dCale|ndar.Ret|
|00002930| 75 72 6e 44 61 79 48 65 | 61 64 65 72 48 65 69 67 |urnDayHe|aderHeig|
|00002940| 68 74 80 26 d1 38 15 00 | 26 58 21 04 53 65 6c 66 |ht.&.8..|&X!.Self|
|00002950| 16 9a 00 20 06 52 65 73 | 75 6c 74 16 58 00 63 28 |... .Res|ult.X.c(|
|00002960| 26 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |&TAdrock|3dCalend|
|00002970| 61 72 2e 52 65 74 75 72 | 6e 43 65 6c 6c 44 69 6d |ar.Retur|nCellDim|
|00002980| 65 6e 73 69 6f 6e 73 80 | 26 d1 38 15 00 6a 4e 21 |ensions.|&.8..jN!|
|00002990| 04 53 65 6c 66 16 9a 00 | 23 06 52 65 73 75 6c 74 |.Self...|#.Result|
|000029a0| 16 4e 02 20 12 43 65 6c | 6c 52 65 63 74 44 69 6d |.N. .Cel|lRectDim|
|000029b0| 65 6e 73 69 6f 6e 73 66 | 4e 00 63 28 22 54 41 64 |ensionsf|N.c("TAd|
|000029c0| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 52 |rock3dCa|lendar.R|
|000029d0| 65 74 75 72 6e 43 65 6c | 6c 53 70 61 63 65 58 80 |eturnCel|lSpaceX.|
|000029e0| 26 d1 38 15 00 0e 58 21 | 04 53 65 6c 66 16 9a 00 |&.8...X!|.Self...|
|000029f0| 20 06 52 65 73 75 6c 74 | 16 58 00 63 28 22 54 41 | .Result|.X.c("TA|
|00002a00| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 2e |drock3dC|alendar.|
|00002a10| 52 65 74 75 72 6e 43 65 | 6c 6c 53 70 61 63 65 59 |ReturnCe|llSpaceY|
|00002a20| 80 26 d1 38 15 00 0e 58 | 21 04 53 65 6c 66 16 9a |.&.8...X|!.Self..|
|00002a30| 00 20 06 52 65 73 75 6c | 74 16 58 00 63 28 1f 54 |. .Resul|t.X.c(.T|
|00002a40| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|00002a50| 2e 53 65 74 53 70 61 63 | 65 41 74 54 6f 70 80 26 |.SetSpac|eAtTop.&|
|00002a60| d1 38 15 00 50 9c 21 04 | 53 65 6c 66 16 9a 06 21 |.8..P.!.|Self...!|
|00002a70| 08 4e 65 77 56 61 6c 75 | 65 16 58 02 63 28 20 54 |.NewValu|e.X.c( T|
|00002a80| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|00002a90| 2e 53 65 74 53 70 61 63 | 65 41 74 4c 65 66 74 80 |.SetSpac|eAtLeft.|
|00002aa0| 26 d1 38 15 00 50 9c 21 | 04 53 65 6c 66 16 9a 06 |&.8..P.!|.Self...|
|00002ab0| 21 08 4e 65 77 56 61 6c | 75 65 16 58 02 63 28 22 |!.NewVal|ue.X.c("|
|00002ac0| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00002ad0| 72 2e 52 65 74 75 72 6e | 53 70 61 63 65 41 74 54 |r.Return|SpaceAtT|
|00002ae0| 6f 70 80 26 d1 38 15 00 | 0e 58 21 04 53 65 6c 66 |op.&.8..|.X!.Self|
|00002af0| 16 9a 00 20 06 52 65 73 | 75 6c 74 16 58 00 63 28 |... .Res|ult.X.c(|
|00002b00| 22 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |"TAdrock|3dCalend|
|00002b10| 61 72 2e 53 65 74 53 70 | 61 63 65 41 74 42 6f 74 |ar.SetSp|aceAtBot|
|00002b20| 74 6f 6d 80 26 d1 38 15 | 00 36 9c 21 04 53 65 6c |tom.&.8.|.6.!.Sel|
|00002b30| 66 16 9a 00 21 08 4e 65 | 77 56 61 6c 75 65 16 58 |f...!.Ne|wValue.X|
|00002b40| 02 63 28 25 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c(%TAdr|ock3dCal|
|00002b50| 65 6e 64 61 72 2e 52 65 | 74 75 72 6e 53 70 61 63 |endar.Re|turnSpac|
|00002b60| 65 41 74 42 6f 74 74 6f | 6d 80 26 d1 38 15 00 0e |eAtBotto|m.&.8...|
|00002b70| 58 21 04 53 65 6c 66 16 | 9a 00 20 06 52 65 73 75 |X!.Self.|.. .Resu|
|00002b80| 6c 74 16 58 00 63 28 3a | 54 41 64 72 6f 63 6b 33 |lt.X.c(:|TAdrock3|
|00002b90| 64 43 61 6c 65 6e 64 61 | 72 2e 52 65 74 75 72 6e |dCalenda|r.Return|
|00002ba0| 53 70 61 63 65 42 65 74 | 77 65 65 6e 4c 61 62 65 |SpaceBet|weenLabe|
|00002bb0| 6c 73 41 6e 64 57 65 65 | 6b 44 61 79 48 65 61 64 |lsAndWee|kDayHead|
|00002bc0| 65 72 80 26 d1 38 15 00 | 26 58 21 04 53 65 6c 66 |er.&.8..|&X!.Self|
|00002bd0| 16 9a 00 20 06 52 65 73 | 75 6c 74 16 58 00 63 28 |... .Res|ult.X.c(|
|00002be0| 33 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |3TAdrock|3dCalend|
|00002bf0| 61 72 2e 52 65 74 75 72 | 6e 53 70 61 63 65 42 65 |ar.Retur|nSpaceBe|
|00002c00| 74 77 65 65 6e 43 65 6c | 6c 73 61 6e 64 42 75 74 |tweenCel|lsandBut|
|00002c10| 74 6f 6e 73 80 26 d1 38 | 15 00 26 58 21 04 53 65 |tons.&.8|..&X!.Se|
|00002c20| 6c 66 16 9a 00 20 06 52 | 65 73 75 6c 74 16 58 00 |lf... .R|esult.X.|
|00002c30| 63 28 34 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c(4TAdro|ck3dCale|
|00002c40| 6e 64 61 72 2e 52 65 74 | 75 72 6e 53 70 61 63 65 |ndar.Ret|urnSpace|
|00002c50| 42 65 74 77 65 65 6e 42 | 75 74 74 6f 6e 73 41 6e |BetweenB|uttonsAn|
|00002c60| 64 42 6f 74 74 6f 6d 80 | 26 d1 38 15 00 26 58 21 |dBottom.|&.8..&X!|
|00002c70| 04 53 65 6c 66 16 9a 00 | 20 06 52 65 73 75 6c 74 |.Self...| .Result|
|00002c80| 16 58 00 63 28 39 54 41 | 64 72 6f 63 6b 33 64 43 |.X.c(9TA|drock3dC|
|00002c90| 61 6c 65 6e 64 61 72 2e | 52 65 74 75 72 6e 53 70 |alendar.|ReturnSp|
|00002ca0| 61 63 65 42 65 74 77 65 | 65 6e 57 65 65 6b 44 61 |aceBetwe|enWeekDa|
|00002cb0| 79 48 65 61 64 65 72 41 | 6e 64 43 65 6c 6c 73 80 |yHeaderA|ndCells.|
|00002cc0| 26 d1 38 15 00 26 58 21 | 04 53 65 6c 66 16 9a 00 |&.8..&X!|.Self...|
|00002cd0| 20 06 52 65 73 75 6c 74 | 16 58 00 63 28 22 54 41 | .Result|.X.c("TA|
|00002ce0| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 2e |drock3dC|alendar.|
|00002cf0| 52 65 74 75 72 6e 42 65 | 76 65 6c 57 69 64 74 68 |ReturnBe|velWidth|
|00002d00| 80 26 d1 38 15 00 26 58 | 21 04 53 65 6c 66 16 9a |.&.8..&X|!.Self..|
|00002d10| 00 20 06 52 65 73 75 6c | 74 16 58 00 63 28 23 54 |. .Resul|t.X.c(#T|
|00002d20| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|00002d30| 2e 52 65 74 75 72 6e 42 | 6f 72 64 65 72 57 69 64 |.ReturnB|orderWid|
|00002d40| 74 68 80 26 d1 38 15 00 | 24 58 21 04 53 65 6c 66 |th.&.8..|$X!.Self|
|00002d50| 16 9a 00 20 06 52 65 73 | 75 6c 74 16 58 00 63 28 |... .Res|ult.X.c(|
|00002d60| 2b 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |+TAdrock|3dCalend|
|00002d70| 61 72 2e 52 65 74 75 72 | 6e 42 6f 72 64 65 72 41 |ar.Retur|nBorderA|
|00002d80| 6e 64 42 65 76 65 6c 57 | 69 64 74 68 80 26 d1 38 |ndBevelW|idth.&.8|
|00002d90| 15 00 36 58 21 04 53 65 | 6c 66 16 9a 06 20 06 52 |..6X!.Se|lf... .R|
|00002da0| 65 73 75 6c 74 16 58 00 | 63 28 2d 54 41 64 72 6f |esult.X.|c(-TAdro|
|00002db0| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 52 65 74 |ck3dCale|ndar.Ret|
|00002dc0| 75 72 6e 42 65 76 65 6c | 57 69 64 74 68 41 72 6f |urnBevel|WidthAro|
|00002dd0| 75 6e 64 43 65 6c 6c 73 | 80 26 d1 38 15 00 26 58 |undCells|.&.8..&X|
|00002de0| 21 04 53 65 6c 66 16 9a | 00 20 06 52 65 73 75 6c |!.Self..|. .Resul|
|00002df0| 74 16 58 00 63 28 28 54 | 41 64 72 6f 63 6b 33 64 |t.X.c((T|Adrock3d|
|00002e00| 43 61 6c 65 6e 64 61 72 | 2e 52 65 74 75 72 6e 41 |Calendar|.ReturnA|
|00002e10| 6c 6c 53 70 61 63 65 41 | 74 42 6f 74 74 6f 6d 80 |llSpaceA|tBottom.|
|00002e20| 26 d1 38 15 00 68 58 21 | 04 53 65 6c 66 16 9a 06 |&.8..hX!|.Self...|
|00002e30| 20 06 52 65 73 75 6c 74 | 16 58 08 63 28 2a 54 41 | .Result|.X.c(*TA|
|00002e40| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 2e |drock3dC|alendar.|
|00002e50| 52 65 74 75 72 6e 4f 66 | 66 73 65 74 54 6f 42 75 |ReturnOf|fsetToBu|
|00002e60| 74 74 6f 6e 73 54 6f 70 | 80 26 d1 38 15 00 6c 58 |ttonsTop|.&.8..lX|
|00002e70| 21 04 53 65 6c 66 16 9a | 06 20 06 52 65 73 75 6c |!.Self..|. .Resul|
|00002e80| 74 16 58 00 63 28 29 54 | 41 64 72 6f 63 6b 33 64 |t.X.c()T|Adrock3d|
|00002e90| 43 61 6c 65 6e 64 61 72 | 2e 52 65 74 75 72 6e 4f |Calendar|.ReturnO|
|00002ea0| 66 66 73 65 74 54 6f 43 | 65 6c 6c 73 4c 65 66 74 |ffsetToC|ellsLeft|
|00002eb0| 80 26 d1 38 15 00 9a 58 | 21 04 53 65 6c 66 16 9a |.&.8...X|!.Self..|
|00002ec0| 06 20 06 52 65 73 75 6c | 74 16 58 00 63 28 28 54 |. .Resul|t.X.c((T|
|00002ed0| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|00002ee0| 2e 52 65 74 75 72 6e 4f | 66 66 73 65 74 54 6f 43 |.ReturnO|ffsetToC|
|00002ef0| 65 6c 6c 73 54 6f 70 80 | 26 d1 38 15 00 7e 58 21 |ellsTop.|&.8..~X!|
|00002f00| 04 53 65 6c 66 16 9a 06 | 20 06 52 65 73 75 6c 74 |.Self...| .Result|
|00002f10| 16 58 00 63 28 29 54 41 | 64 72 6f 63 6b 33 64 43 |.X.c()TA|drock3dC|
|00002f20| 61 6c 65 6e 64 61 72 2e | 52 65 74 75 72 6e 4f 66 |alendar.|ReturnOf|
|00002f30| 66 73 65 74 54 6f 43 6f | 6d 62 6f 73 54 6f 70 80 |fsetToCo|mbosTop.|
|00002f40| 26 d1 38 15 00 5c 58 21 | 04 53 65 6c 66 16 9a 06 |&.8..\X!|.Self...|
|00002f50| 20 06 52 65 73 75 6c 74 | 16 58 00 63 28 20 54 41 | .Result|.X.c( TA|
|00002f60| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 2e |drock3dC|alendar.|
|00002f70| 52 65 74 75 72 6e 43 65 | 6c 6c 52 65 63 74 80 26 |ReturnCe|llRect.&|
|00002f80| d1 38 15 00 45 02 4e 21 | 04 53 65 6c 66 16 9a 08 |.8..E.N!|.Self...|
|00002f90| 21 05 43 65 6c 6c 58 16 | 58 06 21 05 43 65 6c 6c |!.CellX.|X.!.Cell|
|00002fa0| 59 66 58 f8 23 06 52 65 | 73 75 6c 74 26 4e 10 20 |YfX.#.Re|sult&N. |
|00002fb0| 0e 53 69 6e 67 6c 65 43 | 65 6c 6c 52 65 63 74 66 |.SingleC|ellRectf|
|00002fc0| 4e d8 20 06 4d 79 52 65 | 63 74 66 4e b8 20 05 4c |N. .MyRe|ctfN. .L|
|00002fd0| 6f 6f 70 58 16 58 00 20 | 05 4c 6f 6f 70 59 16 58 |oopX.X. |.LoopY.X|
|00002fe0| 00 63 28 26 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c(&TAdr|ock3dCal|
|00002ff0| 65 6e 64 61 72 2e 52 65 | 74 75 72 6e 49 6e 73 69 |endar.Re|turnInsi|
|00003000| 64 65 43 65 6c 6c 52 65 | 63 74 80 26 d1 38 15 00 |deCellRe|ct.&.8..|
|00003010| b4 4e 21 04 53 65 6c 66 | 16 9a 06 21 05 43 65 6c |.N!.Self|...!.Cel|
|00003020| 6c 58 16 58 08 21 05 43 | 65 6c 6c 59 16 58 0a 23 |lX.X.!.C|ellY.X.#|
|00003030| 06 52 65 73 75 6c 74 26 | 4e 10 20 06 4d 79 52 65 |.Result&|N. .MyRe|
|00003040| 63 74 66 4e e0 63 28 2f | 54 41 64 72 6f 63 6b 33 |ctfN.c(/|TAdrock3|
|00003050| 64 43 61 6c 65 6e 64 61 | 72 2e 52 65 74 75 72 6e |dCalenda|r.Return|
|00003060| 49 6e 73 69 64 65 43 65 | 6c 6c 52 65 63 74 46 72 |InsideCe|llRectFr|
|00003070| 6f 6d 49 6e 64 65 78 80 | 26 d1 38 15 00 60 4e 21 |omIndex.|&.8..`N!|
|00003080| 04 53 65 6c 66 16 9a 06 | 21 05 49 6e 64 65 78 16 |.Self...|!.Index.|
|00003090| 58 08 23 06 52 65 73 75 | 6c 74 16 4e 0c 63 28 21 |X.#.Resu|lt.N.c(!|
|000030a0| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|000030b0| 72 2e 52 65 74 75 72 6e | 43 65 6c 6c 73 52 65 63 |r.Return|CellsRec|
|000030c0| 74 80 26 d1 38 15 00 51 | 02 4e 21 04 53 65 6c 66 |t.&.8..Q|.N!.Self|
|000030d0| 16 9a 06 23 06 52 65 73 | 75 6c 74 16 4e 0c 20 13 |...#.Res|ult.N. .|
|000030e0| 44 61 79 48 65 61 64 65 | 72 44 69 6d 65 6e 73 69 |DayHeade|rDimensi|
|000030f0| 6f 6e 73 66 4e 00 20 0e | 53 69 6e 67 6c 65 43 65 |onsfN. .|SingleCe|
|00003100| 6c 6c 52 65 63 74 66 4e | 20 20 05 4c 6f 6f 70 59 |llRectfN| .LoopY|
|00003110| 16 58 08 20 05 4c 6f 6f | 70 58 16 58 08 63 28 28 |.X. .Loo|pX.X.c((|
|00003120| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00003130| 72 2e 52 65 74 75 72 6e | 4f 75 74 53 69 64 65 43 |r.Return|OutSideC|
|00003140| 65 6c 6c 73 52 65 63 74 | 80 26 d1 38 15 00 86 4e |ellsRect|.&.8...N|
|00003150| 21 04 53 65 6c 66 16 9a | 06 23 06 52 65 73 75 6c |!.Self..|.#.Resul|
|00003160| 74 16 4e 08 20 13 44 61 | 79 48 65 61 64 65 72 44 |t.N. .Da|yHeaderD|
|00003170| 69 6d 65 6e 73 69 6f 6e | 73 66 4e 00 63 28 17 54 |imension|sfN.c(.T|
|00003180| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|00003190| 2e 50 61 69 6e 74 80 26 | d1 38 15 00 a5 02 9c 21 |.Paint.&|.8.....!|
|000031a0| 04 53 65 6c 66 16 9a 06 | 63 28 28 54 41 64 72 6f |.Self...|c((TAdro|
|000031b0| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 44 72 61 |ck3dCale|ndar.Dra|
|000031c0| 77 43 61 6c 65 6e 64 61 | 72 42 61 63 6b 47 72 6f |wCalenda|rBackGro|
|000031d0| 75 6e 64 80 26 d1 38 15 | 00 6a 9c 21 04 53 65 6c |und.&.8.|.j.!.Sel|
|000031e0| 66 16 9a 06 63 28 24 54 | 41 64 72 6f 63 6b 33 64 |f...c($T|Adrock3d|
|000031f0| 43 61 6c 65 6e 64 61 72 | 2e 44 72 61 77 43 61 6c |Calendar|.DrawCal|
|00003200| 65 6e 64 61 72 42 6f 72 | 64 65 72 80 26 d1 38 15 |endarBor|der.&.8.|
|00003210| 00 a1 02 9c 21 04 53 65 | 6c 66 16 9a 06 20 06 4d |....!.Se|lf... .M|
|00003220| 59 52 65 63 74 66 4e 00 | 63 28 23 54 41 64 72 6f |YRectfN.|c(#TAdro|
|00003230| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 44 72 61 |ck3dCale|ndar.Dra|
|00003240| 77 57 65 65 6b 44 61 79 | 48 65 61 64 65 72 80 26 |wWeekDay|Header.&|
|00003250| d1 38 15 00 e5 09 9c 21 | 04 53 65 6c 66 16 9a 06 |.8.....!|.Self...|
|00003260| 20 0c 74 65 78 74 44 72 | 61 77 46 6c 61 67 66 62 | .textDr|awFlagfb|
|00003270| fc 20 08 43 65 6c 6c 52 | 65 63 74 66 4e d8 20 01 |. .CellR|ectfN. .|
|00003280| 69 16 58 08 20 06 44 61 | 79 50 6f 73 16 58 0a 20 |i.X. .Da|yPos.X. |
|00003290| 08 54 65 6d 70 52 65 63 | 74 66 4e b8 63 28 1f 54 |.TempRec|tfN.c(.T|
|000032a0| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|000032b0| 2e 53 65 74 43 65 6c 6c | 53 70 61 63 65 58 80 26 |.SetCell|SpaceX.&|
|000032c0| d1 38 15 00 36 9c 21 04 | 53 65 6c 66 16 9a 00 21 |.8..6.!.|Self...!|
|000032d0| 09 4e 65 77 53 70 61 63 | 65 58 16 58 02 63 28 1f |.NewSpac|eX.X.c(.|
|000032e0| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|000032f0| 72 2e 53 65 74 43 65 6c | 6c 53 70 61 63 65 59 80 |r.SetCel|lSpaceY.|
|00003300| 26 d1 38 15 00 36 9c 21 | 04 53 65 6c 66 16 9a 00 |&.8..6.!|.Self...|
|00003310| 21 09 4e 65 77 53 70 61 | 63 65 59 16 58 02 63 28 |!.NewSpa|ceY.X.c(|
|00003320| 1e 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |.TAdrock|3dCalend|
|00003330| 61 72 2e 53 65 74 43 65 | 6c 6c 42 65 76 65 6c 80 |ar.SetCe|llBevel.|
|00003340| 26 d1 38 15 00 52 9c 21 | 04 53 65 6c 66 16 9a 06 |&.8..R.!|.Self...|
|00003350| 21 08 4e 65 77 42 65 76 | 65 6c 16 04 02 63 28 23 |!.NewBev|el...c(#|
|00003360| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00003370| 72 2e 53 65 74 43 65 6c | 6c 42 65 76 65 6c 57 69 |r.SetCel|lBevelWi|
|00003380| 64 74 68 80 26 d1 38 15 | 00 52 9c 21 04 53 65 6c |dth.&.8.|.R.!.Sel|
|00003390| 66 16 9a 06 21 0d 4e 65 | 77 42 65 76 65 6c 57 69 |f...!.Ne|wBevelWi|
|000033a0| 64 74 68 16 58 02 63 28 | 27 54 41 64 72 6f 63 6b |dth.X.c(|'TAdrock|
|000033b0| 33 64 43 61 6c 65 6e 64 | 61 72 2e 53 65 74 43 65 |3dCalend|ar.SetCe|
|000033c0| 6c 6c 73 53 75 72 72 6f | 75 6e 64 42 65 76 65 6c |llsSurro|undBevel|
|000033d0| 80 26 d1 38 15 00 36 9c | 21 04 53 65 6c 66 16 9a |.&.8..6.|!.Self..|
|000033e0| 00 21 08 4e 65 77 42 65 | 76 65 6c 16 04 02 63 28 |.!.NewBe|vel...c(|
|000033f0| 2c 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |,TAdrock|3dCalend|
|00003400| 61 72 2e 53 65 74 43 65 | 6c 6c 73 53 75 72 72 6f |ar.SetCe|llsSurro|
|00003410| 75 6e 64 42 65 76 65 6c | 57 69 64 74 68 80 26 d1 |undBevel|Width.&.|
|00003420| 38 15 00 36 9c 21 04 53 | 65 6c 66 16 9a 00 21 0d |8..6.!.S|elf...!.|
|00003430| 4e 65 77 42 65 76 65 6c | 57 69 64 74 68 16 58 02 |NewBevel|Width.X.|
|00003440| 63 28 27 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c('TAdro|ck3dCale|
|00003450| 6e 64 61 72 2e 53 65 74 | 57 65 65 6b 44 61 79 48 |ndar.Set|WeekDayH|
|00003460| 65 61 64 65 72 42 65 76 | 65 6c 80 26 d1 38 15 00 |eaderBev|el.&.8..|
|00003470| 28 9c 21 04 53 65 6c 66 | 16 9a 00 21 08 4e 65 77 |(.!.Self|...!.New|
|00003480| 42 65 76 65 6c 16 04 02 | 63 28 2c 54 41 64 72 6f |Bevel...|c(,TAdro|
|00003490| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 53 65 74 |ck3dCale|ndar.Set|
|000034a0| 57 65 65 6b 44 61 79 48 | 65 61 64 65 72 42 65 76 |WeekDayH|eaderBev|
|000034b0| 65 6c 57 69 64 74 68 80 | 26 d1 38 15 00 28 9c 21 |elWidth.|&.8..(.!|
|000034c0| 04 53 65 6c 66 16 9a 00 | 21 0d 4e 65 77 42 65 76 |.Self...|!.NewBev|
|000034d0| 65 6c 57 69 64 74 68 16 | 58 02 63 28 1f 54 41 64 |elWidth.|X.c(.TAd|
|000034e0| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 53 |rock3dCa|lendar.S|
|000034f0| 65 74 43 75 72 72 65 6e | 74 44 61 79 80 26 d1 38 |etCurren|tDay.&.8|
|00003500| 15 00 6a 9c 21 04 53 65 | 6c 66 16 9a 06 21 06 4e |..j.!.Se|lf...!.N|
|00003510| 65 77 44 61 79 16 62 08 | 63 28 21 54 41 64 72 6f |ewDay.b.|c(!TAdro|
|00003520| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 53 65 74 |ck3dCale|ndar.Set|
|00003530| 43 75 72 72 65 6e 74 4d | 6f 6e 74 68 80 26 d1 38 |CurrentM|onth.&.8|
|00003540| 15 00 6a 9c 21 04 53 65 | 6c 66 16 9a 06 21 08 4e |..j.!.Se|lf...!.N|
|00003550| 65 77 4d 6f 6e 74 68 16 | 62 08 63 28 20 54 41 64 |ewMonth.|b.c( TAd|
|00003560| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 53 |rock3dCa|lendar.S|
|00003570| 65 74 43 75 72 72 65 6e | 74 59 65 61 72 80 26 d1 |etCurren|tYear.&.|
|00003580| 38 15 00 6a 9c 21 04 53 | 65 6c 66 16 9a 06 21 07 |8..j.!.S|elf...!.|
|00003590| 4e 65 77 59 65 61 72 16 | 62 08 63 28 19 54 41 64 |NewYear.|b.c(.TAd|
|000035a0| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 53 |rock3dCa|lendar.S|
|000035b0| 65 74 44 61 74 65 80 26 | d1 38 15 00 05 0a 9c 21 |etDate.&|.8.....!|
|000035c0| 04 53 65 6c 66 16 9a 06 | 21 07 4e 65 77 44 61 74 |.Self...|!.NewDat|
|000035d0| 65 26 60 10 20 05 41 59 | 65 61 72 66 62 fc 20 06 |e&`. .AY|earfb. .|
|000035e0| 41 4d 6f 6e 74 68 66 62 | f8 20 04 41 44 61 79 66 |AMonthfb|. .ADayf|
|000035f0| 62 f4 63 28 29 54 41 64 | 72 6f 63 6b 33 64 43 61 |b.c()TAd|rock3dCa|
|00003600| 6c 65 6e 64 61 72 2e 54 | 72 69 67 67 65 72 44 61 |lendar.T|riggerDa|
|00003610| 74 65 43 68 61 6e 67 65 | 45 76 65 6e 74 73 80 26 |teChange|Events.&|
|00003620| d1 38 15 00 15 03 9c 21 | 04 53 65 6c 66 16 9a 06 |.8.....!|.Self...|
|00003630| 63 28 25 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c(%TAdro|ck3dCale|
|00003640| 6e 64 61 72 2e 53 65 74 | 44 61 74 65 42 61 73 65 |ndar.Set|DateBase|
|00003650| 64 4f 6e 49 6e 64 65 78 | 80 26 d1 38 15 00 a4 9c |dOnIndex|.&.8....|
|00003660| 21 04 53 65 6c 66 16 9a | 06 21 05 49 6e 64 65 78 |!.Self..|.!.Index|
|00003670| 16 58 08 20 05 41 44 61 | 74 65 66 60 00 63 28 1f |.X. .ADa|tef`.c(.|
|00003680| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00003690| 72 2e 53 65 74 44 61 74 | 65 53 74 72 69 6e 67 80 |r.SetDat|eString.|
|000036a0| 26 d1 38 15 00 b6 9c 21 | 04 53 65 6c 66 16 9a 06 |&.8....!|.Self...|
|000036b0| 21 07 4e 65 77 44 61 74 | 65 66 56 f8 63 28 1c 54 |!.NewDat|efV.c(.T|
|000036c0| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|000036d0| 2e 44 61 74 65 53 74 72 | 69 6e 67 80 26 d1 38 15 |.DateStr|ing.&.8.|
|000036e0| 00 42 56 21 04 53 65 6c | 66 16 9a 06 23 06 52 65 |.BV!.Sel|f...#.Re|
|000036f0| 73 75 6c 74 16 56 08 63 | 28 1f 54 41 64 72 6f 63 |sult.V.c|(.TAdroc|
|00003700| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 53 65 74 42 |k3dCalen|dar.SetB|
|00003710| 65 76 65 6c 57 69 64 74 | 68 80 26 d1 38 15 00 36 |evelWidt|h.&.8..6|
|00003720| 9c 21 04 53 65 6c 66 16 | 9a 00 21 08 4e 65 77 57 |.!.Self.|..!.NewW|
|00003730| 69 64 74 68 16 58 02 63 | 28 1a 54 41 64 72 6f 63 |idth.X.c|(.TAdroc|
|00003740| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 53 65 74 42 |k3dCalen|dar.SetB|
|00003750| 65 76 65 6c 80 26 d1 38 | 15 00 36 9c 21 04 53 65 |evel.&.8|..6.!.Se|
|00003760| 6c 66 16 9a 00 21 08 4e | 65 77 42 65 76 65 6c 16 |lf...!.N|ewBevel.|
|00003770| 04 02 63 28 21 54 41 64 | 72 6f 63 6b 33 64 43 61 |..c(!TAd|rock3dCa|
|00003780| 6c 65 6e 64 61 72 2e 53 | 65 74 42 75 74 74 6f 6e |lendar.S|etButton|
|00003790| 48 65 69 67 68 74 80 26 | d1 38 15 00 c4 9c 21 04 |Height.&|.8....!.|
|000037a0| 53 65 6c 66 16 9a 06 21 | 0f 4e 65 77 42 75 74 74 |Self...!|.NewButt|
|000037b0| 6f 6e 48 65 69 67 68 74 | 16 58 08 63 28 1f 54 41 |onHeight|.X.c(.TA|
|000037c0| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 2e |drock3dC|alendar.|
|000037d0| 53 65 74 43 65 6c 6c 48 | 65 69 67 68 74 80 26 d1 |SetCellH|eight.&.|
|000037e0| 38 15 00 36 9c 21 04 53 | 65 6c 66 16 9a 00 21 0d |8..6.!.S|elf...!.|
|000037f0| 4e 65 77 43 65 6c 6c 48 | 65 69 67 68 74 16 58 02 |NewCellH|eight.X.|
|00003800| 63 28 1e 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c(.TAdro|ck3dCale|
|00003810| 6e 64 61 72 2e 53 65 74 | 43 65 6c 6c 57 69 64 74 |ndar.Set|CellWidt|
|00003820| 68 80 26 d1 38 15 00 36 | 9c 21 04 53 65 6c 66 16 |h.&.8..6|.!.Self.|
|00003830| 9a 00 21 0c 4e 65 77 43 | 65 6c 6c 57 69 64 74 68 |..!.NewC|ellWidth|
|00003840| 16 58 02 63 28 1e 54 41 | 64 72 6f 63 6b 33 64 43 |.X.c(.TA|drock3dC|
|00003850| 61 6c 65 6e 64 61 72 2e | 53 65 74 43 6f 6c 6f 72 |alendar.|SetColor|
|00003860| 42 61 63 6b 80 26 d1 38 | 15 00 28 9c 21 04 53 65 |Back.&.8|..(.!.Se|
|00003870| 6c 66 16 9a 00 21 08 4e | 65 77 43 6f 6c 6f 72 16 |lf...!.N|ewColor.|
|00003880| 32 02 63 28 24 54 41 64 | 72 6f 63 6b 33 64 43 61 |2.c($TAd|rock3dCa|
|00003890| 6c 65 6e 64 61 72 2e 53 | 65 74 43 6f 6c 6f 72 43 |lendar.S|etColorC|
|000038a0| 6f 6d 62 6f 73 42 61 63 | 6b 80 26 d1 38 15 00 62 |ombosBac|k.&.8..b|
|000038b0| 9c 21 04 53 65 6c 66 16 | 9a 06 21 08 4e 65 77 43 |.!.Self.|..!.NewC|
|000038c0| 6f 6c 6f 72 16 32 08 63 | 28 2d 54 41 64 72 6f 63 |olor.2.c|(-TAdroc|
|000038d0| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 53 65 74 43 |k3dCalen|dar.SetC|
|000038e0| 6f 6c 6f 72 57 65 65 6b | 44 61 79 48 65 61 64 65 |olorWeek|DayHeade|
|000038f0| 72 4d 6f 6e 46 72 69 80 | 26 d1 38 15 00 28 9c 21 |rMonFri.|&.8..(.!|
|00003900| 04 53 65 6c 66 16 9a 00 | 21 08 4e 65 77 43 6f 6c |.Self...|!.NewCol|
|00003910| 6f 72 16 32 02 63 28 2f | 54 41 64 72 6f 63 6b 33 |or.2.c(/|TAdrock3|
|00003920| 64 43 61 6c 65 6e 64 61 | 72 2e 53 65 74 43 6f 6c |dCalenda|r.SetCol|
|00003930| 6f 72 57 65 65 6b 44 61 | 79 48 65 61 64 65 72 53 |orWeekDa|yHeaderS|
|00003940| 61 74 75 72 64 61 79 80 | 26 d1 38 15 00 28 9c 21 |aturday.|&.8..(.!|
|00003950| 04 53 65 6c 66 16 9a 00 | 21 08 4e 65 77 43 6f 6c |.Self...|!.NewCol|
|00003960| 6f 72 16 32 02 63 28 2d | 54 41 64 72 6f 63 6b 33 |or.2.c(-|TAdrock3|
|00003970| 64 43 61 6c 65 6e 64 61 | 72 2e 53 65 74 43 6f 6c |dCalenda|r.SetCol|
|00003980| 6f 72 57 65 65 6b 44 61 | 79 48 65 61 64 65 72 53 |orWeekDa|yHeaderS|
|00003990| 75 6e 64 61 79 80 26 d1 | 38 15 00 28 9c 21 04 53 |unday.&.|8..(.!.S|
|000039a0| 65 6c 66 16 9a 00 21 08 | 4e 65 77 43 6f 6c 6f 72 |elf...!.|NewColor|
|000039b0| 16 32 02 63 28 28 54 41 | 64 72 6f 63 6b 33 64 43 |.2.c((TA|drock3dC|
|000039c0| 61 6c 65 6e 64 61 72 2e | 53 65 74 43 6f 6c 6f 72 |alendar.|SetColor|
|000039d0| 43 65 6c 6c 73 48 69 67 | 68 6c 69 67 68 74 80 26 |CellsHig|hlight.&|
|000039e0| d1 38 15 00 28 9c 21 04 | 53 65 6c 66 16 9a 00 21 |.8..(.!.|Self...!|
|000039f0| 08 4e 65 77 43 6f 6c 6f | 72 16 32 02 63 28 25 54 |.NewColo|r.2.c(%T|
|00003a00| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|00003a10| 2e 53 65 74 43 6f 6c 6f | 72 43 65 6c 6c 73 53 68 |.SetColo|rCellsSh|
|00003a20| 61 64 6f 77 80 26 d1 38 | 15 00 28 9c 21 04 53 65 |adow.&.8|..(.!.Se|
|00003a30| 6c 66 16 9a 00 21 08 4e | 65 77 43 6f 6c 6f 72 16 |lf...!.N|ewColor.|
|00003a40| 32 02 63 28 2f 54 41 64 | 72 6f 63 6b 33 64 43 61 |2.c(/TAd|rock3dCa|
|00003a50| 6c 65 6e 64 61 72 2e 53 | 65 74 43 65 6c 6c 73 42 |lendar.S|etCellsB|
|00003a60| 65 74 77 65 65 6e 43 65 | 6c 6c 73 42 61 63 6b 43 |etweenCe|llsBackC|
|00003a70| 6f 6c 6f 72 80 26 d1 38 | 15 00 52 9c 21 04 53 65 |olor.&.8|..R.!.Se|
|00003a80| 6c 66 16 9a 06 21 08 4e | 65 77 43 6f 6c 6f 72 16 |lf...!.N|ewColor.|
|00003a90| 32 02 63 28 22 54 41 64 | 72 6f 63 6b 33 64 43 61 |2.c("TAd|rock3dCa|
|00003aa0| 6c 65 6e 64 61 72 2e 53 | 65 74 43 6f 6c 6f 72 53 |lendar.S|etColorS|
|00003ab0| 61 74 75 72 64 61 79 80 | 26 d1 38 15 00 38 9c 21 |aturday.|&.8..8.!|
|00003ac0| 04 53 65 6c 66 16 9a 00 | 21 08 4e 65 77 43 6f 6c |.Self...|!.NewCol|
|00003ad0| 6f 72 16 32 02 63 28 20 | 54 41 64 72 6f 63 6b 33 |or.2.c( |TAdrock3|
|00003ae0| 64 43 61 6c 65 6e 64 61 | 72 2e 53 65 74 43 6f 6c |dCalenda|r.SetCol|
|00003af0| 6f 72 53 75 6e 64 61 79 | 80 26 d1 38 15 00 38 9c |orSunday|.&.8..8.|
|00003b00| 21 04 53 65 6c 66 16 9a | 00 21 08 4e 65 77 43 6f |!.Self..|.!.NewCo|
|00003b10| 6c 6f 72 16 32 02 63 28 | 20 54 41 64 72 6f 63 6b |lor.2.c(| TAdrock|
|00003b20| 33 64 43 61 6c 65 6e 64 | 61 72 2e 53 65 74 43 6f |3dCalend|ar.SetCo|
|00003b30| 6c 6f 72 4d 6f 6e 46 72 | 69 80 26 d1 38 15 00 38 |lorMonFr|i.&.8..8|
|00003b40| 9c 21 04 53 65 6c 66 16 | 9a 00 21 08 4e 65 77 43 |.!.Self.|..!.NewC|
|00003b50| 6f 6c 6f 72 16 32 02 63 | 28 27 54 41 64 72 6f 63 |olor.2.c|('TAdroc|
|00003b60| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 53 65 74 43 |k3dCalen|dar.SetC|
|00003b70| 6f 6c 6f 72 50 72 65 76 | 4e 65 78 74 4d 6f 6e 74 |olorPrev|NextMont|
|00003b80| 68 80 26 d1 38 15 00 38 | 9c 21 04 53 65 6c 66 16 |h.&.8..8|.!.Self.|
|00003b90| 9a 00 21 08 4e 65 77 43 | 6f 6c 6f 72 16 32 02 63 |..!.NewC|olor.2.c|
|00003ba0| 28 26 54 41 64 72 6f 63 | 6b 33 64 43 61 6c 65 6e |(&TAdroc|k3dCalen|
|00003bb0| 64 61 72 2e 53 65 74 53 | 68 6f 77 50 72 65 76 4e |dar.SetS|howPrevN|
|00003bc0| 65 78 74 4d 6f 6e 74 68 | 80 26 d1 38 15 00 38 9c |extMonth|.&.8..8.|
|00003bd0| 21 04 53 65 6c 66 16 9a | 00 21 0c 53 68 6f 77 50 |!.Self..|.!.ShowP|
|00003be0| 72 65 76 4e 65 78 74 16 | 5c 02 63 28 22 54 41 64 |revNext.|\.c("TAd|
|00003bf0| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 53 |rock3dCa|lendar.S|
|00003c00| 65 74 53 68 6f 77 42 75 | 74 74 6f 6e 42 61 72 80 |etShowBu|ttonBar.|
|00003c10| 26 d1 38 15 00 36 9c 21 | 04 53 65 6c 66 16 9a 00 |&.8..6.!|.Self...|
|00003c20| 21 0b 53 68 6f 77 42 75 | 74 74 6f 6e 73 16 5c 02 |!.ShowBu|ttons.\.|
|00003c30| 63 28 24 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c($TAdro|ck3dCale|
|00003c40| 6e 64 61 72 2e 53 65 74 | 53 68 6f 77 57 65 65 6b |ndar.Set|ShowWeek|
|00003c50| 4e 75 6d 62 65 72 73 80 | 26 d1 38 15 00 36 9c 21 |Numbers.|&.8..6.!|
|00003c60| 04 53 65 6c 66 16 9a 00 | 21 12 4e 65 77 53 68 6f |.Self...|!.NewSho|
|00003c70| 77 57 65 65 6b 4e 75 6d | 62 65 72 73 16 5c 02 63 |wWeekNum|bers.\.c|
|00003c80| 28 22 54 41 64 72 6f 63 | 6b 33 64 43 61 6c 65 6e |("TAdroc|k3dCalen|
|00003c90| 64 61 72 2e 53 65 74 57 | 65 65 6b 44 61 79 48 65 |dar.SetW|eekDayHe|
|00003ca0| 61 64 65 72 80 26 d1 38 | 15 00 36 9c 21 04 53 65 |ader.&.8|..6.!.Se|
|00003cb0| 6c 66 16 9a 00 21 14 4e | 65 77 53 68 6f 77 57 65 |lf...!.N|ewShowWe|
|00003cc0| 65 6b 44 61 79 48 65 61 | 64 65 72 16 5c 02 63 28 |ekDayHea|der.\.c(|
|00003cd0| 2c 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |,TAdrock|3dCalend|
|00003ce0| 61 72 2e 53 65 74 57 65 | 65 6b 44 61 79 48 65 61 |ar.SetWe|ekDayHea|
|00003cf0| 64 65 72 44 69 73 70 6c | 61 79 4c 65 6e 80 26 d1 |derDispl|ayLen.&.|
|00003d00| 38 15 00 30 9c 21 04 53 | 65 6c 66 16 9a 00 21 0d |8..0.!.S|elf...!.|
|00003d10| 4e 65 77 44 69 73 70 6c | 61 79 4c 65 6e 16 58 02 |NewDispl|ayLen.X.|
|00003d20| 63 28 2a 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c(*TAdro|ck3dCale|
|00003d30| 6e 64 61 72 2e 53 65 74 | 43 65 6c 6c 56 65 72 74 |ndar.Set|CellVert|
|00003d40| 69 63 61 6c 54 65 78 74 | 41 6c 69 67 6e 80 26 d1 |icalText|Align.&.|
|00003d50| 38 15 00 38 9c 21 04 53 | 65 6c 66 16 9a 00 21 14 |8..8.!.S|elf...!.|
|00003d60| 4e 65 77 56 65 72 74 69 | 63 61 6c 54 65 78 74 41 |NewVerti|calTextA|
|00003d70| 6c 69 67 6e 16 82 02 63 | 28 2c 54 41 64 72 6f 63 |lign...c|(,TAdroc|
|00003d80| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 53 65 74 43 |k3dCalen|dar.SetC|
|00003d90| 65 6c 6c 48 6f 72 69 7a | 6f 6e 74 61 6c 54 65 78 |ellHoriz|ontalTex|
|00003da0| 74 41 6c 69 67 6e 80 26 | d1 38 15 00 38 9c 21 04 |tAlign.&|.8..8.!.|
|00003db0| 53 65 6c 66 16 9a 00 21 | 16 4e 65 77 48 6f 72 69 |Self...!|.NewHori|
|00003dc0| 7a 6f 6e 74 61 6c 54 65 | 78 74 41 6c 69 67 6e 16 |zontalTe|xtAlign.|
|00003dd0| 84 02 63 28 2b 54 41 64 | 72 6f 63 6b 33 64 43 61 |..c(+TAd|rock3dCa|
|00003de0| 6c 65 6e 64 61 72 2e 53 | 65 74 57 65 65 6b 44 61 |lendar.S|etWeekDa|
|00003df0| 79 48 65 61 64 65 72 54 | 65 78 74 41 6c 69 67 6e |yHeaderT|extAlign|
|00003e00| 80 26 d1 38 15 00 28 9c | 21 04 53 65 6c 66 16 9a |.&.8..(.|!.Self..|
|00003e10| 00 21 16 4e 65 77 48 6f | 72 69 7a 6f 6e 74 61 6c |.!.NewHo|rizontal|
|00003e20| 54 65 78 74 41 6c 69 67 | 6e 16 84 02 63 28 23 54 |TextAlig|n...c(#T|
|00003e30| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|00003e40| 2e 53 65 74 43 65 6c 6c | 73 42 61 63 6b 43 6f 6c |.SetCell|sBackCol|
|00003e50| 6f 72 80 26 d1 38 15 00 | 38 9c 21 04 53 65 6c 66 |or.&.8..|8.!.Self|
|00003e60| 16 9a 00 21 08 4e 65 77 | 43 6f 6c 6f 72 16 32 02 |...!.New|Color.2.|
|00003e70| 63 28 27 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c('TAdro|ck3dCale|
|00003e80| 6e 64 61 72 2e 53 65 74 | 44 61 79 48 65 61 64 65 |ndar.Set|DayHeade|
|00003e90| 72 42 61 63 6b 43 6f 6c | 6f 72 80 26 d1 38 15 00 |rBackCol|or.&.8..|
|00003ea0| 28 9c 21 04 53 65 6c 66 | 16 9a 00 21 08 4e 65 77 |(.!.Self|...!.New|
|00003eb0| 43 6f 6c 6f 72 16 32 02 | 63 28 2b 54 41 64 72 6f |Color.2.|c(+TAdro|
|00003ec0| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 53 65 74 |ck3dCale|ndar.Set|
|00003ed0| 43 65 6c 6c 73 53 65 6c | 65 63 74 65 64 42 61 63 |CellsSel|ectedBac|
|00003ee0| 6b 43 6f 6c 6f 72 80 26 | d1 38 15 00 34 9c 21 04 |kColor.&|.8..4.!.|
|00003ef0| 53 65 6c 66 16 9a 00 21 | 08 4e 65 77 43 6f 6c 6f |Self...!|.NewColo|
|00003f00| 72 16 32 02 63 28 2b 54 | 41 64 72 6f 63 6b 33 64 |r.2.c(+T|Adrock3d|
|00003f10| 43 61 6c 65 6e 64 61 72 | 2e 53 65 74 50 72 65 76 |Calendar|.SetPrev|
|00003f20| 4e 65 78 74 4d 6f 6e 74 | 68 42 61 63 6b 43 6f 6c |NextMont|hBackCol|
|00003f30| 6f 72 80 26 d1 38 15 00 | 38 9c 21 04 53 65 6c 66 |or.&.8..|8.!.Self|
|00003f40| 16 9a 00 21 08 4e 65 77 | 43 6f 6c 6f 72 16 32 02 |...!.New|Color.2.|
|00003f50| 63 28 20 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c( TAdro|ck3dCale|
|00003f60| 6e 64 61 72 2e 53 65 74 | 53 74 61 72 74 6f 66 57 |ndar.Set|StartofW|
|00003f70| 65 65 6b 80 26 d1 38 15 | 00 42 9c 21 04 53 65 6c |eek.&.8.|.B.!.Sel|
|00003f80| 66 16 9a 06 21 0b 4e 65 | 77 53 74 61 72 74 44 61 |f...!.Ne|wStartDa|
|00003f90| 79 16 8e 02 63 28 23 54 | 41 64 72 6f 63 6b 33 64 |y...c(#T|Adrock3d|
|00003fa0| 43 61 6c 65 6e 64 61 72 | 2e 53 65 74 53 68 6f 77 |Calendar|.SetShow|
|00003fb0| 4f 6e 43 61 6c 65 6e 64 | 61 72 80 26 d1 38 15 00 |OnCalend|ar.&.8..|
|00003fc0| 56 9c 21 04 53 65 6c 66 | 16 9a 06 21 07 4e 65 77 |V.!.Self|...!.New|
|00003fd0| 53 68 6f 77 16 86 02 63 | 28 28 54 41 64 72 6f 63 |Show...c|((TAdroc|
|00003fe0| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 53 65 74 54 |k3dCalen|dar.SetT|
|00003ff0| 65 78 74 33 64 57 65 65 | 6b 44 61 79 48 65 61 64 |ext3dWee|kDayHead|
|00004000| 65 72 80 26 d1 38 15 00 | 18 9c 21 04 53 65 6c 66 |er.&.8..|..!.Self|
|00004010| 16 9a 00 21 06 45 66 66 | 65 63 74 16 88 02 63 28 |...!.Eff|ect...c(|
|00004020| 21 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |!TAdrock|3dCalend|
|00004030| 61 72 2e 53 65 74 54 65 | 78 74 33 64 4c 61 62 65 |ar.SetTe|xt3dLabe|
|00004040| 6c 73 80 26 d1 38 15 00 | 18 9c 21 04 53 65 6c 66 |ls.&.8..|..!.Self|
|00004050| 16 9a 00 21 06 45 66 66 | 65 63 74 16 88 02 63 28 |...!.Eff|ect...c(|
|00004060| 26 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |&TAdrock|3dCalend|
|00004070| 61 72 2e 53 65 74 54 65 | 78 74 33 64 48 69 67 68 |ar.SetTe|xt3dHigh|
|00004080| 6c 69 67 68 74 65 64 80 | 26 d1 38 15 00 18 9c 21 |lighted.|&.8....!|
|00004090| 04 53 65 6c 66 16 9a 00 | 21 06 45 66 66 65 63 74 |.Self...|!.Effect|
|000040a0| 16 88 02 63 28 20 54 41 | 64 72 6f 63 6b 33 64 43 |...c( TA|drock3dC|
|000040b0| 61 6c 65 6e 64 61 72 2e | 53 65 74 54 65 78 74 33 |alendar.|SetText3|
|000040c0| 64 43 65 6c 6c 73 80 26 | d1 38 15 00 28 9c 21 04 |dCells.&|.8..(.!.|
|000040d0| 53 65 6c 66 16 9a 00 21 | 06 45 66 66 65 63 74 16 |Self...!|.Effect.|
|000040e0| 88 02 63 28 26 54 41 64 | 72 6f 63 6b 33 64 43 61 |..c(&TAd|rock3dCa|
|000040f0| 6c 65 6e 64 61 72 2e 53 | 65 74 53 68 6f 77 53 61 |lendar.S|etShowSa|
|00004100| 74 75 72 64 61 79 43 6f | 6c 6f 72 80 26 d1 38 15 |turdayCo|lor.&.8.|
|00004110| 00 38 9c 21 04 53 65 6c | 66 16 9a 00 21 0c 53 68 |.8.!.Sel|f...!.Sh|
|00004120| 6f 77 53 61 74 75 72 64 | 61 79 16 5c 02 63 28 24 |owSaturd|ay.\.c($|
|00004130| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00004140| 72 2e 53 65 74 53 68 6f | 77 53 75 6e 64 61 79 43 |r.SetSho|wSundayC|
|00004150| 6f 6c 6f 72 80 26 d1 38 | 15 00 38 9c 21 04 53 65 |olor.&.8|..8.!.Se|
|00004160| 6c 66 16 9a 00 21 0a 53 | 68 6f 77 53 75 6e 64 61 |lf...!.S|howSunda|
|00004170| 79 16 5c 02 63 28 26 54 | 41 64 72 6f 63 6b 33 64 |y.\.c(&T|Adrock3d|
|00004180| 43 61 6c 65 6e 64 61 72 | 2e 53 65 74 53 68 6f 77 |Calendar|.SetShow|
|00004190| 43 75 73 74 6f 6d 43 75 | 72 73 6f 72 73 80 26 d1 |CustomCu|rsors.&.|
|000041a0| 38 15 00 1e 9c 21 04 53 | 65 6c 66 16 9a 00 21 09 |8....!.S|elf...!.|
|000041b0| 53 68 6f 77 4d 6f 75 73 | 65 16 5c 02 63 28 30 54 |ShowMous|e.\.c(0T|
|000041c0| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|000041d0| 2e 53 65 74 53 70 61 63 | 65 42 65 74 77 65 65 6e |.SetSpac|eBetween|
|000041e0| 43 65 6c 6c 73 61 6e 64 | 42 75 74 74 6f 6e 73 80 |Cellsand|Buttons.|
|000041f0| 26 d1 38 15 00 36 9c 21 | 04 53 65 6c 66 16 9a 00 |&.8..6.!|.Self...|
|00004200| 21 08 4e 65 77 53 70 61 | 63 65 16 58 02 63 28 23 |!.NewSpa|ce.X.c(#|
|00004210| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00004220| 72 2e 53 65 74 53 70 61 | 63 65 46 72 6f 6d 53 69 |r.SetSpa|ceFromSi|
|00004230| 64 65 73 80 26 d1 38 15 | 00 36 9c 21 04 53 65 6c |des.&.8.|.6.!.Sel|
|00004240| 66 16 9a 00 21 08 4e 65 | 77 53 70 61 63 65 16 58 |f...!.Ne|wSpace.X|
|00004250| 02 63 28 26 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c(&TAdr|ock3dCal|
|00004260| 65 6e 64 61 72 2e 52 65 | 74 75 72 6e 53 70 61 63 |endar.Re|turnSpac|
|00004270| 65 46 72 6f 6d 53 69 64 | 65 73 80 26 d1 38 15 00 |eFromSid|es.&.8..|
|00004280| 24 58 21 04 53 65 6c 66 | 16 9a 06 20 06 52 65 73 |$X!.Self|... .Res|
|00004290| 75 6c 74 16 58 00 63 28 | 2d 54 41 64 72 6f 63 6b |ult.X.c(|-TAdrock|
|000042a0| 33 64 43 61 6c 65 6e 64 | 61 72 2e 53 65 74 53 70 |3dCalend|ar.SetSp|
|000042b0| 61 63 65 42 65 74 77 65 | 65 6e 54 6f 70 41 6e 64 |aceBetwe|enTopAnd|
|000042c0| 4c 61 62 65 6c 73 80 26 | d1 38 15 00 36 9c 21 04 |Labels.&|.8..6.!.|
|000042d0| 53 65 6c 66 16 9a 00 21 | 08 4e 65 77 53 70 61 63 |Self...!|.NewSpac|
|000042e0| 65 16 58 02 63 28 30 54 | 41 64 72 6f 63 6b 33 64 |e.X.c(0T|Adrock3d|
|000042f0| 43 61 6c 65 6e 64 61 72 | 2e 52 65 74 75 72 6e 53 |Calendar|.ReturnS|
|00004300| 70 61 63 65 42 65 74 77 | 65 65 6e 54 6f 70 41 6e |paceBetw|eenTopAn|
|00004310| 64 4c 61 62 65 6c 73 80 | 26 d1 38 15 00 26 58 21 |dLabels.|&.8..&X!|
|00004320| 04 53 65 6c 66 16 9a 00 | 20 06 52 65 73 75 6c 74 |.Self...| .Result|
|00004330| 16 58 00 63 28 31 54 41 | 64 72 6f 63 6b 33 64 43 |.X.c(1TA|drock3dC|
|00004340| 61 6c 65 6e 64 61 72 2e | 53 65 74 53 70 61 63 65 |alendar.|SetSpace|
|00004350| 42 65 74 77 65 65 6e 42 | 75 74 74 6f 6e 73 41 6e |BetweenB|uttonsAn|
|00004360| 64 42 6f 74 74 6f 6d 80 | 26 d1 38 15 00 36 9c 21 |dBottom.|&.8..6.!|
|00004370| 04 53 65 6c 66 16 9a 00 | 21 08 4e 65 77 53 70 61 |.Self...|!.NewSpa|
|00004380| 63 65 16 58 02 63 28 37 | 54 41 64 72 6f 63 6b 33 |ce.X.c(7|TAdrock3|
|00004390| 64 43 61 6c 65 6e 64 61 | 72 2e 53 65 74 53 70 61 |dCalenda|r.SetSpa|
|000043a0| 63 65 42 65 74 77 65 65 | 6e 4c 61 62 65 6c 73 41 |ceBetwee|nLabelsA|
|000043b0| 6e 64 57 65 65 6b 44 61 | 79 48 65 61 64 65 72 80 |ndWeekDa|yHeader.|
|000043c0| 26 d1 38 15 00 36 9c 21 | 04 53 65 6c 66 16 9a 00 |&.8..6.!|.Self...|
|000043d0| 21 08 4e 65 77 53 70 61 | 63 65 16 58 02 63 28 36 |!.NewSpa|ce.X.c(6|
|000043e0| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|000043f0| 72 2e 53 65 74 53 70 61 | 63 65 42 65 74 77 65 65 |r.SetSpa|ceBetwee|
|00004400| 6e 57 65 65 6b 44 61 79 | 48 65 61 64 65 72 41 6e |nWeekDay|HeaderAn|
|00004410| 64 43 65 6c 6c 73 80 26 | d1 38 15 00 36 9c 21 04 |dCells.&|.8..6.!.|
|00004420| 53 65 6c 66 16 9a 00 21 | 08 4e 65 77 53 70 61 63 |Self...!|.NewSpac|
|00004430| 65 16 58 02 63 28 28 54 | 41 64 72 6f 63 6b 33 64 |e.X.c((T|Adrock3d|
|00004440| 43 61 6c 65 6e 64 61 72 | 2e 53 65 74 50 72 65 76 |Calendar|.SetPrev|
|00004450| 69 6f 75 73 59 65 61 72 | 43 61 70 74 69 6f 6e 80 |iousYear|Caption.|
|00004460| 26 d1 38 15 00 31 02 9c | 21 04 53 65 6c 66 16 9a |&.8..1..|!.Self..|
|00004470| 06 21 0a 4e 65 77 43 61 | 70 74 69 6f 6e 66 56 f8 |.!.NewCa|ptionfV.|
|00004480| 63 28 29 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c()TAdro|ck3dCale|
|00004490| 6e 64 61 72 2e 53 65 74 | 50 72 65 76 69 6f 75 73 |ndar.Set|Previous|
|000044a0| 4d 6f 6e 74 68 43 61 70 | 74 69 6f 6e 80 26 d1 38 |MonthCap|tion.&.8|
|000044b0| 15 00 31 02 9c 21 04 53 | 65 6c 66 16 9a 06 21 0a |..1..!.S|elf...!.|
|000044c0| 4e 65 77 43 61 70 74 69 | 6f 6e 66 56 f8 63 28 24 |NewCapti|onfV.c($|
|000044d0| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|000044e0| 72 2e 53 65 74 4e 65 78 | 74 59 65 61 72 43 61 70 |r.SetNex|tYearCap|
|000044f0| 74 69 6f 6e 80 26 d1 38 | 15 00 31 02 9c 21 04 53 |tion.&.8|..1..!.S|
|00004500| 65 6c 66 16 9a 06 21 0a | 4e 65 77 43 61 70 74 69 |elf...!.|NewCapti|
|00004510| 6f 6e 66 56 f8 63 28 25 | 54 41 64 72 6f 63 6b 33 |onfV.c(%|TAdrock3|
|00004520| 64 43 61 6c 65 6e 64 61 | 72 2e 53 65 74 4e 65 78 |dCalenda|r.SetNex|
|00004530| 74 4d 6f 6e 74 68 43 61 | 70 74 69 6f 6e 80 26 d1 |tMonthCa|ption.&.|
|00004540| 38 15 00 31 02 9c 21 04 | 53 65 6c 66 16 9a 06 21 |8..1..!.|Self...!|
|00004550| 0a 4e 65 77 43 61 70 74 | 69 6f 6e 66 56 f8 63 28 |.NewCapt|ionfV.c(|
|00004560| 2a 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |*TAdrock|3dCalend|
|00004570| 61 72 2e 47 65 74 4d 6f | 6e 74 68 42 75 74 74 6f |ar.GetMo|nthButto|
|00004580| 6e 50 65 72 63 65 6e 74 | 61 67 65 80 26 d1 38 15 |nPercent|age.&.8.|
|00004590| 00 40 5e 21 04 53 65 6c | 66 16 9a 00 20 06 52 65 |.@^!.Sel|f... .Re|
|000045a0| 73 75 6c 74 66 5e 00 63 | 28 2a 54 41 64 72 6f 63 |sultf^.c|(*TAdroc|
|000045b0| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 53 65 74 4d |k3dCalen|dar.SetM|
|000045c0| 6f 6e 74 68 42 75 74 74 | 6f 6e 50 65 72 63 65 6e |onthButt|onPercen|
|000045d0| 74 61 67 65 80 26 d1 38 | 15 00 98 9c 21 04 53 65 |tage.&.8|....!.Se|
|000045e0| 6c 66 16 9a 02 21 0d 4e | 65 77 50 65 72 63 65 6e |lf...!.N|ewPercen|
|000045f0| 74 61 67 65 26 5e 10 63 | 28 23 54 41 64 72 6f 63 |tage&^.c|(#TAdroc|
|00004600| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 53 65 74 4d |k3dCalen|dar.SetM|
|00004610| 6f 6e 74 68 4c 61 62 65 | 6c 46 6f 6e 74 80 26 d1 |onthLabe|lFont.&.|
|00004620| 38 15 00 18 9c 21 04 53 | 65 6c 66 16 9a 00 21 07 |8....!.S|elf...!.|
|00004630| 4e 65 77 46 6f 6e 74 16 | 34 02 63 28 2c 54 41 64 |NewFont.|4.c(,TAd|
|00004640| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 4d |rock3dCa|lendar.M|
|00004650| 6f 6e 74 68 4c 61 62 65 | 6c 46 6f 6e 74 53 74 79 |onthLabe|lFontSty|
|00004660| 6c 65 43 68 61 6e 67 65 | 64 80 26 d1 38 15 00 98 |leChange|d.&.8...|
|00004670| 9c 21 04 53 65 6c 66 16 | 9a 06 21 06 53 65 6e 64 |.!.Self.|..!.Send|
|00004680| 65 72 16 5a 02 63 28 22 | 54 41 64 72 6f 63 6b 33 |er.Z.c("|TAdrock3|
|00004690| 64 43 61 6c 65 6e 64 61 | 72 2e 53 65 74 59 65 61 |dCalenda|r.SetYea|
|000046a0| 72 4c 61 62 65 6c 46 6f | 6e 74 80 26 d1 38 15 00 |rLabelFo|nt.&.8..|
|000046b0| 18 9c 21 04 53 65 6c 66 | 16 9a 00 21 07 4e 65 77 |..!.Self|...!.New|
|000046c0| 46 6f 6e 74 16 34 02 63 | 28 2b 54 41 64 72 6f 63 |Font.4.c|(+TAdroc|
|000046d0| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 59 65 61 72 |k3dCalen|dar.Year|
|000046e0| 4c 61 62 65 6c 46 6f 6e | 74 53 74 79 6c 65 43 68 |LabelFon|tStyleCh|
|000046f0| 61 6e 67 65 64 80 26 d1 | 38 15 00 98 9c 21 04 53 |anged.&.|8....!.S|
|00004700| 65 6c 66 16 9a 06 21 06 | 53 65 6e 64 65 72 16 5a |elf...!.|Sender.Z|
|00004710| 02 63 28 22 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c("TAdr|ock3dCal|
|00004720| 65 6e 64 61 72 2e 53 65 | 74 44 61 79 48 65 61 64 |endar.Se|tDayHead|
|00004730| 65 72 46 6f 6e 74 80 26 | d1 38 15 00 18 9c 21 04 |erFont.&|.8....!.|
|00004740| 53 65 6c 66 16 9a 00 21 | 07 4e 65 77 46 6f 6e 74 |Self...!|.NewFont|
|00004750| 16 34 02 63 28 2b 54 41 | 64 72 6f 63 6b 33 64 43 |.4.c(+TA|drock3dC|
|00004760| 61 6c 65 6e 64 61 72 2e | 44 61 79 48 65 61 64 65 |alendar.|DayHeade|
|00004770| 72 46 6f 6e 74 53 74 79 | 6c 65 43 68 61 6e 67 65 |rFontSty|leChange|
|00004780| 64 80 26 d1 38 15 00 d0 | 9c 21 04 53 65 6c 66 16 |d.&.8...|.!.Self.|
|00004790| 9a 06 21 06 53 65 6e 64 | 65 72 16 5a 02 20 0d 74 |..!.Send|er.Z. .t|
|000047a0| 6d 54 65 78 74 4d 65 74 | 72 69 63 73 66 50 00 63 |mTextMet|ricsfP.c|
|000047b0| 28 1f 54 41 64 72 6f 63 | 6b 33 64 43 61 6c 65 6e |(.TAdroc|k3dCalen|
|000047c0| 64 61 72 2e 53 65 74 42 | 75 74 74 6f 6e 46 6f 6e |dar.SetB|uttonFon|
|000047d0| 74 80 26 d1 38 15 00 18 | 9c 21 04 53 65 6c 66 16 |t.&.8...|.!.Self.|
|000047e0| 9a 00 21 07 4e 65 77 46 | 6f 6e 74 16 34 02 63 28 |..!.NewF|ont.4.c(|
|000047f0| 29 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |)TAdrock|3dCalend|
|00004800| 61 72 2e 42 75 74 74 6f | 6e 73 46 6f 6e 74 53 74 |ar.Butto|nsFontSt|
|00004810| 79 6c 65 43 68 61 6e 67 | 65 64 80 26 d1 38 15 00 |yleChang|ed.&.8..|
|00004820| c6 9c 21 04 53 65 6c 66 | 16 9a 06 21 06 53 65 6e |..!.Self|...!.Sen|
|00004830| 64 65 72 16 5a 02 63 28 | 1d 54 41 64 72 6f 63 6b |der.Z.c(|.TAdrock|
|00004840| 33 64 43 61 6c 65 6e 64 | 61 72 2e 53 65 74 43 65 |3dCalend|ar.SetCe|
|00004850| 6c 6c 46 6f 6e 74 80 26 | d1 38 15 00 18 9c 21 04 |llFont.&|.8....!.|
|00004860| 53 65 6c 66 16 9a 00 21 | 07 4e 65 77 46 6f 6e 74 |Self...!|.NewFont|
|00004870| 16 34 02 63 28 26 54 41 | 64 72 6f 63 6b 33 64 43 |.4.c(&TA|drock3dC|
|00004880| 61 6c 65 6e 64 61 72 2e | 43 65 6c 6c 46 6f 6e 74 |alendar.|CellFont|
|00004890| 53 74 79 6c 65 43 68 61 | 6e 67 65 64 80 26 d1 38 |StyleCha|nged.&.8|
|000048a0| 15 00 80 9c 21 04 53 65 | 6c 66 16 9a 06 21 06 53 |....!.Se|lf...!.S|
|000048b0| 65 6e 64 65 72 16 5a 02 | 20 0d 74 6d 54 65 78 74 |ender.Z.| .tmText|
|000048c0| 4d 65 74 72 69 63 73 66 | 50 00 63 28 29 54 41 64 |Metricsf|P.c()TAd|
|000048d0| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 53 |rock3dCa|lendar.S|
|000048e0| 65 74 43 65 6c 6c 73 48 | 69 67 68 6c 69 67 68 74 |etCellsH|ighlight|
|000048f0| 65 64 46 6f 6e 74 80 26 | d1 38 15 00 18 9c 21 04 |edFont.&|.8....!.|
|00004900| 53 65 6c 66 16 9a 00 21 | 07 4e 65 77 46 6f 6e 74 |Self...!|.NewFont|
|00004910| 16 34 02 63 28 2e 54 41 | 64 72 6f 63 6b 33 64 43 |.4.c(.TA|drock3dC|
|00004920| 61 6c 65 6e 64 61 72 2e | 53 65 6c 65 63 74 65 64 |alendar.|Selected|
|00004930| 43 65 6c 6c 46 6f 6e 74 | 53 74 79 6c 65 43 68 61 |CellFont|StyleCha|
|00004940| 6e 67 65 64 80 26 d1 38 | 15 00 7c 9c 21 04 53 65 |nged.&.8|..|.!.Se|
|00004950| 6c 66 16 9a 06 21 06 53 | 65 6e 64 65 72 16 5a 02 |lf...!.S|ender.Z.|
|00004960| 20 0d 74 6d 54 65 78 74 | 4d 65 74 72 69 63 73 66 | .tmText|Metricsf|
|00004970| 50 00 63 28 1f 54 41 64 | 72 6f 63 6b 33 64 43 61 |P.c(.TAd|rock3dCa|
|00004980| 6c 65 6e 64 61 72 2e 53 | 65 74 43 6f 6d 62 6f 73 |lendar.S|etCombos|
|00004990| 46 6f 6e 74 80 26 d1 38 | 15 00 6c 9c 21 04 53 65 |Font.&.8|..l.!.Se|
|000049a0| 6c 66 16 9a 06 21 07 4e | 65 77 46 6f 6e 74 16 34 |lf...!.N|ewFont.4|
|000049b0| 08 63 28 28 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c((TAdr|ock3dCal|
|000049c0| 65 6e 64 61 72 2e 43 6f | 6d 62 6f 73 46 6f 6e 74 |endar.Co|mbosFont|
|000049d0| 53 74 79 6c 65 43 68 61 | 6e 67 65 64 80 26 d1 38 |StyleCha|nged.&.8|
|000049e0| 15 00 21 03 9c 21 04 53 | 65 6c 66 16 9a 06 21 06 |..!..!.S|elf...!.|
|000049f0| 53 65 6e 64 65 72 16 5a | 02 20 0d 74 6d 54 65 78 |Sender.Z|. .tmTex|
|00004a00| 74 4d 65 74 72 69 63 73 | 66 50 00 63 28 1d 54 41 |tMetrics|fP.c(.TA|
|00004a10| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 2e |drock3dC|alendar.|
|00004a20| 50 6f 69 6e 74 49 6e 52 | 65 63 74 80 26 d1 38 15 |PointInR|ect.&.8.|
|00004a30| 00 46 5c 21 04 53 65 6c | 66 16 9a 00 22 08 72 65 |.F\!.Sel|f...".re|
|00004a40| 63 74 54 65 73 74 12 4e | 02 21 01 58 16 58 04 21 |ctTest.N|.!.X.X.!|
|00004a50| 01 59 16 58 00 20 06 52 | 65 73 75 6c 74 16 5c 00 |.Y.X. .R|esult.\.|
|00004a60| 63 28 25 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c(%TAdro|ck3dCale|
|00004a70| 6e 64 61 72 2e 44 72 61 | 77 42 65 74 77 65 65 6e |ndar.Dra|wBetween|
|00004a80| 41 6c 6c 43 65 6c 6c 73 | 80 26 d1 38 15 00 45 05 |AllCells|.&.8..E.|
|00004a90| 9c 21 04 53 65 6c 66 16 | 9a 08 20 04 58 50 6f 73 |.!.Self.|.. .XPos|
|00004aa0| 66 58 00 20 04 59 50 6f | 73 66 58 08 20 04 41 54 |fX. .YPo|sfX. .AT|
|00004ab0| 6f 70 16 58 0c 20 07 41 | 42 6f 74 74 6f 6d 66 58 |op.X. .A|BottomfX|
|00004ac0| 10 20 05 41 4c 65 66 74 | 66 58 18 20 06 41 52 69 |. .ALeft|fX. .ARi|
|00004ad0| 67 68 74 66 58 20 20 06 | 41 57 69 64 74 68 16 58 |ghtfX .|AWidth.X|
|00004ae0| 06 63 28 2d 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c(-TAdr|ock3dCal|
|00004af0| 65 6e 64 61 72 2e 44 72 | 61 77 43 61 6c 65 6e 64 |endar.Dr|awCalend|
|00004b00| 61 72 43 65 6c 6c 73 42 | 61 63 6b 47 72 6f 75 6e |arCellsB|ackGroun|
|00004b10| 64 80 26 d1 38 15 00 7d | 04 9c 21 04 53 65 6c 66 |d.&.8..}|..!.Self|
|00004b20| 16 9a 06 20 08 43 65 6c | 6c 52 65 63 74 66 4e 00 |... .Cel|lRectfN.|
|00004b30| 20 04 58 50 6f 73 16 58 | 08 20 04 59 50 6f 73 16 | .XPos.X|. .YPos.|
|00004b40| 58 0a 63 28 1f 54 41 64 | 72 6f 63 6b 33 64 43 61 |X.c(.TAd|rock3dCa|
|00004b50| 6c 65 6e 64 61 72 2e 4c | 6f 61 64 44 61 74 65 41 |lendar.L|oadDateA|
|00004b60| 72 72 61 79 80 26 d1 38 | 15 00 4d 07 9c 21 04 53 |rray.&.8|..M..!.S|
|00004b70| 65 6c 66 16 9a 06 20 06 | 6e 49 6e 64 65 78 16 58 |elf... .|nIndex.X|
|00004b80| 08 20 0f 44 61 79 73 49 | 6e 50 72 65 76 4d 6f 6e |. .DaysI|nPrevMon|
|00004b90| 74 68 66 58 f8 63 28 1f | 54 41 64 72 6f 63 6b 33 |thfX.c(.|TAdrock3|
|00004ba0| 64 43 61 6c 65 6e 64 61 | 72 2e 47 65 74 4d 6f 6e |dCalenda|r.GetMon|
|00004bb0| 74 68 42 65 67 69 6e 80 | 26 d1 38 15 00 8a 58 21 |thBegin.|&.8...X!|
|00004bc0| 04 53 65 6c 66 16 9a 06 | 20 06 52 65 73 75 6c 74 |.Self...| .Result|
|00004bd0| 16 58 00 20 09 46 69 72 | 73 74 44 61 74 65 66 60 |.X. .Fir|stDatef`|
|00004be0| 00 20 01 44 16 58 00 63 | 28 24 54 41 64 72 6f 63 |. .D.X.c|($TAdroc|
|00004bf0| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 52 65 70 61 |k3dCalen|dar.Repa|
|00004c00| 69 6e 74 43 65 6c 6c 42 | 79 49 6e 64 65 78 80 26 |intCellB|yIndex.&|
|00004c10| d1 38 15 00 11 08 9c 21 | 04 53 65 6c 66 16 9a 06 |.8.....!|.Self...|
|00004c20| 21 05 49 6e 64 65 78 16 | 58 08 20 05 70 44 61 74 |!.Index.|X. .pDat|
|00004c30| 65 66 6c f8 20 08 54 65 | 6d 70 52 65 63 74 66 4e |efl. .Te|mpRectfN|
|00004c40| d0 20 04 4e 44 61 79 16 | 58 00 20 09 44 6f 44 72 |. .NDay.|X. .DoDr|
|00004c50| 61 77 69 6e 67 66 5c f6 | 63 28 24 54 41 64 72 6f |awingf\.|c($TAdro|
|00004c60| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 49 73 49 |ck3dCale|ndar.IsI|
|00004c70| 6e 64 65 78 4f 6e 41 53 | 61 74 75 72 64 61 79 80 |ndexOnAS|aturday.|
|00004c80| 26 d1 38 15 00 90 5c 21 | 04 53 65 6c 66 16 9a 00 |&.8...\!|.Self...|
|00004c90| 21 04 43 65 6c 6c 16 58 | 08 20 06 52 65 73 75 6c |!.Cell.X|. .Resul|
|00004ca0| 74 16 5c 02 63 28 22 54 | 41 64 72 6f 63 6b 33 64 |t.\.c("T|Adrock3d|
|00004cb0| 43 61 6c 65 6e 64 61 72 | 2e 49 73 49 6e 64 65 78 |Calendar|.IsIndex|
|00004cc0| 4f 6e 41 53 75 6e 64 61 | 79 80 26 d1 38 15 00 90 |OnASunda|y.&.8...|
|00004cd0| 5c 21 04 53 65 6c 66 16 | 9a 00 21 04 43 65 6c 6c |\!.Self.|..!.Cell|
|00004ce0| 16 58 08 20 06 52 65 73 | 75 6c 74 16 5c 02 63 28 |.X. .Res|ult.\.c(|
|00004cf0| 25 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |%TAdrock|3dCalend|
|00004d00| 61 72 2e 53 68 6f 75 6c | 64 49 44 72 61 77 54 68 |ar.Shoul|dIDrawTh|
|00004d10| 69 73 43 65 6c 6c 80 26 | d1 38 15 00 ba 5c 21 04 |isCell.&|.8...\!.|
|00004d20| 53 65 6c 66 16 9a 06 21 | 08 44 72 61 77 46 6c 61 |Self...!|.DrawFla|
|00004d30| 67 16 7c 02 21 04 43 65 | 6c 6c 16 58 08 20 06 52 |g.|.!.Ce|ll.X. .R|
|00004d40| 65 73 75 6c 74 16 5c 00 | 63 28 20 54 41 64 72 6f |esult.\.|c( TAdro|
|00004d50| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 44 72 61 |ck3dCale|ndar.Dra|
|00004d60| 77 4d 6f 6e 74 68 4c 61 | 62 65 6c 80 26 d1 38 15 |wMonthLa|bel.&.8.|
|00004d70| 00 11 04 9c 21 04 53 65 | 6c 66 16 9a 06 20 08 54 |....!.Se|lf... .T|
|00004d80| 65 6d 70 52 65 63 74 66 | 4e 00 63 28 1f 54 41 64 |empRectf|N.c(.TAd|
|00004d90| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 44 |rock3dCa|lendar.D|
|00004da0| 72 61 77 59 65 61 72 4c | 61 62 65 6c 80 26 d1 38 |rawYearL|abel.&.8|
|00004db0| 15 00 f1 04 9c 21 04 53 | 65 6c 66 16 9a 06 20 08 |.....!.S|elf... .|
|00004dc0| 54 65 6d 70 52 65 63 74 | 66 4e e0 63 28 1b 54 41 |TempRect|fN.c(.TA|
|00004dd0| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 2e |drock3dC|alendar.|
|00004de0| 44 72 61 77 44 61 74 65 | 73 80 26 d1 38 15 00 29 |DrawDate|s.&.8..)|
|00004df0| 0a 9c 21 04 53 65 6c 66 | 16 9a 06 21 08 44 72 61 |..!.Self|...!.Dra|
|00004e00| 77 46 6c 61 67 66 7c fe | 21 0c 53 65 6c 65 63 74 |wFlagf|.|!.Select|
|00004e10| 65 64 43 65 6c 6c 16 58 | 04 20 06 6e 49 6e 64 65 |edCell.X|. .nInde|
|00004e20| 78 66 58 f0 20 05 6e 57 | 65 65 6b 66 58 e8 20 04 |xfX. .nW|eekfX. .|
|00004e30| 6e 44 61 79 16 58 08 20 | 05 70 44 61 74 65 66 6c |nDay.X. |.pDatefl|
|00004e40| e0 20 10 49 6e 73 69 64 | 65 43 6c 69 65 6e 74 52 |. .Insid|eClientR|
|00004e50| 65 63 74 66 4e b0 20 09 | 44 61 74 65 41 72 72 61 |ectfN. .|DateArra|
|00004e60| 79 66 56 d8 20 09 44 6f | 44 72 61 77 69 6e 67 66 |yfV. .Do|Drawingf|
|00004e70| 5c d6 20 01 2e 16 36 00 | 63 28 2c 54 41 64 72 6f |\. ...6.|c(,TAdro|
|00004e80| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 52 65 74 |ck3dCale|ndar.Ret|
|00004e90| 75 72 6e 43 65 6c 6c 54 | 65 78 74 44 72 61 77 69 |urnCellT|extDrawi|
|00004ea0| 6e 67 46 6c 61 67 73 80 | 26 d1 38 15 00 8c 62 21 |ngFlags.|&.8...b!|
|00004eb0| 04 53 65 6c 66 16 9a 00 | 20 06 52 65 73 75 6c 74 |.Self...| .Result|
|00004ec0| 16 62 00 20 0c 74 65 78 | 74 44 72 61 77 46 6c 61 |.b. .tex|tDrawFla|
|00004ed0| 67 16 62 02 63 28 21 54 | 41 64 72 6f 63 6b 33 64 |g.b.c(!T|Adrock3d|
|00004ee0| 43 61 6c 65 6e 64 61 72 | 2e 52 65 74 75 72 6e 44 |Calendar|.ReturnD|
|00004ef0| 61 79 4f 66 57 65 65 6b | 80 26 d1 38 15 00 42 62 |ayOfWeek|.&.8..Bb|
|00004f00| 21 04 53 65 6c 66 16 9a | 00 21 11 53 74 61 72 74 |!.Self..|.!.Start|
|00004f10| 69 6e 67 44 61 79 4f 66 | 57 65 65 6b 16 58 06 21 |ingDayOf|Week.X.!|
|00004f20| 08 57 6f 72 6b 44 61 74 | 65 26 60 10 20 06 52 65 |.WorkDat|e&`. .Re|
|00004f30| 73 75 6c 74 16 62 00 20 | 01 44 16 58 00 63 28 27 |sult.b. |.D.X.c('|
|00004f40| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00004f50| 72 2e 52 65 74 75 72 6e | 44 65 6c 70 68 69 44 61 |r.Return|DelphiDa|
|00004f60| 79 4f 66 57 65 65 6b 80 | 26 d1 38 15 00 1c 58 21 |yOfWeek.|&.8...X!|
|00004f70| 04 53 65 6c 66 16 9a 00 | 21 11 53 74 61 72 74 69 |.Self...|!.Starti|
|00004f80| 6e 67 44 61 79 4f 66 57 | 65 65 6b 16 58 02 21 07 |ngDayOfW|eek.X.!.|
|00004f90| 57 65 65 6b 44 61 79 16 | 58 04 20 06 52 65 73 75 |WeekDay.|X. .Resu|
|00004fa0| 6c 74 16 58 00 20 03 54 | 6d 70 16 58 00 63 28 23 |lt.X. .T|mp.X.c(#|
|00004fb0| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00004fc0| 72 2e 52 65 74 75 72 6e | 57 65 65 6b 44 61 79 4e |r.Return|WeekDayN|
|00004fd0| 61 6d 65 80 26 d1 38 15 | 00 5a 56 21 04 53 65 6c |ame.&.8.|.ZV!.Sel|
|00004fe0| 66 16 9a 06 21 11 53 74 | 61 72 74 69 6e 67 44 61 |f...!.St|artingDa|
|00004ff0| 79 4f 66 57 65 65 6b 16 | 58 08 21 07 57 65 65 6b |yOfWeek.|X.!.Week|
|00005000| 44 61 79 16 58 0a 23 06 | 52 65 73 75 6c 74 26 56 |Day.X.#.|Result&V|
|00005010| 10 63 28 23 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c(#TAdr|ock3dCal|
|00005020| 65 6e 64 61 72 2e 52 65 | 74 75 72 6e 57 65 65 6b |endar.Re|turnWeek|
|00005030| 6f 66 4d 6f 6e 74 68 80 | 26 d1 38 15 00 be 62 21 |ofMonth.|&.8...b!|
|00005040| 04 53 65 6c 66 16 9a 06 | 21 11 53 74 61 72 74 69 |.Self...|!.Starti|
|00005050| 6e 67 44 61 79 4f 66 57 | 65 65 6b 16 58 08 21 08 |ngDayOfW|eek.X.!.|
|00005060| 57 6f 72 6b 44 61 74 65 | 26 60 10 20 06 52 65 73 |WorkDate|&`. .Res|
|00005070| 75 6c 74 16 62 00 20 05 | 41 59 65 61 72 66 62 fc |ult.b. .|AYearfb.|
|00005080| 20 06 41 4d 6f 6e 74 68 | 66 62 f8 20 04 41 44 61 | .AMonth|fb. .ADa|
|00005090| 79 66 62 f4 20 07 57 65 | 65 6b 44 61 79 16 62 04 |yfb. .We|ekDay.b.|
|000050a0| 63 28 22 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c("TAdro|ck3dCale|
|000050b0| 6e 64 61 72 2e 52 65 74 | 75 72 6e 57 65 65 6b 4f |ndar.Ret|urnWeekO|
|000050c0| 66 59 65 61 72 80 26 d1 | 38 15 00 2c 62 21 04 53 |fYear.&.|8..,b!.S|
|000050d0| 65 6c 66 16 9a 00 21 08 | 57 6f 72 6b 44 61 74 65 |elf...!.|WorkDate|
|000050e0| 26 60 10 20 06 52 65 73 | 75 6c 74 16 62 00 63 6a |&`. .Res|ult.b.cj|
|000050f0| 27 06 44 61 79 4f 66 73 | 46 a0 00 6b 28 27 54 41 |'.DayOfs|F..k('TA|
|00005100| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 2e |drock3dC|alendar.|
|00005110| 52 65 74 75 72 6e 57 65 | 65 6b 6f 66 59 65 61 72 |ReturnWe|ekofYear|
|00005120| 5f 57 6f 72 6b 80 26 d1 | 38 15 00 7d 04 62 21 04 |_Work.&.|8..}.b!.|
|00005130| 53 65 6c 66 16 9a 08 21 | 08 52 65 61 6c 57 65 65 |Self...!|.RealWee|
|00005140| 6b 66 5c fe 21 09 52 65 | 63 75 72 73 69 76 65 16 |kf\.!.Re|cursive.|
|00005150| 58 0a 21 08 57 6f 72 6b | 44 61 74 65 26 60 10 20 |X.!.Work|Date&`. |
|00005160| 06 52 65 73 75 6c 74 16 | 62 06 20 05 4a 61 6e 30 |.Result.|b. .Jan0|
|00005170| 31 66 60 e8 20 06 61 56 | 61 6c 75 65 16 66 06 20 |1f`. .aV|alue.f. |
|00005180| 06 61 44 61 79 4f 66 66 | 7a e6 20 04 59 65 61 72 |.aDayOff|z. .Year|
|00005190| 66 62 e0 20 05 4d 6f 6e | 74 68 66 62 dc 20 03 44 |fb. .Mon|thfb. .D|
|000051a0| 61 79 66 62 d8 63 28 2b | 54 41 64 72 6f 63 6b 33 |ayfb.c(+|TAdrock3|
|000051b0| 64 43 61 6c 65 6e 64 61 | 72 2e 47 65 74 46 69 72 |dCalenda|r.GetFir|
|000051c0| 73 74 6f 66 4d 6f 6e 74 | 68 57 65 65 6b 4e 75 6d |stofMont|hWeekNum|
|000051d0| 62 65 72 80 26 d1 38 15 | 00 68 62 21 04 53 65 6c |ber.&.8.|.hb!.Sel|
|000051e0| 66 16 9a 06 20 06 52 65 | 73 75 6c 74 16 62 00 20 |f... .Re|sult.b. |
|000051f0| 08 57 6f 72 6b 44 61 74 | 65 66 60 00 63 28 21 54 |.WorkDat|ef`.c(!T|
|00005200| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|00005210| 2e 52 65 74 75 72 6e 44 | 61 79 4f 66 59 65 61 72 |.ReturnD|ayOfYear|
|00005220| 80 26 d1 38 15 00 ac 62 | 21 04 53 65 6c 66 66 9a |.&.8...b|!.Selff.|
|00005230| f8 21 08 57 6f 72 6b 44 | 61 74 65 26 60 10 20 06 |.!.WorkD|ate&`. .|
|00005240| 52 65 73 75 6c 74 16 62 | 00 20 04 44 61 79 73 66 |Result.b|. .Daysf|
|00005250| 62 f4 20 06 4d 6f 6e 74 | 68 73 66 62 f0 20 05 59 |b. .Mont|hsfb. .Y|
|00005260| 65 61 72 73 66 62 ec 20 | 05 4d 6f 6e 74 68 16 62 |earsfb. |.Month.b|
|00005270| 08 20 09 44 61 79 4f 66 | 59 65 61 72 16 62 0a 63 |. .DayOf|Year.b.c|
|00005280| 28 20 54 41 64 72 6f 63 | 6b 33 64 43 61 6c 65 6e |( TAdroc|k3dCalen|
|00005290| 64 61 72 2e 44 72 61 77 | 46 6f 63 75 73 46 72 61 |dar.Draw|FocusFra|
|000052a0| 6d 65 80 26 d1 38 15 00 | 81 06 9c 21 04 53 65 6c |me.&.8..|...!.Sel|
|000052b0| 66 16 9a 06 21 06 6e 49 | 6e 64 65 78 16 58 08 20 |f...!.nI|ndex.X. |
|000052c0| 05 70 44 61 74 65 66 6c | f8 20 08 54 65 6d 70 52 |.pDatefl|. .TempR|
|000052d0| 65 63 74 66 4e d0 20 09 | 44 6f 44 72 61 77 69 6e |ectfN. .|DoDrawin|
|000052e0| 67 66 5c f6 63 28 1b 54 | 41 64 72 6f 63 6b 33 64 |gf\.c(.T|Adrock3d|
|000052f0| 43 61 6c 65 6e 64 61 72 | 2e 4d 6f 75 73 65 4d 6f |Calendar|.MouseMo|
|00005300| 76 65 80 26 d1 38 15 00 | 0d 08 9c 21 04 53 65 6c |ve.&.8..|...!.Sel|
|00005310| 66 16 9a 06 21 05 53 68 | 69 66 74 66 3e fe 21 01 |f...!.Sh|iftf>.!.|
|00005320| 58 16 58 08 21 01 59 16 | 58 0a 20 06 6e 49 6e 64 |X.X.!.Y.|X. .nInd|
|00005330| 65 78 16 58 08 63 28 24 | 54 41 64 72 6f 63 6b 33 |ex.X.c($|TAdrock3|
|00005340| 64 43 61 6c 65 6e 64 61 | 72 2e 49 6e 76 61 6c 69 |dCalenda|r.Invali|
|00005350| 64 61 74 65 43 61 6c 65 | 6e 64 61 72 80 26 d1 38 |dateCale|ndar.&.8|
|00005360| 15 00 0c 9c 21 04 53 65 | 6c 66 16 9a 00 63 28 19 |....!.Se|lf...c(.|
|00005370| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00005380| 72 2e 4d 6f 75 73 65 55 | 70 80 26 d1 38 15 00 99 |r.MouseU|p.&.8...|
|00005390| 04 9c 21 04 53 65 6c 66 | 16 9a 08 21 06 42 75 74 |..!.Self|...!.But|
|000053a0| 74 6f 6e 16 1c 06 21 05 | 53 68 69 66 74 66 3e fe |ton...!.|Shiftf>.|
|000053b0| 21 01 58 16 58 0a 21 01 | 59 26 58 10 20 06 6e 49 |!.X.X.!.|Y&X. .nI|
|000053c0| 6e 64 65 78 16 58 06 63 | 28 2f 54 41 64 72 6f 63 |ndex.X.c|(/TAdroc|
|000053d0| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 49 73 49 6e |k3dCalen|dar.IsIn|
|000053e0| 64 65 78 49 6e 43 75 72 | 72 65 6e 74 43 61 6c 65 |dexInCur|rentCale|
|000053f0| 6e 64 61 72 4d 6f 6e 74 | 68 80 26 d1 38 15 00 82 |ndarMont|h.&.8...|
|00005400| 5c 21 04 53 65 6c 66 16 | 9a 06 21 06 6e 49 6e 64 |\!.Self.|..!.nInd|
|00005410| 65 78 16 58 08 20 06 52 | 65 73 75 6c 74 16 5c 00 |ex.X. .R|esult.\.|
|00005420| 63 28 1a 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c(.TAdro|ck3dCale|
|00005430| 6e 64 61 72 2e 44 62 6c | 43 6c 69 63 6b 80 26 d1 |ndar.Dbl|Click.&.|
|00005440| 38 15 00 95 02 9c 21 04 | 53 65 6c 66 16 9a 06 20 |8.....!.|Self... |
|00005450| 06 6e 49 6e 64 65 78 16 | 58 08 20 05 50 6f 69 6e |.nIndex.|X. .Poin|
|00005460| 74 66 52 00 63 28 1b 54 | 41 64 72 6f 63 6b 33 64 |tfR.c(.T|Adrock3d|
|00005470| 43 61 6c 65 6e 64 61 72 | 2e 4d 6f 75 73 65 44 6f |Calendar|.MouseDo|
|00005480| 77 6e 80 26 d1 38 15 00 | 15 07 9c 21 04 53 65 6c |wn.&.8..|...!.Sel|
|00005490| 66 16 9a 08 21 06 42 75 | 74 74 6f 6e 16 1c 06 21 |f...!.Bu|tton...!|
|000054a0| 05 53 68 69 66 74 66 3e | fe 21 01 58 16 58 0a 21 |.Shiftf>|.!.X.X.!|
|000054b0| 01 59 26 58 10 20 06 6e | 49 6e 64 65 78 16 58 06 |.Y&X. .n|Index.X.|
|000054c0| 63 28 1b 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c(.TAdro|ck3dCale|
|000054d0| 6e 64 61 72 2e 53 65 74 | 50 61 72 65 6e 74 80 26 |ndar.Set|Parent.&|
|000054e0| d1 38 15 00 be 9c 21 04 | 53 65 6c 66 16 9a 06 21 |.8....!.|Self...!|
|000054f0| 07 41 70 61 72 65 6e 74 | 16 1a 08 63 28 23 54 41 |.Aparent|...c(#TA|
|00005500| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 2e |drock3dC|alendar.|
|00005510| 47 65 74 49 6e 64 65 78 | 46 72 6f 6d 50 6f 69 6e |GetIndex|FromPoin|
|00005520| 74 80 26 d1 38 15 00 dc | 58 21 04 53 65 6c 66 16 |t.&.8...|X!.Self.|
|00005530| 9a 0a 21 05 6e 4c 65 66 | 74 66 58 00 21 04 6e 54 |..!.nLef|tfX.!.nT|
|00005540| 6f 70 66 58 08 20 06 52 | 65 73 75 6c 74 16 58 00 |opfX. .R|esult.X.|
|00005550| 20 06 6e 49 6e 64 65 78 | 16 58 0c 20 05 6e 57 65 | .nIndex|.X. .nWe|
|00005560| 65 6b 16 58 08 20 04 6e | 44 61 79 16 58 06 20 09 |ek.X. .n|Day.X. .|
|00005570| 43 65 6c 6c 73 52 65 63 | 74 66 4e 10 63 28 2e 54 |CellsRec|tfN.c(.T|
|00005580| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|00005590| 2e 52 65 74 75 72 6e 43 | 75 72 73 6f 72 48 61 6e |.ReturnC|ursorHan|
|000055a0| 64 6c 65 46 72 6f 6d 43 | 75 72 73 6f 72 80 26 d1 |dleFromC|ursor.&.|
|000055b0| 38 15 00 5a 1e 21 04 53 | 65 6c 66 16 9a 00 21 07 |8..Z.!.S|elf...!.|
|000055c0| 61 43 75 72 73 6f 72 16 | 90 02 20 06 52 65 73 75 |aCursor.|.. .Resu|
|000055d0| 6c 74 16 1e 00 63 28 21 | 54 41 64 72 6f 63 6b 33 |lt...c(!|TAdrock3|
|000055e0| 64 43 61 6c 65 6e 64 61 | 72 2e 47 65 74 49 6e 64 |dCalenda|r.GetInd|
|000055f0| 65 78 46 72 6f 6d 44 61 | 79 80 26 d1 38 15 00 26 |exFromDa|y.&.8..&|
|00005600| 58 21 04 53 65 6c 66 16 | 9a 06 21 03 44 61 79 16 |X!.Self.|..!.Day.|
|00005610| 58 08 20 06 52 65 73 75 | 6c 74 16 58 00 63 28 21 |X. .Resu|lt.X.c(!|
|00005620| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00005630| 72 2e 47 65 74 44 61 79 | 46 72 6f 6d 49 6e 64 65 |r.GetDay|FromInde|
|00005640| 78 80 26 d1 38 15 00 b6 | 58 21 04 53 65 6c 66 16 |x.&.8...|X!.Self.|
|00005650| 9a 06 21 05 49 6e 64 65 | 78 16 58 08 20 06 52 65 |..!.Inde|x.X. .Re|
|00005660| 73 75 6c 74 16 58 06 63 | 28 22 54 41 64 72 6f 63 |sult.X.c|("TAdroc|
|00005670| 6b 33 64 43 61 6c 65 6e | 64 61 72 2e 47 65 74 44 |k3dCalen|dar.GetD|
|00005680| 61 74 65 46 72 6f 6d 49 | 6e 64 65 78 80 26 d1 38 |ateFromI|ndex.&.8|
|00005690| 15 00 8e 60 21 04 53 65 | 6c 66 16 9a 06 21 05 49 |...`!.Se|lf...!.I|
|000056a0| 6e 64 65 78 16 58 08 20 | 06 52 65 73 75 6c 74 66 |ndex.X. |.Resultf|
|000056b0| 60 00 20 05 41 44 61 74 | 65 66 60 10 63 28 1c 54 |`. .ADat|ef`.c(.T|
|000056c0| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|000056d0| 2e 44 72 61 77 33 64 54 | 65 78 74 80 26 d1 38 15 |.Draw3dT|ext.&.8.|
|000056e0| 00 3d 07 9c 21 04 53 65 | 6c 66 16 9a 06 21 06 45 |.=..!.Se|lf...!.E|
|000056f0| 66 66 65 63 74 66 88 fe | 21 07 54 65 78 74 53 74 |ffectf..|!.TextSt|
|00005700| 72 66 56 f0 22 04 52 65 | 63 74 16 4e 0a 21 05 46 |rfV.".Re|ct.N.!.F|
|00005710| 6c 61 67 73 16 62 08 20 | 04 54 65 78 74 66 a2 0f |lags.b. |.Textf..|
|00005720| ec fe ff ff 20 07 54 6d | 70 52 65 63 74 66 4e 0f |.... .Tm|pRectfN.|
|00005730| dc fe ff ff 20 0a 55 70 | 70 65 72 43 6f 6c 6f 72 |.... .Up|perColor|
|00005740| 66 32 e8 20 0a 4c 6f 77 | 65 72 43 6f 6c 6f 72 66 |f2. .Low|erColorf|
|00005750| 32 e0 20 0e 53 61 76 65 | 64 46 6f 6e 74 43 6f 6c |2. .Save|dFontCol|
|00005760| 6f 72 66 32 d8 63 28 19 | 54 41 64 72 6f 63 6b 33 |orf2.c(.|TAdrock3|
|00005770| 64 43 61 6c 65 6e 64 61 | 72 2e 4b 65 79 44 6f 77 |dCalenda|r.KeyDow|
|00005780| 6e 80 26 d1 38 15 00 b1 | 04 9c 21 04 53 65 6c 66 |n.&.8...|..!.Self|
|00005790| 16 9a 08 22 03 4b 65 79 | 16 62 06 21 05 53 68 69 |...".Key|.b.!.Shi|
|000057a0| 66 74 66 3e 00 63 28 1a | 54 41 64 72 6f 63 6b 33 |ftf>.c(.|TAdrock3|
|000057b0| 64 43 61 6c 65 6e 64 61 | 72 2e 4b 65 79 50 72 65 |dCalenda|r.KeyPre|
|000057c0| 73 73 80 26 d1 38 15 00 | 02 9c 21 04 53 65 6c 66 |ss.&.8..|..!.Self|
|000057d0| 16 9a 00 21 06 53 65 6e | 64 65 72 16 5a 02 22 03 |...!.Sen|der.Z.".|
|000057e0| 4b 65 79 16 64 04 63 28 | 1e 54 41 64 72 6f 63 6b |Key.d.c(|.TAdrock|
|000057f0| 33 64 43 61 6c 65 6e 64 | 61 72 2e 57 4d 47 65 74 |3dCalend|ar.WMGet|
|00005800| 44 6c 67 43 6f 64 65 80 | 26 d1 38 15 00 10 9c 21 |DlgCode.|&.8....!|
|00005810| 04 53 65 6c 66 16 9a 00 | 22 07 4d 65 73 73 61 67 |.Self...|".Messag|
|00005820| 65 16 4c 02 63 28 1d 54 | 41 64 72 6f 63 6b 33 64 |e.L.c(.T|Adrock3d|
|00005830| 43 61 6c 65 6e 64 61 72 | 2e 57 4d 4b 69 6c 6c 46 |Calendar|.WMKillF|
|00005840| 6f 63 75 73 80 26 d1 38 | 15 00 40 9c 21 04 53 65 |ocus.&.8|..@.!.Se|
|00005850| 6c 66 16 9a 08 22 07 4d | 65 73 73 61 67 65 16 48 |lf...".M|essage.H|
|00005860| 02 63 28 1c 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c(.TAdr|ock3dCal|
|00005870| 65 6e 64 61 72 2e 57 4d | 53 65 74 46 6f 63 75 73 |endar.WM|SetFocus|
|00005880| 80 26 d1 38 15 00 40 9c | 21 04 53 65 6c 66 16 9a |.&.8..@.|!.Self..|
|00005890| 08 22 07 4d 65 73 73 61 | 67 65 16 46 02 63 28 19 |.".Messa|ge.F.c(.|
|000058a0| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|000058b0| 72 2e 44 4f 45 6e 74 65 | 72 80 26 d1 38 15 00 40 |r.DOEnte|r.&.8..@|
|000058c0| 9c 21 04 53 65 6c 66 16 | 9a 06 63 28 18 54 41 64 |.!.Self.|..c(.TAd|
|000058d0| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 44 |rock3dCa|lendar.D|
|000058e0| 6f 45 78 69 74 80 26 d1 | 38 15 00 40 9c 21 04 53 |oExit.&.|8..@.!.S|
|000058f0| 65 6c 66 16 9a 06 63 28 | 24 54 41 64 72 6f 63 6b |elf...c(|$TAdrock|
|00005900| 33 64 43 61 6c 65 6e 64 | 61 72 2e 42 75 74 74 6f |3dCalend|ar.Butto|
|00005910| 6e 73 4f 6e 4d 6f 75 73 | 65 4d 6f 76 65 80 26 d1 |nsOnMous|eMove.&.|
|00005920| 38 15 00 3e 9c 21 04 53 | 65 6c 66 16 9a 00 21 06 |8..>.!.S|elf...!.|
|00005930| 53 65 6e 64 65 72 16 5a | 02 21 05 53 68 69 66 74 |Sender.Z|.!.Shift|
|00005940| 46 3e 00 21 01 58 26 58 | 18 21 01 59 26 58 10 63 |F>.!.X&X|.!.Y&X.c|
|00005950| 28 21 54 41 64 72 6f 63 | 6b 33 64 43 61 6c 65 6e |(!TAdroc|k3dCalen|
|00005960| 64 61 72 2e 4e 65 78 74 | 59 65 61 72 4f 6e 43 6c |dar.Next|YearOnCl|
|00005970| 69 63 6b 80 26 d1 38 15 | 00 0c 9c 21 04 53 65 6c |ick.&.8.|...!.Sel|
|00005980| 66 16 9a 00 21 06 53 65 | 6e 64 65 72 16 5a 02 63 |f...!.Se|nder.Z.c|
|00005990| 28 21 54 41 64 72 6f 63 | 6b 33 64 43 61 6c 65 6e |(!TAdroc|k3dCalen|
|000059a0| 64 61 72 2e 50 72 65 76 | 59 65 61 72 4f 6e 43 6c |dar.Prev|YearOnCl|
|000059b0| 69 63 6b 80 26 d1 38 15 | 00 0c 9c 21 04 53 65 6c |ick.&.8.|...!.Sel|
|000059c0| 66 16 9a 00 21 06 53 65 | 6e 64 65 72 16 5a 02 63 |f...!.Se|nder.Z.c|
|000059d0| 28 22 54 41 64 72 6f 63 | 6b 33 64 43 61 6c 65 6e |("TAdroc|k3dCalen|
|000059e0| 64 61 72 2e 4e 65 78 74 | 4d 6f 6e 74 68 4f 6e 43 |dar.Next|MonthOnC|
|000059f0| 6c 69 63 6b 80 26 d1 38 | 15 00 0c 9c 21 04 53 65 |lick.&.8|....!.Se|
|00005a00| 6c 66 16 9a 00 21 06 53 | 65 6e 64 65 72 16 5a 02 |lf...!.S|ender.Z.|
|00005a10| 63 28 22 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c("TAdro|ck3dCale|
|00005a20| 6e 64 61 72 2e 50 72 65 | 76 4d 6f 6e 74 68 4f 6e |ndar.Pre|vMonthOn|
|00005a30| 43 6c 69 63 6b 80 26 d1 | 38 15 00 0c 9c 21 04 53 |Click.&.|8....!.S|
|00005a40| 65 6c 66 16 9a 00 21 06 | 53 65 6e 64 65 72 16 5a |elf...!.|Sender.Z|
|00005a50| 02 63 28 26 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c(&TAdr|ock3dCal|
|00005a60| 65 6e 64 61 72 2e 4d 6f | 6e 74 68 43 6f 6d 62 6f |endar.Mo|nthCombo|
|00005a70| 42 6f 78 4f 6e 43 6c 69 | 63 6b 80 26 d1 38 15 00 |BoxOnCli|ck.&.8..|
|00005a80| 7e 9c 21 04 53 65 6c 66 | 16 9a 06 21 06 53 65 6e |~.!.Self|...!.Sen|
|00005a90| 64 65 72 16 5a 02 63 28 | 25 54 41 64 72 6f 63 6b |der.Z.c(|%TAdrock|
|00005aa0| 33 64 43 61 6c 65 6e 64 | 61 72 2e 59 65 61 72 43 |3dCalend|ar.YearC|
|00005ab0| 6f 6d 62 6f 42 6f 78 4f | 6e 43 6c 69 63 6b 80 26 |omboBoxO|nClick.&|
|00005ac0| d1 38 15 00 90 9c 21 04 | 53 65 6c 66 16 9a 06 21 |.8....!.|Self...!|
|00005ad0| 06 53 65 6e 64 65 72 16 | 5a 02 63 28 1b 54 41 64 |.Sender.|Z.c(.TAd|
|00005ae0| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 47 |rock3dCa|lendar.G|
|00005af0| 6f 74 6f 4d 6f 6e 74 68 | 80 26 d1 38 15 00 b0 9c |otoMonth|.&.8....|
|00005b00| 21 04 53 65 6c 66 16 9a | 06 21 0a 66 47 6f 74 6f |!.Self..|.!.fGoto|
|00005b10| 4d 6f 6e 74 68 66 58 00 | 20 05 61 59 65 61 72 16 |MonthfX.| .aYear.|
|00005b20| 62 08 20 06 61 4d 6f 6e | 74 68 16 62 0a 20 04 61 |b. .aMon|th.b. .a|
|00005b30| 44 61 79 16 62 0c 63 28 | 1a 54 41 64 72 6f 63 6b |Day.b.c(|.TAdrock|
|00005b40| 33 64 43 61 6c 65 6e 64 | 61 72 2e 47 6f 74 6f 59 |3dCalend|ar.GotoY|
|00005b50| 65 61 72 80 26 d1 38 15 | 00 a2 9c 21 04 53 65 6c |ear.&.8.|...!.Sel|
|00005b60| 66 16 9a 06 21 09 66 47 | 6f 74 6f 59 65 61 72 16 |f...!.fG|otoYear.|
|00005b70| 58 02 20 05 61 59 65 61 | 72 16 62 08 20 06 61 4d |X. .aYea|r.b. .aM|
|00005b80| 6f 6e 74 68 16 62 0a 20 | 04 61 44 61 79 16 62 0c |onth.b. |.aDay.b.|
|00005b90| 63 28 17 54 41 64 72 6f | 63 6b 33 64 43 61 6c 65 |c(.TAdro|ck3dCale|
|00005ba0| 6e 64 61 72 2e 54 6f 64 | 61 79 80 26 d1 38 15 00 |ndar.Tod|ay.&.8..|
|00005bb0| 4a 9c 21 04 53 65 6c 66 | 16 9a 06 63 28 19 54 41 |J.!.Self|...c(.TA|
|00005bc0| 64 72 6f 63 6b 33 64 43 | 61 6c 65 6e 64 61 72 2e |drock3dC|alendar.|
|00005bd0| 4e 65 78 74 44 61 79 80 | 26 d1 38 15 00 40 9c 21 |NextDay.|&.8..@.!|
|00005be0| 04 53 65 6c 66 16 9a 00 | 63 28 19 54 41 64 72 6f |.Self...|c(.TAdro|
|00005bf0| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 50 72 65 |ck3dCale|ndar.Pre|
|00005c00| 76 44 61 79 80 26 d1 38 | 15 00 40 9c 21 04 53 65 |vDay.&.8|..@.!.Se|
|00005c10| 6c 66 16 9a 00 63 28 1a | 54 41 64 72 6f 63 6b 33 |lf...c(.|TAdrock3|
|00005c20| 64 43 61 6c 65 6e 64 61 | 72 2e 4e 65 78 74 57 65 |dCalenda|r.NextWe|
|00005c30| 65 6b 80 26 d1 38 15 00 | 40 9c 21 04 53 65 6c 66 |ek.&.8..|@.!.Self|
|00005c40| 16 9a 00 63 28 1a 54 41 | 64 72 6f 63 6b 33 64 43 |...c(.TA|drock3dC|
|00005c50| 61 6c 65 6e 64 61 72 2e | 50 72 65 76 57 65 65 6b |alendar.|PrevWeek|
|00005c60| 80 26 d1 38 15 00 40 9c | 21 04 53 65 6c 66 16 9a |.&.8..@.|!.Self..|
|00005c70| 00 63 28 1b 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c(.TAdr|ock3dCal|
|00005c80| 65 6e 64 61 72 2e 4e 65 | 78 74 4d 6f 6e 74 68 80 |endar.Ne|xtMonth.|
|00005c90| 26 d1 38 15 00 cc 9c 21 | 04 53 65 6c 66 16 9a 06 |&.8....!|.Self...|
|00005ca0| 20 05 61 59 65 61 72 16 | 62 0a 20 06 61 4d 6f 6e | .aYear.|b. .aMon|
|00005cb0| 74 68 16 62 08 20 04 61 | 44 61 79 16 62 0c 63 28 |th.b. .a|Day.b.c(|
|00005cc0| 1a 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |.TAdrock|3dCalend|
|00005cd0| 61 72 2e 4e 65 78 74 59 | 65 61 72 80 26 d1 38 15 |ar.NextY|ear.&.8.|
|00005ce0| 00 ae 9c 21 04 53 65 6c | 66 16 9a 06 20 05 61 59 |...!.Sel|f... .aY|
|00005cf0| 65 61 72 16 62 08 20 06 | 61 4d 6f 6e 74 68 16 62 |ear.b. .|aMonth.b|
|00005d00| 0a 20 04 61 44 61 79 16 | 62 0c 63 28 1a 54 41 64 |. .aDay.|b.c(.TAd|
|00005d10| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 50 |rock3dCa|lendar.P|
|00005d20| 72 65 76 59 65 61 72 80 | 26 d1 38 15 00 ae 9c 21 |revYear.|&.8....!|
|00005d30| 04 53 65 6c 66 16 9a 06 | 20 05 61 59 65 61 72 16 |.Self...| .aYear.|
|00005d40| 62 08 20 06 61 4d 6f 6e | 74 68 16 62 0a 20 04 61 |b. .aMon|th.b. .a|
|00005d50| 44 61 79 16 62 0c 63 28 | 1b 54 41 64 72 6f 63 6b |Day.b.c(|.TAdrock|
|00005d60| 33 64 43 61 6c 65 6e 64 | 61 72 2e 50 72 65 76 4d |3dCalend|ar.PrevM|
|00005d70| 6f 6e 74 68 80 26 d1 38 | 15 00 cc 9c 21 04 53 65 |onth.&.8|....!.Se|
|00005d80| 6c 66 16 9a 06 20 05 61 | 59 65 61 72 16 62 0a 20 |lf... .a|Year.b. |
|00005d90| 06 61 4d 6f 6e 74 68 16 | 62 08 20 04 61 44 61 79 |.aMonth.|b. .aDay|
|00005da0| 16 62 0c 63 28 1f 54 41 | 64 72 6f 63 6b 33 64 43 |.b.c(.TA|drock3dC|
|00005db0| 61 6c 65 6e 64 61 72 2e | 49 73 44 61 74 65 49 6e |alendar.|IsDateIn|
|00005dc0| 52 61 6e 67 65 80 26 d1 | 38 15 00 48 5c 21 04 53 |Range.&.|8..H\!.S|
|00005dd0| 65 6c 66 16 9a 00 21 08 | 57 6f 72 6b 44 61 74 65 |elf...!.|WorkDate|
|00005de0| 26 60 30 21 09 53 74 61 | 72 74 44 61 74 65 26 60 |&`0!.Sta|rtDate&`|
|00005df0| 20 21 07 45 6e 64 44 61 | 74 65 26 60 10 20 06 52 | !.EndDa|te&`. .R|
|00005e00| 65 73 75 6c 74 16 5c 00 | 63 28 1d 54 41 64 72 6f |esult.\.|c(.TAdro|
|00005e10| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 49 73 4c |ck3dCale|ndar.IsL|
|00005e20| 65 61 70 59 65 61 72 69 | 80 26 d1 38 15 00 18 5c |eapYeari|.&.8...\|
|00005e30| 21 04 53 65 6c 66 16 9a | 00 21 05 61 59 65 61 72 |!.Self..|.!.aYear|
|00005e40| 16 58 02 20 06 52 65 73 | 75 6c 74 16 5c 00 63 28 |.X. .Res|ult.\.c(|
|00005e50| 1c 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |.TAdrock|3dCalend|
|00005e60| 61 72 2e 49 73 4c 65 61 | 70 79 65 61 72 80 26 d1 |ar.IsLea|pyear.&.|
|00005e70| 38 15 00 54 5c 21 04 53 | 65 6c 66 16 9a 06 21 08 |8..T\!.S|elf...!.|
|00005e80| 57 6f 72 6b 44 61 74 65 | 26 60 10 20 06 52 65 73 |WorkDate|&`. .Res|
|00005e90| 75 6c 74 16 5c 00 63 28 | 19 54 41 64 72 6f 63 6b |ult.\.c(|.TAdrock|
|00005ea0| 33 64 43 61 6c 65 6e 64 | 61 72 2e 41 64 64 44 61 |3dCalend|ar.AddDa|
|00005eb0| 79 73 80 26 d1 38 15 00 | 48 60 21 04 53 65 6c 66 |ys.&.8..|H`!.Self|
|00005ec0| 16 9a 00 21 0c 4e 75 6d | 62 65 72 4f 66 44 61 79 |...!.Num|berOfDay|
|00005ed0| 73 16 58 02 21 08 57 6f | 72 6b 44 61 74 65 26 60 |s.X.!.Wo|rkDate&`|
|00005ee0| 10 20 06 52 65 73 75 6c | 74 66 60 f0 63 28 1a 54 |. .Resul|tf`.c(.T|
|00005ef0| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|00005f00| 2e 41 64 64 57 65 65 6b | 73 80 26 d1 38 15 00 48 |.AddWeek|s.&.8..H|
|00005f10| 60 21 04 53 65 6c 66 16 | 9a 00 21 0d 4e 75 6d 62 |`!.Self.|..!.Numb|
|00005f20| 65 72 4f 66 57 65 65 6b | 73 16 58 02 21 08 57 6f |erOfWeek|s.X.!.Wo|
|00005f30| 72 6b 44 61 74 65 26 60 | 10 20 06 52 65 73 75 6c |rkDate&`|. .Resul|
|00005f40| 74 66 60 f0 63 28 1b 54 | 41 64 72 6f 63 6b 33 64 |tf`.c(.T|Adrock3d|
|00005f50| 43 61 6c 65 6e 64 61 72 | 2e 41 64 64 4d 6f 6e 74 |Calendar|.AddMont|
|00005f60| 68 73 80 26 d1 38 15 00 | 48 60 21 04 53 65 6c 66 |hs.&.8..|H`!.Self|
|00005f70| 16 9a 00 21 0e 4e 75 6d | 62 65 72 4f 66 4d 6f 6e |...!.Num|berOfMon|
|00005f80| 74 68 73 16 58 02 21 08 | 57 6f 72 6b 44 61 74 65 |ths.X.!.|WorkDate|
|00005f90| 26 60 10 20 06 52 65 73 | 75 6c 74 66 60 f0 63 28 |&`. .Res|ultf`.c(|
|00005fa0| 1d 54 41 64 72 6f 63 6b | 33 64 43 61 6c 65 6e 64 |.TAdrock|3dCalend|
|00005fb0| 61 72 2e 41 64 64 51 75 | 61 72 74 65 72 73 80 26 |ar.AddQu|arters.&|
|00005fc0| d1 38 15 00 48 60 21 04 | 53 65 6c 66 16 9a 00 21 |.8..H`!.|Self...!|
|00005fd0| 10 4e 75 6d 62 65 72 4f | 66 51 75 61 72 74 65 72 |.NumberO|fQuarter|
|00005fe0| 73 16 58 02 21 08 57 6f | 72 6b 44 61 74 65 26 60 |s.X.!.Wo|rkDate&`|
|00005ff0| 10 20 06 52 65 73 75 6c | 74 66 60 f0 63 28 1a 54 |. .Resul|tf`.c(.T|
|00006000| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|00006010| 2e 41 64 64 59 65 61 72 | 73 80 26 d1 38 15 00 48 |.AddYear|s.&.8..H|
|00006020| 60 21 04 53 65 6c 66 16 | 9a 00 21 0d 4e 75 6d 62 |`!.Self.|..!.Numb|
|00006030| 65 72 4f 66 59 65 61 72 | 73 16 58 02 21 08 57 6f |erOfYear|s.X.!.Wo|
|00006040| 72 6b 44 61 74 65 26 60 | 10 20 06 52 65 73 75 6c |rkDate&`|. .Resul|
|00006050| 74 66 60 f0 63 28 1e 54 | 41 64 72 6f 63 6b 33 64 |tf`.c(.T|Adrock3d|
|00006060| 43 61 6c 65 6e 64 61 72 | 2e 44 61 79 73 49 6e 4d |Calendar|.DaysInM|
|00006070| 6f 6e 74 68 69 80 26 d1 | 38 15 00 18 62 21 04 53 |onthi.&.|8...b!.S|
|00006080| 65 6c 66 16 9a 00 21 05 | 4d 6f 6e 74 68 16 62 02 |elf...!.|Month.b.|
|00006090| 21 04 59 65 61 72 16 62 | 04 20 06 52 65 73 75 6c |!.Year.b|. .Resul|
|000060a0| 74 16 62 00 63 28 1d 54 | 41 64 72 6f 63 6b 33 64 |t.b.c(.T|Adrock3d|
|000060b0| 43 61 6c 65 6e 64 61 72 | 2e 44 61 79 73 49 6e 4d |Calendar|.DaysInM|
|000060c0| 6f 6e 74 68 80 26 d1 38 | 15 00 30 62 21 04 53 65 |onth.&.8|..0b!.Se|
|000060d0| 6c 66 16 9a 00 21 08 57 | 6f 72 6b 44 61 74 65 26 |lf...!.W|orkDate&|
|000060e0| 60 10 20 06 52 65 73 75 | 6c 74 16 62 00 63 28 22 |`. .Resu|lt.b.c("|
|000060f0| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00006100| 72 2e 44 61 79 73 4c 65 | 66 74 49 6e 4d 6f 6e 74 |r.DaysLe|ftInMont|
|00006110| 68 69 80 26 d1 38 15 00 | 30 62 21 04 53 65 6c 66 |hi.&.8..|0b!.Self|
|00006120| 16 9a 00 21 03 44 61 79 | 16 58 02 21 05 4d 6f 6e |...!.Day|.X.!.Mon|
|00006130| 74 68 16 58 04 21 04 59 | 65 61 72 26 58 10 20 06 |th.X.!.Y|ear&X. .|
|00006140| 52 65 73 75 6c 74 16 62 | 00 63 28 21 54 41 64 72 |Result.b|.c(!TAdr|
|00006150| 6f 63 6b 33 64 43 61 6c | 65 6e 64 61 72 2e 44 61 |ock3dCal|endar.Da|
|00006160| 79 73 4c 65 66 74 49 6e | 4d 6f 6e 74 68 80 26 d1 |ysLeftIn|Month.&.|
|00006170| 38 15 00 30 62 21 04 53 | 65 6c 66 16 9a 00 21 08 |8..0b!.S|elf...!.|
|00006180| 57 6f 72 6b 44 61 74 65 | 26 60 10 20 06 52 65 73 |WorkDate|&`. .Res|
|00006190| 75 6c 74 16 62 00 63 28 | 21 54 41 64 72 6f 63 6b |ult.b.c(|!TAdrock|
|000061a0| 33 64 43 61 6c 65 6e 64 | 61 72 2e 44 61 79 73 4c |3dCalend|ar.DaysL|
|000061b0| 65 66 74 49 6e 59 65 61 | 72 69 80 26 d1 38 15 00 |eftInYea|ri.&.8..|
|000061c0| 30 62 21 04 53 65 6c 66 | 16 9a 00 21 03 44 61 79 |0b!.Self|...!.Day|
|000061d0| 16 58 02 21 05 4d 6f 6e | 74 68 16 58 04 21 04 59 |.X.!.Mon|th.X.!.Y|
|000061e0| 65 61 72 26 58 10 20 06 | 52 65 73 75 6c 74 16 62 |ear&X. .|Result.b|
|000061f0| 00 63 28 20 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c( TAdr|ock3dCal|
|00006200| 65 6e 64 61 72 2e 44 61 | 79 73 4c 65 66 74 49 6e |endar.Da|ysLeftIn|
|00006210| 59 65 61 72 80 26 d1 38 | 15 00 30 62 21 04 53 65 |Year.&.8|..0b!.Se|
|00006220| 6c 66 16 9a 00 21 08 57 | 6f 72 6b 44 61 74 65 26 |lf...!.W|orkDate&|
|00006230| 60 10 20 06 52 65 73 75 | 6c 74 16 62 00 63 28 1d |`. .Resu|lt.b.c(.|
|00006240| 54 41 64 72 6f 63 6b 33 | 64 43 61 6c 65 6e 64 61 |TAdrock3|dCalenda|
|00006250| 72 2e 44 61 79 73 49 6e | 59 65 61 72 69 80 26 d1 |r.DaysIn|Yeari.&.|
|00006260| 38 15 00 18 62 21 04 53 | 65 6c 66 16 9a 00 21 04 |8...b!.S|elf...!.|
|00006270| 59 65 61 72 16 58 02 20 | 06 52 65 73 75 6c 74 16 |Year.X. |.Result.|
|00006280| 62 00 63 28 1c 54 41 64 | 72 6f 63 6b 33 64 43 61 |b.c(.TAd|rock3dCa|
|00006290| 6c 65 6e 64 61 72 2e 44 | 61 79 73 49 6e 59 65 61 |lendar.D|aysInYea|
|000062a0| 72 80 26 d1 38 15 00 30 | 62 21 04 53 65 6c 66 16 |r.&.8..0|b!.Self.|
|000062b0| 9a 00 21 08 57 6f 72 6b | 44 61 74 65 26 60 10 20 |..!.Work|Date&`. |
|000062c0| 06 52 65 73 75 6c 74 16 | 62 00 63 28 22 54 41 64 |.Result.|b.c("TAd|
|000062d0| 72 6f 63 6b 33 64 43 61 | 6c 65 6e 64 61 72 2e 52 |rock3dCa|lendar.R|
|000062e0| 65 74 75 72 6e 44 61 79 | 4f 66 4d 6f 6e 74 68 80 |eturnDay|OfMonth.|
|000062f0| 26 d1 38 15 00 30 62 21 | 04 53 65 6c 66 16 9a 00 |&.8..0b!|.Self...|
|00006300| 21 08 57 6f 72 6b 44 61 | 74 65 26 60 10 20 06 52 |!.WorkDa|te&`. .R|
|00006310| 65 73 75 6c 74 16 62 00 | 63 28 1d 54 41 64 72 6f |esult.b.|c(.TAdro|
|00006320| 63 6b 33 64 43 61 6c 65 | 6e 64 61 72 2e 52 65 74 |ck3dCale|ndar.Ret|
|00006330| 75 72 6e 4d 6f 6e 74 68 | 80 26 d1 38 15 00 30 62 |urnMonth|.&.8..0b|
|00006340| 21 04 53 65 6c 66 16 9a | 00 21 08 57 6f 72 6b 44 |!.Self..|.!.WorkD|
|00006350| 61 74 65 26 60 10 20 06 | 52 65 73 75 6c 74 16 62 |ate&`. .|Result.b|
|00006360| 00 63 28 1f 54 41 64 72 | 6f 63 6b 33 64 43 61 6c |.c(.TAdr|ock3dCal|
|00006370| 65 6e 64 61 72 2e 52 65 | 74 75 72 6e 51 75 61 72 |endar.Re|turnQuar|
|00006380| 74 65 72 80 26 d1 38 15 | 00 30 62 21 04 53 65 6c |ter.&.8.|.0b!.Sel|
|00006390| 66 16 9a 00 21 08 57 6f | 72 6b 44 61 74 65 26 60 |f...!.Wo|rkDate&`|
|000063a0| 10 20 06 52 65 73 75 6c | 74 16 62 00 63 28 1c 54 |. .Resul|t.b.c(.T|
|000063b0| 41 64 72 6f 63 6b 33 64 | 43 61 6c 65 6e 64 61 72 |Adrock3d|Calendar|
|000063c0| 2e 52 65 74 75 72 6e 59 | 65 61 72 80 26 d1 38 15 |.ReturnY|ear.&.8.|
|000063d0| 00 30 62 21 04 53 65 6c | 66 16 9a 00 21 08 57 6f |.0b!.Sel|f...!.Wo|
|000063e0| 72 6b 44 61 74 65 26 60 | 10 20 06 52 65 73 75 6c |rkDate&`|. .Resul|
|000063f0| 74 16 62 00 63 28 1f 54 | 41 64 72 6f 63 6b 33 64 |t.b.c(.T|Adrock3d|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.