home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1996-12-01 | 15.8 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| VW Comms Data Base (other/vwCommsDataBase)
| ext
| Unsupported |
| 100%
| file
| data
| default
| |
| 100%
| TrID
| MacBinary 1
| default (weak)
| |
| 100%
| siegfried
| x-fmt/342 Microsoft FoxPro Memo
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 3f 66 00 00 00 01 | 3f 66 00 00 00 00 00 00 |..?f....|?f......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00000210| 3d 20 20 20 33 2e 30 30 | 00 00 00 01 00 00 00 22 |= 3.00|......."|
|00000220| 41 72 69 61 6c 2c 20 31 | 2c 20 31 30 2c 20 36 2c |Arial, 1|, 10, 6,|
|00000230| 20 31 36 2c 20 31 33 2c | 20 31 36 2c 20 33 2c 20 | 16, 13,| 16, 3, |
|00000240| 30 0a 00 00 00 01 00 00 | 00 09 63 61 6c 62 75 74 |0.......|..calbut|
|00000250| 74 6f 6e 00 00 00 01 00 | 00 00 06 50 69 78 65 6c |ton.....|...Pixel|
|00000260| 73 00 00 00 01 00 00 00 | 05 43 6c 61 73 73 00 00 |s.......|.Class..|
|00000270| 00 01 00 00 00 01 31 00 | 00 00 01 00 00 00 0d 63 |......1.|.......c|
|00000280| 6f 6d 6d 61 6e 64 62 75 | 74 74 6f 6e 00 00 00 01 |ommandbu|tton....|
|00000290| 00 00 00 09 63 61 6c 62 | 75 74 74 6f 6e 00 00 00 |....calb|utton...|
|000002a0| 01 00 00 00 13 2a 61 75 | 74 6f 73 65 74 66 6f 6e |.....*au|tosetfon|
|000002b0| 74 73 69 7a 65 20 0d 0a | 00 00 00 01 00 00 00 3b |tsize ..|.......;|
|000002c0| 48 65 69 67 68 74 20 3d | 20 32 38 0d 0a 57 69 64 |Height =| 28..Wid|
|000002d0| 74 68 20 3d 20 39 34 0d | 0a 43 61 70 74 69 6f 6e |th = 94.|.Caption|
|000002e0| 20 3d 20 22 22 0d 0a 4e | 61 6d 65 20 3d 20 22 63 | = ""..N|ame = "c|
|000002f0| 61 6c 62 75 74 74 6f 6e | 22 0d 0a 00 00 00 01 00 |albutton|".......|
|00000300| 00 00 0d 63 6f 6d 6d 61 | 6e 64 62 75 74 74 6f 6e |...comma|ndbutton|
|00000310| 00 00 00 01 00 00 00 0b | 63 61 6c 62 61 73 65 66 |........|calbasef|
|00000320| 6f 72 6d 00 00 00 01 00 | 00 00 06 50 69 78 65 6c |orm.....|...Pixel|
|00000330| 73 00 00 00 01 00 00 00 | 22 41 72 69 61 6c 2c 20 |s.......|"Arial, |
|00000340| 31 2c 20 31 30 2c 20 36 | 2c 20 31 36 2c 20 31 33 |1, 10, 6|, 16, 13|
|00000350| 2c 20 31 36 2c 20 33 2c | 20 30 0a 00 00 00 01 00 |, 16, 3,| 0......|
|00000360| 00 00 0c 63 61 6c 6e 61 | 76 69 67 61 74 6f 72 00 |...calna|vigator.|
|00000370| 00 00 01 00 00 00 07 6d | 64 6f 77 6e 0d 0a 00 00 |.......m|down....|
|00000380| 00 01 00 00 00 06 50 69 | 78 65 6c 73 00 00 00 01 |......Pi|xels....|
|00000390| 00 00 00 05 43 6c 61 73 | 73 00 00 00 01 00 00 00 |....Clas|s.......|
|000003a0| 01 31 00 00 00 01 00 00 | 00 09 63 61 6c 62 75 74 |.1......|..calbut|
|000003b0| 74 6f 6e 00 00 00 01 00 | 00 00 0c 63 61 6c 6e 61 |ton.....|...calna|
|000003c0| 76 69 67 61 74 6f 72 00 | 00 00 01 00 00 00 80 69 |vigator.|.......i|
|000003d0| 6e 63 72 65 6d 65 6e 74 | 20 41 6d 6f 75 6e 74 20 |ncrement| Amount |
|000003e0| 74 6f 20 69 6e 63 72 65 | 6d 65 6e 74 20 74 68 65 |to incre|ment the|
|000003f0| 20 63 75 72 72 65 6e 74 | 20 64 61 74 65 20 62 79 | current| date by|
|00000400| 2e 20 20 43 61 6e 20 62 | 65 20 6e 65 67 61 74 69 |. Can b|e negati|
|00000410| 76 65 2e 0d 0a 6d 64 6f | 77 6e 20 2e 54 2e 20 77 |ve...mdo|wn .T. w|
|00000420| 68 65 6e 20 4d 6f 75 73 | 65 44 6f 77 6e 20 66 69 |hen Mous|eDown fi|
|00000430| 72 65 73 2c 20 2e 46 2e | 20 61 66 74 65 72 20 4d |res, .F.| after M|
|00000440| 6f 75 73 65 55 70 20 66 | 69 72 65 73 2e 0d 0a 00 |ouseUp f|ires....|
|00000450| 00 00 01 00 00 00 0d 63 | 6f 6d 6d 61 6e 64 62 75 |.......c|ommandbu|
|00000460| 74 74 6f 6e 00 00 00 01 | 00 00 00 0b 63 61 6c 68 |tton....|....calh|
|00000470| 65 6c 70 2e 76 63 78 00 | 00 00 01 00 00 00 22 41 |elp.vcx.|......"A|
|00000480| 72 69 61 6c 2c 20 31 2c | 20 31 30 2c 20 36 2c 20 |rial, 1,| 10, 6, |
|00000490| 31 36 2c 20 31 33 2c 20 | 31 36 2c 20 33 2c 20 30 |16, 13, |16, 3, 0|
|000004a0| 0a 00 00 00 01 00 00 00 | 01 38 00 00 00 01 00 00 |........|.8......|
|000004b0| 00 01 31 00 00 00 01 00 | 00 00 68 48 65 69 67 68 |..1.....|..hHeigh|
|000004c0| 74 20 3d 20 32 39 0d 0a | 57 69 64 74 68 20 3d 20 |t = 29..|Width = |
|000004d0| 39 34 0d 0a 54 6f 6f 6c | 54 69 70 54 65 78 74 20 |94..Tool|TipText |
|000004e0| 3d 20 22 4d 6f 76 65 20 | 64 69 73 70 6c 61 79 65 |= "Move |displaye|
|000004f0| 64 20 63 61 6c 65 6e 64 | 61 72 22 0d 0a 69 6e 63 |d calend|ar"..inc|
|00000500| 72 65 6d 65 6e 74 20 3d | 20 30 0d 0a 4e 61 6d 65 |rement =| 0..Name|
|00000510| 20 3d 20 22 63 61 6c 6e | 61 76 69 67 61 74 6f 72 | = "caln|avigator|
|00000520| 22 0d 0a 00 00 00 01 00 | 00 00 0f 64 61 74 65 74 |".......|...datet|
|00000530| 69 6d 65 73 65 6c 66 6f | 72 6d 00 00 00 01 00 00 |imeselfo|rm......|
|00000540| 00 06 50 69 78 65 6c 73 | 00 00 00 01 00 00 00 05 |..Pixels|........|
|00000550| 43 6c 61 73 73 00 00 00 | 01 00 00 00 0b 63 61 6c |Class...|.....cal|
|00000560| 62 61 73 65 66 6f 72 6d | 00 00 00 01 00 00 00 0f |baseform|........|
|00000570| 64 61 74 65 74 69 6d 65 | 73 65 6c 66 6f 72 6d 00 |datetime|selform.|
|00000580| 00 00 01 00 00 00 0f 64 | 61 74 65 74 69 6d 65 73 |.......d|atetimes|
|00000590| 65 6c 66 6f 72 6d 00 00 | 00 01 00 00 00 09 73 70 |elform..|......sp|
|000005a0| 4d 69 6e 75 74 65 73 00 | 00 00 01 00 00 00 07 73 |Minutes.|.......s|
|000005b0| 70 69 6e 6e 65 72 00 00 | 00 01 00 00 00 07 73 70 |pinner..|......sp|
|000005c0| 69 6e 6e 65 72 00 00 00 | 01 00 00 00 07 73 70 48 |inner...|.....spH|
|000005d0| 6f 75 72 73 00 00 00 01 | 00 00 00 01 31 00 00 00 |ours....|....1...|
|000005e0| 01 00 00 00 0f 63 61 6c | 65 6e 64 61 72 63 61 70 |.....cal|endarcap|
|000005f0| 74 69 6f 6e 00 00 00 01 | 00 00 00 08 64 61 79 6c |tion....|....dayl|
|00000600| 61 62 65 6c 00 00 00 01 | 00 00 00 22 41 72 69 61 |abel....|..."Aria|
|00000610| 6c 2c 20 31 2c 20 31 30 | 2c 20 36 2c 20 31 36 2c |l, 1, 10|, 6, 16,|
|00000620| 20 31 33 2c 20 31 36 2c | 20 33 2c 20 30 0a 00 00 | 13, 16,| 3, 0...|
|00000630| 00 01 00 00 00 0f 64 61 | 74 65 74 69 6d 65 73 65 |......da|tetimese|
|00000640| 6c 66 6f 72 6d 00 00 00 | 01 00 00 00 06 50 69 78 |lform...|.....Pix|
|00000650| 65 6c 73 00 00 00 01 00 | 00 00 05 43 6c 61 73 73 |els.....|...Class|
|00000660| 00 00 00 01 00 00 00 09 | 63 61 6c 62 75 74 74 6f |........|calbutto|
|00000670| 6e 00 00 00 01 00 00 00 | 0f 63 61 6c 65 6e 64 61 |n.......|.calenda|
|00000680| 72 63 61 70 74 69 6f 6e | 00 00 00 01 00 00 00 42 |rcaption|.......B|
|00000690| 48 65 69 67 68 74 20 3d | 20 32 39 0d 0a 57 69 64 |Height =| 29..Wid|
|000006a0| 74 68 20 3d 20 39 34 0d | 0a 54 61 62 53 74 6f 70 |th = 94.|.TabStop|
|000006b0| 20 3d 20 2e 46 2e 0d 0a | 4e 61 6d 65 20 3d 20 22 | = .F...|Name = "|
|000006c0| 63 61 6c 65 6e 64 61 72 | 63 61 70 74 69 6f 6e 22 |calendar|caption"|
|000006d0| 0d 0a 00 00 00 01 00 00 | 00 0d 63 6f 6d 6d 61 6e |........|..comman|
|000006e0| 64 62 75 74 74 6f 6e 00 | 00 00 01 00 00 00 0b 63 |dbutton.|.......c|
|000006f0| 61 6c 68 65 6c 70 2e 76 | 63 78 00 00 00 01 00 00 |alhelp.v|cx......|
|00000700| 00 c9 48 65 69 67 68 74 | 20 3d 20 32 35 0d 0a 49 |..Height| = 25..I|
|00000710| 6e 63 72 65 6d 65 6e 74 | 20 3d 20 20 20 35 2e 30 |ncrement| = 5.0|
|00000720| 30 0d 0a 4b 65 79 62 6f | 61 72 64 48 69 67 68 56 |0..Keybo|ardHighV|
|00000730| 61 6c 75 65 20 3d 20 35 | 39 0d 0a 4b 65 79 62 6f |alue = 5|9..Keybo|
|00000740| 61 72 64 4c 6f 77 56 61 | 6c 75 65 20 3d 20 30 0d |ardLowVa|lue = 0.|
|00000750| 0a 4c 65 66 74 20 3d 20 | 32 32 38 0d 0a 53 70 69 |.Left = |228..Spi|
|00000760| 6e 6e 65 72 48 69 67 68 | 56 61 6c 75 65 20 3d 20 |nnerHigh|Value = |
|00000770| 20 35 39 2e 30 30 0d 0a | 53 70 69 6e 6e 65 72 4c | 59.00..|SpinnerL|
|00000780| 6f 77 56 61 6c 75 65 20 | 3d 20 20 20 30 2e 30 30 |owValue |= 0.00|
|00000790| 0d 0a 54 61 62 49 6e 64 | 65 78 20 3d 20 33 0d 0a |..TabInd|ex = 3..|
|000007a0| 54 6f 70 20 3d 20 32 36 | 34 0d 0a 57 69 64 74 68 |Top = 26|4..Width|
|000007b0| 20 3d 20 34 39 0d 0a 4e | 61 6d 65 20 3d 20 22 73 | = 49..N|ame = "s|
|000007c0| 70 4d 69 6e 75 74 65 73 | 22 0d 0a 00 00 00 01 00 |pMinutes|".......|
|000007d0| 00 00 b3 48 65 69 67 68 | 74 20 3d 20 32 35 0d 0a |...Heigh|t = 25..|
|000007e0| 4b 65 79 62 6f 61 72 64 | 48 69 67 68 56 61 6c 75 |Keyboard|HighValu|
|000007f0| 65 20 3d 20 32 33 0d 0a | 4b 65 79 62 6f 61 72 64 |e = 23..|Keyboard|
|00000800| 4c 6f 77 56 61 6c 75 65 | 20 3d 20 30 0d 0a 4c 65 |LowValue| = 0..Le|
|00000810| 66 74 20 3d 20 31 30 38 | 0d 0a 53 70 69 6e 6e 65 |ft = 108|..Spinne|
|00000820| 72 48 69 67 68 56 61 6c | 75 65 20 3d 20 20 32 33 |rHighVal|ue = 23|
|00000830| 2e 30 30 0d 0a 53 70 69 | 6e 6e 65 72 4c 6f 77 56 |.00..Spi|nnerLowV|
|00000840| 61 6c 75 65 20 3d 20 20 | 20 30 2e 30 30 0d 0a 54 |alue = | 0.00..T|
|00000850| 61 62 49 6e 64 65 78 20 | 3d 20 32 0d 0a 54 6f 70 |abIndex |= 2..Top|
|00000860| 20 3d 20 32 36 34 0d 0a | 57 69 64 74 68 20 3d 20 | = 264..|Width = |
|00000870| 33 37 0d 0a 4e 61 6d 65 | 20 3d 20 22 73 70 48 6f |37..Name| = "spHo|
|00000880| 75 72 73 22 0d 0a 00 00 | 00 01 00 00 00 07 73 70 |urs"....|......sp|
|00000890| 69 6e 6e 65 72 00 00 00 | 01 00 00 00 07 73 70 69 |inner...|.....spi|
|000008a0| 6e 6e 65 72 00 00 00 01 | 00 00 00 8c 41 6c 69 67 |nner....|....Alig|
|000008b0| 6e 6d 65 6e 74 20 3d 20 | 31 0d 0a 42 61 63 6b 43 |nment = |1..BackC|
|000008c0| 6f 6c 6f 72 20 3d 20 31 | 39 32 2c 31 39 32 2c 31 |olor = 1|92,192,1|
|000008d0| 39 32 0d 0a 43 61 70 74 | 69 6f 6e 20 3d 20 22 4d |92..Capt|ion = "M|
|000008e0| 69 6e 75 74 65 73 22 0d | 0a 48 65 69 67 68 74 20 |inutes".|.Height |
|000008f0| 3d 20 32 35 0d 0a 4c 65 | 66 74 20 3d 20 31 36 38 |= 25..Le|ft = 168|
|00000900| 0d 0a 54 6f 70 20 3d 20 | 32 36 34 0d 0a 57 69 64 |..Top = |264..Wid|
|00000910| 74 68 20 3d 20 34 39 0d | 0a 54 61 62 49 6e 64 65 |th = 49.|.TabInde|
|00000920| 78 20 3d 20 30 0d 0a 4e | 61 6d 65 20 3d 20 22 4c |x = 0..N|ame = "L|
|00000930| 61 62 65 6c 32 22 0d 0a | 00 00 00 01 00 00 00 0f |abel2"..|........|
|00000940| 64 61 74 65 74 69 6d 65 | 73 65 6c 66 6f 72 6d 00 |datetime|selform.|
|00000950| 00 00 01 00 00 00 06 4c | 61 62 65 6c 32 00 00 00 |.......L|abel2...|
|00000960| 01 00 00 00 05 6c 61 62 | 65 6c 00 00 00 01 00 00 |.....lab|el......|
|00000970| 00 05 6c 61 62 65 6c 00 | 00 00 01 00 00 00 88 41 |..label.|.......A|
|00000980| 6c 69 67 6e 6d 65 6e 74 | 20 3d 20 31 0d 0a 42 61 |lignment| = 1..Ba|
|00000990| 63 6b 43 6f 6c 6f 72 20 | 3d 20 31 39 32 2c 31 39 |ckColor |= 192,19|
|000009a0| 32 2c 31 39 32 0d 0a 43 | 61 70 74 69 6f 6e 20 3d |2,192..C|aption =|
|000009b0| 20 22 48 6f 75 72 22 0d | 0a 48 65 69 67 68 74 20 | "Hour".|.Height |
|000009c0| 3d 20 32 35 0d 0a 4c 65 | 66 74 20 3d 20 36 30 0d |= 25..Le|ft = 60.|
|000009d0| 0a 54 6f 70 20 3d 20 32 | 36 34 0d 0a 57 69 64 74 |.Top = 2|64..Widt|
|000009e0| 68 20 3d 20 33 36 0d 0a | 54 61 62 49 6e 64 65 78 |h = 36..|TabIndex|
|000009f0| 20 3d 20 30 0d 0a 4e 61 | 6d 65 20 3d 20 22 4c 61 | = 0..Na|me = "La|
|00000a00| 62 65 6c 31 22 0d 0a 00 | 00 00 01 00 00 00 22 41 |bel1"...|......"A|
|00000a10| 72 69 61 6c 2c 20 31 2c | 20 31 30 2c 20 36 2c 20 |rial, 1,| 10, 6, |
|00000a20| 31 36 2c 20 31 33 2c 20 | 31 36 2c 20 33 2c 20 30 |16, 13, |16, 3, 0|
|00000a30| 0a 00 00 00 01 00 00 00 | 06 50 69 78 65 6c 73 00 |........|.Pixels.|
|00000a40| 00 00 01 00 00 00 05 43 | 6c 61 73 73 00 00 00 01 |.......C|lass....|
|00000a50| 00 00 00 09 63 61 6c 62 | 75 74 74 6f 6e 00 00 00 |....calb|utton...|
|00000a60| 01 00 00 00 08 64 61 79 | 6c 61 62 65 6c 00 00 00 |.....day|label...|
|00000a70| 01 00 00 00 2c 48 65 69 | 67 68 74 20 3d 20 32 39 |....,Hei|ght = 29|
|00000a80| 0d 0a 57 69 64 74 68 20 | 3d 20 39 34 0d 0a 4e 61 |..Width |= 94..Na|
|00000a90| 6d 65 20 3d 20 22 64 61 | 79 6c 61 62 65 6c 22 0d |me = "da|ylabel".|
|00000aa0| 0a 00 00 00 01 00 00 00 | 0d 63 6f 6d 6d 61 6e 64 |........|.command|
|00000ab0| 62 75 74 74 6f 6e 00 00 | 00 01 00 00 00 0b 63 61 |button..|......ca|
|00000ac0| 6c 68 65 6c 70 2e 76 63 | 78 00 00 00 01 00 00 00 |lhelp.vc|x.......|
|00000ad0| 0f 64 61 74 65 74 69 6d | 65 73 65 6c 66 6f 72 6d |.datetim|eselform|
|00000ae0| 00 00 00 01 00 00 00 06 | 4c 61 62 65 6c 31 00 00 |........|Label1..|
|00000af0| 00 01 00 00 00 05 6c 61 | 62 65 6c 00 00 00 01 00 |......la|bel.....|
|00000b00| 00 00 05 6c 61 62 65 6c | 00 00 00 01 00 00 00 29 |...label|.......)|
|00000b10| 50 52 4f 43 45 44 55 52 | 45 20 43 6c 69 63 6b 0d |PROCEDUR|E Click.|
|00000b20| 0a 74 68 69 73 66 6f 72 | 6d 2e 48 69 64 65 0d 0a |.thisfor|m.Hide..|
|00000b30| 45 4e 44 50 52 4f 43 0d | 0a 00 00 00 01 00 00 00 |ENDPROC.|........|
|00000b40| 08 70 62 43 61 6e 63 65 | 6c 00 00 00 01 00 00 00 |.pbCance|l.......|
|00000b50| 0b 63 61 6c 62 61 73 65 | 66 6f 72 6d 00 00 00 01 |.calbase|form....|
|00000b60| 00 00 00 16 75 72 65 74 | 76 61 6c 20 52 65 74 75 |....uret|val Retu|
|00000b70| 72 6e 20 76 61 6c 75 65 | 0d 0a 00 00 00 01 00 00 |rn value|........|
|00000b80| 00 75 54 6f 70 20 3d 20 | 33 31 32 0d 0a 4c 65 66 |.uTop = |312..Lef|
|00000b90| 74 20 3d 20 31 39 32 0d | 0a 48 65 69 67 68 74 20 |t = 192.|.Height |
|00000ba0| 3d 20 32 39 0d 0a 57 69 | 64 74 68 20 3d 20 39 34 |= 29..Wi|dth = 94|
|00000bb0| 0d 0a 43 61 6e 63 65 6c | 20 3d 20 2e 54 2e 0d 0a |..Cancel| = .T...|
|00000bc0| 43 61 70 74 69 6f 6e 20 | 3d 20 22 5c 3c 43 61 6e |Caption |= "\<Can|
|00000bd0| 63 65 6c 22 0d 0a 54 61 | 62 49 6e 64 65 78 20 3d |cel"..Ta|bIndex =|
|00000be0| 20 35 0d 0a 4e 61 6d 65 | 20 3d 20 22 70 62 43 61 | 5..Name| = "pbCa|
|00000bf0| 6e 63 65 6c 22 0d 0a 00 | 00 00 01 00 00 00 04 70 |ncel"...|.......p|
|00000c00| 62 4f 6b 00 00 00 01 00 | 00 00 04 66 6f 72 6d 00 |bOk.....|...form.|
|00000c10| 00 00 01 00 00 00 c2 fe | f2 ff 1b 02 01 00 00 00 |........|........|
|00000c20| a9 00 00 00 a9 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 53 59 |........|......SY|
|00000c40| 01 00 00 00 25 00 00 00 | 4d 00 00 00 00 00 00 00 |....%...|M.......|
|00000c50| 60 00 00 00 03 00 00 00 | 5a 00 00 00 00 00 00 00 |`.......|Z.......|
|00000c60| 00 00 00 00 fc 03 00 03 | 00 55 00 00 0d 00 0a 00 |........|.U......|
|00000c70| 99 f4 00 00 f7 01 00 fe | 03 00 55 02 00 08 00 54 |........|..U....T|
|00000c80| 48 49 53 46 4f 52 4d 04 | 00 48 49 44 45 05 00 43 |HISFORM.|.HIDE..C|
|00000c90| 6c 69 63 6b 2c 00 00 00 | 00 00 31 00 a1 00 31 00 |lick,...|..1...1.|
|00000ca0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cb0| 01 00 00 00 11 00 00 00 | 1e 00 00 00 01 00 00 00 |........|........|
|00000cc0| 00 29 00 00 00 a9 00 00 | 00 00 00 00 00 00 00 00 |.)......|........|
|00000cd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|00000ce0| 0f 64 61 74 65 74 69 6d | 65 73 65 6c 66 6f 72 6d |.datetim|eselform|
|00000cf0| 00 00 00 01 00 00 00 0d | 63 6f 6d 6d 61 6e 64 62 |........|commandb|
|00000d00| 75 74 74 6f 6e 00 00 00 | 01 00 00 00 0d 63 6f 6d |utton...|.....com|
|00000d10| 6d 61 6e 64 62 75 74 74 | 6f 6e 00 00 00 01 00 00 |mandbutt|on......|
|00000d20| 01 28 fe f2 ff 1b 02 01 | 00 00 00 0f 01 00 00 0f |.(......|........|
|00000d30| 01 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d40| 00 00 00 00 00 00 00 00 | 00 47 48 01 00 00 00 25 |........|.GH....%|
|00000d50| 00 00 00 b1 00 00 00 00 | 00 00 00 c6 00 00 00 04 |........|........|
|00000d60| 00 00 00 be 00 00 00 00 | 00 00 00 00 00 00 00 fc |........|........|
|00000d70| 03 00 03 00 55 00 00 43 | 00 36 00 54 f4 00 00 f7 |....U..C|.6.T....|
|00000d80| 01 00 10 fc 43 f4 00 00 | f4 02 00 f7 03 00 ea 7f |....C...|........|
|00000d90| f4 00 00 f4 04 00 f7 03 | 00 f9 04 10 0e 04 06 f4 |........|........|
|00000da0| 00 00 f4 05 00 f7 03 00 | f8 02 3c 04 06 fd fe 0a |........|..<.....|
|00000db0| 00 99 f4 00 00 f7 06 00 | fe 03 00 55 07 00 08 00 |........|...U....|
|00000dc0| 54 48 49 53 46 4f 52 4d | 07 00 55 52 45 54 56 41 |THISFORM|..URETVA|
|00000dd0| 4c 08 00 43 41 4c 45 4e | 44 41 52 05 00 56 41 4c |L..CALEN|DAR..VAL|
|00000de0| 55 45 07 00 53 50 48 4f | 55 52 53 09 00 53 50 4d |UE..SPHO|URS..SPM|
|00000df0| 49 4e 55 54 45 53 04 00 | 48 49 44 45 05 00 43 6c |INUTES..|HIDE..Cl|
|00000e00| 69 63 6b 2c 00 00 00 00 | 00 31 00 63 03 a1 00 31 |ick,....|.1.c...1|
|00000e10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000e20| 00 01 00 00 00 11 00 00 | 00 8e 00 00 00 01 00 00 |........|........|
|00000e30| 00 00 29 00 00 00 0f 01 | 00 00 00 00 00 00 00 00 |..).....|........|
|00000e40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 01 00 00 |........|........|
|00000e50| 00 99 50 52 4f 43 45 44 | 55 52 45 20 43 6c 69 63 |..PROCED|URE Clic|
|00000e60| 6b 0d 0a 74 68 69 73 66 | 6f 72 6d 2e 75 52 65 74 |k..thisf|orm.uRet|
|00000e70| 56 61 6c 3d 64 74 6f 74 | 28 74 68 69 73 66 6f 72 |Val=dtot|(thisfor|
|00000e80| 6d 2e 43 61 6c 65 6e 64 | 61 72 2e 56 61 6c 75 65 |m.Calend|ar.Value|
|00000e90| 29 2b 3b 0d 0a 09 74 68 | 69 73 66 6f 72 6d 2e 73 |)+;...th|isform.s|
|00000ea0| 70 48 6f 75 72 73 2e 56 | 61 6c 75 65 2a 33 36 30 |pHours.V|alue*360|
|00000eb0| 30 2b 3b 0d 0a 09 74 68 | 69 73 66 6f 72 6d 2e 73 |0+;...th|isform.s|
|00000ec0| 70 4d 69 6e 75 74 65 73 | 2e 56 61 6c 75 65 2a 36 |pMinutes|.Value*6|
|00000ed0| 30 0d 0a 74 68 69 73 66 | 6f 72 6d 2e 48 69 64 65 |0..thisf|orm.Hide|
|00000ee0| 0d 0a 45 4e 44 50 52 4f | 43 0d 0a 00 00 00 01 00 |..ENDPRO|C.......|
|00000ef0| 00 00 6d 54 6f 70 20 3d | 20 33 31 32 0d 0a 4c 65 |..mTop =| 312..Le|
|00000f00| 66 74 20 3d 20 34 38 0d | 0a 48 65 69 67 68 74 20 |ft = 48.|.Height |
|00000f10| 3d 20 32 39 0d 0a 57 69 | 64 74 68 20 3d 20 39 37 |= 29..Wi|dth = 97|
|00000f20| 0d 0a 43 61 70 74 69 6f | 6e 20 3d 20 22 5c 3c 4f |..Captio|n = "\<O|
|00000f30| 6b 22 0d 0a 44 65 66 61 | 75 6c 74 20 3d 20 2e 54 |k"..Defa|ult = .T|
|00000f40| 2e 0d 0a 54 61 62 49 6e | 64 65 78 20 3d 20 34 0d |...TabIn|dex = 4.|
|00000f50| 0a 4e 61 6d 65 20 3d 20 | 22 70 62 4f 6b 22 0d 0a |.Name = |"pbOk"..|
|00000f60| 00 00 00 01 00 00 00 0f | 64 61 74 65 74 69 6d 65 |........|datetime|
|00000f70| 73 65 6c 66 6f 72 6d 00 | 00 00 01 00 00 00 0d 63 |selform.|.......c|
|00000f80| 6f 6d 6d 61 6e 64 62 75 | 74 74 6f 6e 00 00 00 01 |ommandbu|tton....|
|00000f90| 00 00 00 0d 63 6f 6d 6d | 61 6e 64 62 75 74 74 6f |....comm|andbutto|
|00000fa0| 6e 00 00 00 01 00 00 00 | 8d 54 6f 70 20 3d 20 30 |n.......|.Top = 0|
|00000fb0| 0d 0a 4c 65 66 74 20 3d | 20 32 0d 0a 57 69 64 74 |..Left =| 2..Widt|
|00000fc0| 68 20 3d 20 33 33 36 0d | 0a 48 65 69 67 68 74 20 |h = 336.|.Height |
|00000fd0| 3d 20 32 34 33 0d 0a 54 | 61 62 49 6e 64 65 78 20 |= 243..T|abIndex |
|00000fe0| 3d 20 31 0d 0a 4e 61 6d | 65 20 3d 20 22 43 61 6c |= 1..Nam|e = "Cal|
|00000ff0| 65 6e 64 61 72 22 0d 0a | 6c 62 6c 46 6f 6e 74 2e |endar"..|lblFont.|
|00001000| 4e 61 6d 65 20 3d 20 22 | 6c 62 6c 46 6f 6e 74 22 |Name = "|lblFont"|
|00001010| 0d 0a 65 64 74 46 6f 6e | 74 43 6f 6c 6f 72 2e 4e |..edtFon|tColor.N|
|00001020| 61 6d 65 20 3d 20 22 65 | 64 74 46 6f 6e 74 43 6f |ame = "e|dtFontCo|
|00001030| 6c 6f 72 22 0d 0a 00 00 | 00 01 00 00 00 0f 64 61 |lor"....|......da|
|00001040| 74 65 74 69 6d 65 73 65 | 6c 66 6f 72 6d 00 00 00 |tetimese|lform...|
|00001050| 01 00 00 00 08 43 61 6c | 65 6e 64 61 72 00 00 00 |.....Cal|endar...|
|00001060| 01 00 00 00 09 63 6f 6e | 74 61 69 6e 65 72 00 00 |.....con|tainer..|
|00001070| 00 01 00 00 00 0c 63 61 | 6c 65 6e 64 61 72 2e 76 |......ca|lendar.v|
|00001080| 63 78 00 00 00 01 00 00 | 00 08 63 61 6c 65 6e 64 |cx......|..calend|
|00001090| 61 72 00 00 00 01 00 00 | 00 45 48 65 69 67 68 74 |ar......|.EHeight|
|000010a0| 20 3d 20 33 35 30 0d 0a | 57 69 64 74 68 20 3d 20 | = 350..|Width = |
|000010b0| 33 34 30 0d 0a 44 6f 43 | 72 65 61 74 65 20 3d 20 |340..DoC|reate = |
|000010c0| 2e 54 2e 0d 0a 4e 61 6d | 65 20 3d 20 22 64 61 74 |.T...Nam|e = "dat|
|000010d0| 65 74 69 6d 65 73 65 6c | 66 6f 72 6d 22 0d 0a 00 |etimesel|form"...|
|000010e0| 00 00 01 00 00 00 04 66 | 6f 72 6d 00 00 00 01 00 |.......f|orm.....|
|000010f0| 00 00 06 50 69 78 65 6c | 73 00 00 00 01 00 00 00 |...Pixel|s.......|
|00001100| 01 31 00 00 00 01 00 00 | 00 0b 63 61 6c 68 65 6c |.1......|..calhel|
|00001110| 70 2e 76 63 78 00 00 00 | 01 00 00 00 22 41 72 69 |p.vcx...|...."Ari|
|00001120| 61 6c 2c 20 31 2c 20 31 | 30 2c 20 36 2c 20 31 36 |al, 1, 1|0, 6, 16|
|00001130| 2c 20 31 33 2c 20 31 36 | 2c 20 33 2c 20 30 0a 00 |, 13, 16|, 3, 0..|
|00001140| 00 00 01 00 00 00 0b 64 | 61 74 65 73 65 6c 66 6f |.......d|ateselfo|
|00001150| 72 6d 00 00 00 01 00 00 | 00 05 43 6c 61 73 73 00 |rm......|..Class.|
|00001160| 00 00 01 00 00 00 01 33 | 00 00 00 01 00 00 00 0b |.......3|........|
|00001170| 63 61 6c 62 61 73 65 66 | 6f 72 6d 00 00 00 01 00 |calbasef|orm.....|
|00001180| 00 00 0b 64 61 74 65 73 | 65 6c 66 6f 72 6d 00 00 |...dates|elform..|
|00001190| 00 01 00 00 00 0b 64 61 | 74 65 73 65 6c 66 6f 72 |......da|teselfor|
|000011a0| 6d 00 00 00 01 00 00 01 | 6f 50 52 4f 43 45 44 55 |m.......|oPROCEDU|
|000011b0| 52 45 20 61 75 74 6f 73 | 65 74 66 6f 6e 74 73 69 |RE autos|etfontsi|
|000011c0| 7a 65 0d 0a 6c 6f 63 61 | 6c 20 6e 2c 20 63 4d 61 |ze..loca|l n, cMa|
|000011d0| 78 4c 65 6e 67 74 68 2c | 20 64 0d 0a 69 66 20 74 |xLength,| d..if t|
|000011e0| 68 69 73 2e 70 61 72 65 | 6e 74 2e 44 61 79 41 62 |his.pare|nt.DayAb|
|000011f0| 62 72 65 76 43 68 61 72 | 73 3d 3d 30 0d 0a 09 63 |brevChar|s==0...c|
|00001200| 4d 61 78 4c 65 6e 67 74 | 68 3d 27 27 0d 0a 09 64 |MaxLengt|h=''...d|
|00001210| 3d 64 61 74 65 28 29 0d | 0a 09 66 6f 72 20 6e 3d |=date().|..for n=|
|00001220| 30 20 74 6f 20 36 0d 0a | 09 09 69 66 20 6c 65 6e |0 to 6..|..if len|
|00001230| 28 63 64 6f 77 28 64 2b | 6e 29 29 20 3e 20 6c 65 |(cdow(d+|n)) > le|
|00001240| 6e 28 63 4d 61 78 4c 65 | 6e 67 74 68 29 0d 0a 09 |n(cMaxLe|ngth)...|
|00001250| 09 09 63 4d 61 78 4c 65 | 6e 67 74 68 3d 63 64 6f |..cMaxLe|ngth=cdo|
|00001260| 77 28 64 2b 6e 29 0d 0a | 09 09 65 6e 64 69 66 0d |w(d+n)..|..endif.|
|00001270| 0a 09 65 6e 64 66 6f 72 | 0d 0a 65 6c 73 65 0d 0a |..endfor|..else..|
|00001280| 09 63 4d 61 78 4c 65 6e | 67 74 68 3d 72 65 70 6c |.cMaxLen|gth=repl|
|00001290| 69 63 61 74 65 28 27 58 | 27 2c 74 68 69 73 2e 70 |icate('X|',this.p|
|000012a0| 61 72 65 6e 74 2e 64 61 | 79 41 62 62 72 65 76 43 |arent.da|yAbbrevC|
|000012b0| 68 61 72 73 29 0d 0a 65 | 6e 64 69 66 0d 0a 43 61 |hars)..e|ndif..Ca|
|000012c0| 6c 42 75 74 74 6f 6e 3a | 3a 41 75 74 6f 53 65 74 |lButton:|:AutoSet|
|000012d0| 46 6f 6e 74 53 69 7a 65 | 28 31 2c 30 2c 63 4d 61 |FontSize|(1,0,cMa|
|000012e0| 78 4c 65 6e 67 74 68 29 | 0d 0a 45 4e 44 50 52 4f |xLength)|..ENDPRO|
|000012f0| 43 0d 0a 50 52 4f 43 45 | 44 55 52 45 20 57 68 65 |C..PROCE|DURE Whe|
|00001300| 6e 0d 0a 72 65 74 75 72 | 6e 20 2e 66 2e 0d 0a 45 |n..retur|n .f...E|
|00001310| 4e 44 50 52 4f 43 0d 0a | 00 00 00 01 00 00 02 0d |NDPROC..|........|
|00001320| fe f2 ff 1b 02 01 00 00 | 00 f4 01 00 00 f4 01 00 |........|........|
|00001330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001340| 00 00 00 00 00 00 00 58 | 64 02 00 00 00 25 00 00 |.......X|d....%..|
|00001350| 00 56 01 00 00 00 00 00 | 00 9b 01 00 00 11 00 00 |.V......|........|
|00001360| 00 79 01 00 00 00 00 00 | 00 00 00 00 00 fc 03 00 |.y......|........|
|00001370| 03 00 55 00 00 cc 00 0f | 00 ae f7 00 00 07 f7 01 |..U.....|........|
|00001380| 00 07 f7 02 00 fe 17 00 | 25 fc f4 03 00 f4 04 00 |........|%.......|
|00001390| f7 05 00 f8 01 00 14 fd | f9 05 8c 00 fe 0d 00 54 |........|.......T|
|000013a0| f7 01 00 10 fc fb 00 00 | fd fe 0c 00 54 f7 02 00 |........|....T...|
|000013b0| 10 fc 43 24 fd fe 17 00 | 84 f7 00 00 10 fc f8 01 |..C$....|........|
|000013c0| 00 fd 28 fc f8 01 06 fd | f9 05 88 00 fe 1b 00 25 |..(.....|.......%|
|000013d0| fc 43 43 f7 02 00 f7 00 | 00 06 1f 3e 43 f7 01 00 |.CC.....|...>C...|
|000013e0| 3e 11 fd f9 05 84 00 fe | 13 00 54 f7 01 00 10 fc |>.......|..T.....|
|000013f0| 43 f7 02 00 f7 00 00 06 | 1f fd fe 04 00 1e fe 04 |C.......|........|
|00001400| 00 85 fe 08 00 1b f9 05 | ad 00 fe 19 00 54 f7 01 |........|.....T..|
|00001410| 00 10 fc 43 fb 01 00 58 | f4 03 00 f4 04 00 f7 05 |...C...X|........|
|00001420| 00 51 fd fe 04 00 1e fe | 18 00 99 fc 43 f8 01 01 |.Q......|....C...|
|00001430| f8 01 00 00 f7 01 00 df | e3 06 00 f6 07 00 fd fe |........|........|
|00001440| 03 00 55 08 00 01 00 4e | 0a 00 43 4d 41 58 4c 45 |..U....N|..CMAXLE|
|00001450| 4e 47 54 48 01 00 44 04 | 00 54 48 49 53 06 00 50 |NGTH..D.|.THIS..P|
|00001460| 41 52 45 4e 54 0e 00 44 | 41 59 41 42 42 52 45 56 |ARENT..D|AYABBREV|
|00001470| 43 48 41 52 53 09 00 43 | 41 4c 42 55 54 54 4f 4e |CHARS..C|ALBUTTON|
|00001480| 0f 00 41 55 54 4f 53 45 | 54 46 4f 4e 54 53 49 5a |..AUTOSE|TFONTSIZ|
|00001490| 45 0a 00 07 00 42 fc 2d | fd fe 03 00 55 00 00 0f |E....B.-|....U...|
|000014a0| 00 61 75 74 6f 73 65 74 | 66 6f 6e 74 73 69 7a 65 |.autoset|fontsize|
|000014b0| 2c 00 00 00 00 00 04 00 | 57 68 65 6e 48 01 00 00 |,.......|WhenH...|
|000014c0| 00 00 31 00 f1 00 71 01 | d1 00 c1 00 71 01 b1 01 |..1...q.|....q...|
|000014d0| 31 01 41 00 41 00 81 00 | 91 01 41 00 81 01 32 00 |1.A.A...|..A...2.|
|000014e0| 71 00 31 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |q.1.....|........|
|000014f0| 00 00 00 00 01 00 00 00 | 1b 00 00 00 3f 01 00 00 |........|....?...|
|00001500| 01 00 00 00 0f 00 00 00 | 5a 01 00 00 64 01 00 00 |........|Z...d...|
|00001510| 10 00 00 00 00 29 00 00 | 00 f4 01 00 00 00 00 00 |.....)..|........|
|00001520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001530| 01 00 00 02 10 50 52 4f | 43 45 44 55 52 45 20 49 |.....PRO|CEDURE I|
|00001540| 6e 69 74 0d 0a 4c 50 61 | 72 61 6d 65 74 65 72 73 |nit..LPa|rameters|
|00001550| 20 74 54 69 6d 65 2c 20 | 6c 52 65 61 64 4f 6e 6c | tTime, |lReadOnl|
|00001560| 79 0d 0a 0d 0a 69 66 20 | 65 6d 70 74 79 28 74 54 |y....if |empty(tT|
|00001570| 69 6d 65 29 20 2e 6f 72 | 2e 20 69 73 6e 75 6c 6c |ime) .or|. isnull|
|00001580| 28 74 54 69 6d 65 29 0d | 0a 09 74 54 69 6d 65 3d |(tTime).|..tTime=|
|00001590| 64 61 74 65 54 69 6d 65 | 28 29 0d 0a 65 6e 64 69 |dateTime|()..endi|
|000015a0| 66 0d 0a 0d 0a 69 66 20 | 74 74 6f 64 28 74 54 69 |f....if |ttod(tTi|
|000015b0| 6d 65 29 21 3d 64 61 74 | 65 28 29 0d 0a 09 74 68 |me)!=dat|e()...th|
|000015c0| 69 73 2e 43 61 6c 65 6e | 64 61 72 2e 56 61 6c 75 |is.Calen|dar.Valu|
|000015d0| 65 3d 74 74 6f 64 28 74 | 54 69 6d 65 29 0d 0a 09 |e=ttod(t|Time)...|
|000015e0| 74 68 69 73 2e 43 61 6c | 65 6e 64 61 72 2e 61 53 |this.Cal|endar.aS|
|000015f0| 65 6c 65 63 74 65 64 5b | 31 2c 31 5d 3d 74 68 69 |elected[|1,1]=thi|
|00001600| 73 2e 63 61 6c 65 6e 64 | 61 72 2e 56 61 6c 75 65 |s.calend|ar.Value|
|00001610| 0d 0a 09 74 68 69 73 2e | 43 61 6c 65 6e 64 61 72 |...this.|Calendar|
|00001620| 2e 53 65 74 75 70 44 69 | 73 70 6c 61 79 28 74 74 |.SetupDi|splay(tt|
|00001630| 6f 64 28 74 54 69 6d 65 | 29 29 0d 0a 65 6e 64 69 |od(tTime|))..endi|
|00001640| 66 0d 0a 0d 0a 74 68 69 | 73 2e 73 70 48 6f 75 72 |f....thi|s.spHour|
|00001650| 73 2e 56 61 6c 75 65 3d | 68 6f 75 72 28 74 54 69 |s.Value=|hour(tTi|
|00001660| 6d 65 29 0d 0a 74 68 69 | 73 2e 73 70 4d 69 6e 75 |me)..thi|s.spMinu|
|00001670| 74 65 73 2e 56 61 6c 75 | 65 3d 6d 69 6e 75 74 65 |tes.Valu|e=minute|
|00001680| 28 74 54 69 6d 65 29 0d | 0a 0d 0a 69 66 20 6c 52 |(tTime).|...if lR|
|00001690| 65 61 64 4f 6e 6c 79 0d | 0a 09 74 68 69 73 2e 43 |eadOnly.|..this.C|
|000016a0| 61 6c 65 6e 64 61 72 2e | 45 6e 61 62 6c 65 64 3d |alendar.|Enabled=|
|000016b0| 2e 66 2e 0d 0a 09 74 68 | 69 73 2e 43 61 70 74 69 |.f....th|is.Capti|
|000016c0| 6f 6e 3d 22 43 61 6c 65 | 6e 64 61 72 22 0d 0a 09 |on="Cale|ndar"...|
|000016d0| 74 68 69 73 2e 73 70 48 | 6f 75 72 73 2e 45 6e 61 |this.spH|ours.Ena|
|000016e0| 62 6c 65 64 3d 2e 66 2e | 0d 0a 09 74 68 69 73 2e |bled=.f.|...this.|
|000016f0| 73 70 4d 69 6e 75 74 65 | 73 2e 45 6e 61 62 6c 65 |spMinute|s.Enable|
|00001700| 64 3d 2e 66 2e 0d 0a 65 | 6c 73 65 0d 0a 09 74 68 |d=.f...e|lse...th|
|00001710| 69 73 2e 43 61 70 74 69 | 6f 6e 3d 22 53 65 6c 65 |is.Capti|on="Sele|
|00001720| 63 74 20 61 20 44 61 74 | 65 20 61 6e 64 20 54 69 |ct a Dat|e and Ti|
|00001730| 6d 65 22 0d 0a 65 6e 64 | 69 66 0d 0a 45 4e 44 50 |me"..end|if..ENDP|
|00001740| 52 4f 43 0d 0a 00 00 00 | 01 00 00 00 05 43 6c 61 |ROC.....|.....Cla|
|00001750| 73 73 00 00 00 01 00 00 | 00 ef fe f2 ff 1b 02 01 |ss......|........|
|00001760| 00 00 00 d6 00 00 00 d6 | 00 00 00 00 00 00 00 00 |........|........|
|00001770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001780| 00 b9 61 01 00 00 00 25 | 00 00 00 70 00 00 00 00 |..a....%|...p....|
|00001790| 00 00 00 8d 00 00 00 05 | 00 00 00 83 00 00 00 00 |........|........|
|000017a0| 00 00 00 00 00 00 00 fc | 03 00 03 00 55 00 00 24 |........|....U..$|
|000017b0| 00 07 00 af f7 00 00 fe | 10 00 54 f4 01 00 f7 02 |........|..T.....|
|000017c0| 00 10 fc f7 00 00 fd fe | 0a 00 99 f4 01 00 f7 03 |........|........|
|000017d0| 00 fe 03 00 55 04 00 01 | 00 44 08 00 54 48 49 53 |....U...|.D..THIS|
|000017e0| 46 4f 52 4d 07 00 55 52 | 45 54 56 41 4c 04 00 48 |FORM..UR|ETVAL..H|
|000017f0| 49 44 45 0b 00 6f 6e 64 | 61 79 73 65 6c 65 63 74 |IDE..ond|ayselect|
|00001800| 2c 00 00 00 00 00 31 00 | 71 00 02 01 a1 00 32 00 |,.....1.|q.....2.|
|00001810| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001820| 01 00 00 00 17 00 00 00 | 4b 00 00 00 01 00 00 00 |........|K.......|
|00001830| 00 29 00 00 00 d6 00 00 | 00 00 00 00 00 00 00 00 |.)......|........|
|00001840| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|00001850| 56 50 52 4f 43 45 44 55 | 52 45 20 6f 6e 64 61 79 |VPROCEDU|RE onday|
|00001860| 73 65 6c 65 63 74 0d 0a | 4c 50 41 52 41 4d 45 54 |select..|LPARAMET|
|00001870| 45 52 53 20 64 0d 0a 0d | 0a 74 68 69 73 66 6f 72 |ERS d...|.thisfor|
|00001880| 6d 2e 75 52 65 74 56 61 | 6c 3d 64 0d 0a 74 68 69 |m.uRetVa|l=d..thi|
|00001890| 73 66 6f 72 6d 2e 48 69 | 64 65 0d 0a 0d 0a 45 4e |sform.Hi|de....EN|
|000018a0| 44 50 52 4f 43 0d 0a 00 | 00 00 01 00 00 00 8e 54 |DPROC...|.......T|
|000018b0| 6f 70 20 3d 20 32 0d 0a | 4c 65 66 74 20 3d 20 32 |op = 2..|Left = 2|
|000018c0| 0d 0a 57 69 64 74 68 20 | 3d 20 33 33 36 0d 0a 48 |..Width |= 336..H|
|000018d0| 65 69 67 68 74 20 3d 20 | 32 34 33 0d 0a 5a 4f 72 |eight = |243..ZOr|
|000018e0| 64 65 72 53 65 74 20 3d | 20 31 0d 0a 4e 61 6d 65 |derSet =| 1..Name|
|000018f0| 20 3d 20 22 43 61 6c 65 | 6e 64 61 72 22 0d 0a 6c | = "Cale|ndar"..l|
|00001900| 62 6c 46 6f 6e 74 2e 4e | 61 6d 65 20 3d 20 22 6c |blFont.N|ame = "l|
|00001910| 62 6c 46 6f 6e 74 22 0d | 0a 65 64 74 46 6f 6e 74 |blFont".|.edtFont|
|00001920| 43 6f 6c 6f 72 2e 4e 61 | 6d 65 20 3d 20 22 65 64 |Color.Na|me = "ed|
|00001930| 74 46 6f 6e 74 43 6f 6c | 6f 72 22 0d 0a 00 00 00 |tFontCol|or".....|
|00001940| 01 00 00 00 08 43 61 6c | 65 6e 64 61 72 00 00 00 |.....Cal|endar...|
|00001950| 01 00 00 00 09 63 6f 6e | 74 61 69 6e 65 72 00 00 |.....con|tainer..|
|00001960| 00 01 00 00 00 0c 63 61 | 6c 65 6e 64 61 72 2e 76 |......ca|lendar.v|
|00001970| 63 78 00 00 00 01 00 00 | 00 08 63 61 6c 65 6e 64 |cx......|..calend|
|00001980| 61 72 00 00 00 01 00 00 | 00 29 50 52 4f 43 45 44 |ar......|.)PROCED|
|00001990| 55 52 45 20 43 6c 69 63 | 6b 0d 0a 74 68 69 73 66 |URE Clic|k..thisf|
|000019a0| 6f 72 6d 2e 68 69 64 65 | 0d 0a 45 4e 44 50 52 4f |orm.hide|..ENDPRO|
|000019b0| 43 0d 0a 00 00 00 01 00 | 00 00 0b 64 61 74 65 73 |C.......|...dates|
|000019c0| 65 6c 66 6f 72 6d 00 00 | 00 01 00 00 02 fa fe f2 |elform..|........|
|000019d0| ff 1b 02 01 00 00 00 e1 | 02 00 00 e1 02 00 00 00 |........|........|
|000019e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019f0| 00 00 00 00 00 75 80 03 | 00 00 00 25 00 00 00 0f |.....u..|...%....|
|00001a00| 02 00 00 00 00 00 00 78 | 02 00 00 1a 00 00 00 44 |.......x|.......D|
|00001a10| 02 00 00 00 00 00 00 00 | 00 00 00 fc 03 00 03 00 |........|........|
|00001a20| 55 00 00 50 00 12 00 25 | fc f4 00 00 f7 01 00 61 |U..P...%|.......a|
|00001a30| 10 fd f9 05 20 00 fe 0e | 00 54 f4 00 00 f7 01 00 |.... ...|.T......|
|00001a40| 10 fc 2d fd fe 08 00 1b | f9 05 49 00 fe 21 00 99 |..-.....|..I..!..|
|00001a50| fc 43 43 f4 00 00 f4 02 | 00 f7 04 00 f4 00 00 f7 |.CC.....|........|
|00001a60| 05 00 c3 f4 00 00 f4 02 | 00 f6 03 00 fd fe 04 00 |........|........|
|00001a70| 1e fe 03 00 55 06 00 04 | 00 54 48 49 53 05 00 4d |....U...|.THIS..M|
|00001a80| 44 4f 57 4e 06 00 50 41 | 52 45 4e 54 0c 00 53 45 |DOWN..PA|RENT..SE|
|00001a90| 54 55 50 44 49 53 50 4c | 41 59 0b 00 44 49 53 50 |TUPDISPL|AY..DISP|
|00001aa0| 4c 41 59 44 41 54 45 09 | 00 49 4e 43 52 45 4d 45 |LAYDATE.|.INCREME|
|00001ab0| 4e 54 c5 00 13 00 af f7 | 00 00 07 f7 01 00 07 f7 |NT......|........|
|00001ac0| 02 00 07 f7 03 00 fe 0b | 00 ae f7 04 00 07 f7 05 |........|........|
|00001ad0| 00 fe 0c 00 54 f7 04 00 | 10 fc 43 a7 fd fe 0a 00 |....T...|..C.....|
|00001ae0| 99 f4 06 00 f7 07 00 fe | 17 00 18 2b fc 43 c6 f0 |........|...+.C..|
|00001af0| 07 00 f4 06 00 f7 08 00 | 09 fd f9 05 b0 00 fe 0c |........|........|
|00001b00| 00 54 f7 05 00 10 fc 43 | a7 fd fe 14 00 25 fc 43 |.T.....C|.....%.C|
|00001b10| a7 f7 04 00 08 03 ed 19 | 11 fd f9 05 75 00 fe 0a |........|....u...|
|00001b20| 00 99 f4 06 00 f7 07 00 | fe 04 00 1e fe 0e 00 25 |........|.......%|
|00001b30| fc 43 c6 2d 14 fd f9 05 | 8b 00 fe 04 00 21 fe 08 |.C.-....|.....!..|
|00001b40| 00 1b f9 05 ac 00 fe 19 | 00 86 fc 43 43 ed 19 43 |........|...CC..C|
|00001b50| a7 f7 05 00 08 03 08 19 | fb 02 00 48 4d 37 fd fe |........|...HM7..|
|00001b60| 04 00 1e fe 04 00 1d fe | 0e 00 54 f4 06 00 f7 09 |........|..T.....|
|00001b70| 00 10 fc 61 fd fe 03 00 | 55 0a 00 07 00 4e 42 55 |...a....|U....NBU|
|00001b80| 54 54 4f 4e 06 00 4e 53 | 48 49 46 54 07 00 4e 58 |TTON..NS|HIFT..NX|
|00001b90| 43 4f 4f 52 44 07 00 4e | 59 43 4f 4f 52 44 06 00 |COORD..N|YCOORD..|
|00001ba0| 54 53 54 41 52 54 05 00 | 54 4c 41 53 54 04 00 54 |TSTART..|TLAST..T|
|00001bb0| 48 49 53 05 00 43 4c 49 | 43 4b 07 00 45 4e 41 42 |HIS..CLI|CK..ENAB|
|00001bc0| 4c 45 44 05 00 4d 44 4f | 57 4e 1c 00 19 00 99 fc |LED..MDO|WN......|
|00001bd0| 43 f8 01 02 f8 01 00 fb | 02 00 78 78 df e3 00 00 |C.......|..xx....|
|00001be0| f6 01 00 fd fe 03 00 55 | 02 00 09 00 43 41 4c 42 |.......U|....CALB|
|00001bf0| 55 54 54 4f 4e 0f 00 41 | 55 54 4f 53 45 54 46 4f |UTTON..A|UTOSETFO|
|00001c00| 4e 54 53 49 5a 45 05 00 | 43 6c 69 63 6b 2c 00 00 |NTSIZE..|Click,..|
|00001c10| 00 00 00 09 00 4d 6f 75 | 73 65 44 6f 77 6e bb 00 |.....Mou|seDown..|
|00001c20| 00 00 00 00 0f 00 61 75 | 74 6f 73 65 74 66 6f 6e |......au|tosetfon|
|00001c30| 74 73 69 7a 65 d3 01 00 | 00 00 00 31 00 21 01 e1 |tsize...|...1.!..|
|00001c40| 00 81 00 11 02 41 00 32 | 00 31 01 b2 00 c1 00 a1 |.....A.2|.1......|
|00001c50| 00 71 01 c7 00 41 01 a1 | 00 41 00 e1 00 41 00 81 |.q...A..|.A...A..|
|00001c60| 00 91 01 41 00 41 00 e2 | 00 33 00 91 01 31 00 00 |...A.A..|.3...1..|
|00001c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00001c80| 00 00 00 11 00 00 00 8c | 00 00 00 01 00 00 00 07 |........|........|
|00001c90| 00 00 00 ac 00 00 00 a3 | 02 00 00 08 00 00 00 18 |........|........|
|00001ca0| 00 00 00 c9 02 00 00 ed | 02 00 00 23 00 00 00 00 |........|...#....|
|00001cb0| 29 00 00 00 e1 02 00 00 | 00 00 00 00 00 00 00 00 |).......|........|
|00001cc0| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 00 c2 |........|........|
|00001cd0| fe f2 ff 1b 02 01 00 00 | 00 a9 00 00 00 a9 00 00 |........|........|
|00001ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cf0| 00 00 00 00 00 00 00 53 | 59 01 00 00 00 25 00 00 |.......S|Y....%..|
|00001d00| 00 4d 00 00 00 00 00 00 | 00 60 00 00 00 03 00 00 |.M......|.`......|
|00001d10| 00 5a 00 00 00 00 00 00 | 00 00 00 00 00 fc 03 00 |.Z......|........|
|00001d20| 03 00 55 00 00 0d 00 0a | 00 99 f4 00 00 f7 01 00 |..U.....|........|
|00001d30| fe 03 00 55 02 00 08 00 | 54 48 49 53 46 4f 52 4d |...U....|THISFORM|
|00001d40| 04 00 48 49 44 45 05 00 | 43 6c 69 63 6b 2c 00 00 |..HIDE..|Click,..|
|00001d50| 00 00 00 31 00 a1 00 31 | 00 00 00 00 00 00 00 00 |...1...1|........|
|00001d60| 00 00 00 00 00 00 00 00 | 00 01 00 00 00 11 00 00 |........|........|
|00001d70| 00 1e 00 00 00 01 00 00 | 00 00 29 00 00 00 a9 00 |........|..).....|
|00001d80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d90| 00 00 00 00 00 01 00 00 | 00 82 54 6f 70 20 3d 20 |........|..Top = |
|00001da0| 37 32 0d 0a 4c 65 66 74 | 20 3d 20 39 36 0d 0a 48 |72..Left| = 96..H|
|00001db0| 65 69 67 68 74 20 3d 20 | 33 37 0d 0a 57 69 64 74 |eight = |37..Widt|
|00001dc0| 68 20 3d 20 31 30 39 0d | 0a 43 61 6e 63 65 6c 20 |h = 109.|.Cancel |
|00001dd0| 3d 20 2e 54 2e 0d 0a 43 | 61 70 74 69 6f 6e 20 3d |= .T...C|aption =|
|00001de0| 20 22 5c 3c 43 6c 6f 73 | 65 22 0d 0a 54 61 62 53 | "\<Clos|e"..TabS|
|00001df0| 74 6f 70 20 3d 20 2e 54 | 2e 0d 0a 5a 4f 72 64 65 |top = .T|...ZOrde|
|00001e00| 72 53 65 74 20 3d 20 30 | 0d 0a 4e 61 6d 65 20 3d |rSet = 0|..Name =|
|00001e10| 20 22 70 62 43 6c 6f 73 | 65 22 0d 0a 00 00 00 01 | "pbClos|e"......|
|00001e20| 00 00 00 07 70 62 43 6c | 6f 73 65 00 00 00 01 00 |....pbCl|ose.....|
|00001e30| 00 00 0d 63 6f 6d 6d 61 | 6e 64 62 75 74 74 6f 6e |...comma|ndbutton|
|00001e40| 00 00 00 01 00 00 00 0d | 63 6f 6d 6d 61 6e 64 62 |........|commandb|
|00001e50| 75 74 74 6f 6e 00 00 00 | 01 00 00 00 5c 48 65 69 |utton...|....\Hei|
|00001e60| 67 68 74 20 3d 20 32 34 | 37 0d 0a 57 69 64 74 68 |ght = 24|7..Width|
|00001e70| 20 3d 20 33 34 30 0d 0a | 44 6f 43 72 65 61 74 65 | = 340..|DoCreate|
|00001e80| 20 3d 20 2e 54 2e 0d 0a | 43 61 70 74 69 6f 6e 20 | = .T...|Caption |
|00001e90| 3d 20 22 53 65 6c 65 63 | 74 20 61 20 44 61 74 65 |= "Selec|t a Date|
|00001ea0| 22 0d 0a 4e 61 6d 65 20 | 3d 20 22 64 61 74 65 73 |"..Name |= "dates|
|00001eb0| 65 6c 66 6f 72 6d 22 0d | 0a 00 00 00 01 00 00 00 |elform".|........|
|00001ec0| 04 66 6f 72 6d 00 00 00 | 01 00 00 00 0b 63 61 6c |.form...|.....cal|
|00001ed0| 68 65 6c 70 2e 76 63 78 | 00 00 00 01 00 00 00 22 |help.vcx|......."|
|00001ee0| 41 72 69 61 6c 2c 20 31 | 2c 20 31 30 2c 20 36 2c |Arial, 1|, 10, 6,|
|00001ef0| 20 31 36 2c 20 31 33 2c | 20 31 36 2c 20 33 2c 20 | 16, 13,| 16, 3, |
|00001f00| 30 0a 00 00 00 01 00 00 | 00 06 63 61 6c 64 61 79 |0.......|..calday|
|00001f10| 00 00 00 01 00 00 00 04 | 66 6f 72 6d 00 00 00 01 |........|form....|
|00001f20| 00 00 01 6a 50 52 4f 43 | 45 44 55 52 45 20 61 75 |...jPROC|EDURE au|
|00001f30| 74 6f 73 65 74 66 6f 6e | 74 73 69 7a 65 0d 0a 6c |tosetfon|tsize..l|
|00001f40| 6f 63 61 6c 20 63 4d 61 | 78 4c 65 6e 67 74 68 2c |ocal cMa|xLength,|
|00001f50| 20 6e 0d 0a 63 4d 61 78 | 4c 65 6e 67 74 68 3d 27 | n..cMax|Length='|
|00001f60| 27 0d 0a 66 6f 72 20 6e | 3d 30 20 74 6f 20 31 31 |'..for n|=0 to 11|
|00001f70| 0d 0a 09 69 66 20 28 6c | 65 6e 28 63 6d 6f 6e 74 |...if (l|en(cmont|
|00001f80| 68 28 67 6f 6d 6f 6e 74 | 68 28 64 61 74 65 28 29 |h(gomont|h(date()|
|00001f90| 2c 6e 29 29 29 20 3e 20 | 6c 65 6e 28 63 4d 61 78 |,n))) > |len(cMax|
|00001fa0| 4c 65 6e 67 74 68 29 29 | 0d 0a 09 09 63 4d 61 78 |Length))|....cMax|
|00001fb0| 4c 65 6e 67 74 68 3d 63 | 6d 6f 6e 74 68 28 67 6f |Length=c|month(go|
|00001fc0| 6d 6f 6e 74 68 28 64 61 | 74 65 28 29 2c 6e 29 29 |month(da|te(),n))|
|00001fd0| 0d 0a 09 65 6e 64 69 66 | 0d 0a 65 6e 64 66 6f 72 |...endif|..endfor|
|00001fe0| 0d 0a 63 4d 61 78 4c 65 | 6e 67 74 68 3d 63 4d 61 |..cMaxLe|ngth=cMa|
|00001ff0| 78 4c 65 6e 67 74 68 2b | 27 2c 20 27 2b 73 74 72 |xLength+|', '+str|
|00002000| 28 79 65 61 72 28 64 61 | 74 65 28 29 29 2c 34 29 |(year(da|te()),4)|
|00002010| 0d 0a 43 61 6c 42 75 74 | 74 6f 6e 3a 3a 41 75 74 |..CalBut|ton::Aut|
|00002020| 6f 53 65 74 46 6f 6e 74 | 53 69 7a 65 28 33 2c 30 |oSetFont|Size(3,0|
|00002030| 2c 63 4d 61 78 4c 65 6e | 67 74 68 29 0d 0a 45 4e |,cMaxLen|gth)..EN|
|00002040| 44 50 52 4f 43 0d 0a 50 | 52 4f 43 45 44 55 52 45 |DPROC..P|ROCEDURE|
|00002050| 20 43 6c 69 63 6b 0d 0a | 74 68 69 73 2e 50 61 72 | Click..|this.Par|
|00002060| 65 6e 74 2e 53 65 74 75 | 70 44 69 73 70 6c 61 79 |ent.Setu|pDisplay|
|00002070| 28 74 68 69 73 2e 50 61 | 72 65 6e 74 2e 56 61 6c |(this.Pa|rent.Val|
|00002080| 75 65 29 0d 0a 45 4e 44 | 50 52 4f 43 0d 0a 00 00 |ue)..END|PROC....|
|00002090| 00 01 00 00 00 06 50 69 | 78 65 6c 73 00 00 00 01 |......Pi|xels....|
|000020a0| 00 00 00 05 43 6c 61 73 | 73 00 00 00 01 00 00 00 |....Clas|s.......|
|000020b0| 01 31 00 00 00 01 00 00 | 00 09 63 61 6c 62 75 74 |.1......|..calbut|
|000020c0| 74 6f 6e 00 00 00 01 00 | 00 00 06 63 61 6c 64 61 |ton.....|...calda|
|000020d0| 79 00 00 00 01 00 00 00 | 0d 63 6f 6d 6d 61 6e 64 |y.......|.command|
|000020e0| 62 75 74 74 6f 6e 00 00 | 00 01 00 00 02 f8 50 52 |button..|......PR|
|000020f0| 4f 43 45 44 55 52 45 20 | 43 6c 69 63 6b 0d 0a 69 |OCEDURE |Click..i|
|00002100| 66 20 74 68 69 73 2e 6d | 44 6f 77 6e 3d 2e 74 2e |f this.m|Down=.t.|
|00002110| 0d 0a 09 74 68 69 73 2e | 6d 44 6f 77 6e 3d 2e 66 |...this.|mDown=.f|
|00002120| 2e 0d 0a 65 6c 73 65 0d | 0a 09 74 68 69 73 2e 50 |...else.|..this.P|
|00002130| 61 72 65 6e 74 2e 53 65 | 74 75 70 44 69 73 70 6c |arent.Se|tupDispl|
|00002140| 61 79 28 67 6f 6d 6f 6e | 74 68 28 74 68 69 73 2e |ay(gomon|th(this.|
|00002150| 70 61 72 65 6e 74 2e 44 | 69 73 70 6c 61 79 44 61 |parent.D|isplayDa|
|00002160| 74 65 2c 74 68 69 73 2e | 49 6e 63 72 65 6d 65 6e |te,this.|Incremen|
|00002170| 74 29 29 0d 0a 65 6e 64 | 69 66 0d 0a 45 4e 44 50 |t))..end|if..ENDP|
|00002180| 52 4f 43 0d 0a 50 52 4f | 43 45 44 55 52 45 20 4d |ROC..PRO|CEDURE M|
|00002190| 6f 75 73 65 44 6f 77 6e | 0d 0a 4c 50 41 52 41 4d |ouseDown|..LPARAM|
|000021a0| 45 54 45 52 53 20 6e 42 | 75 74 74 6f 6e 2c 20 6e |ETERS nB|utton, n|
|000021b0| 53 68 69 66 74 2c 20 6e | 58 43 6f 6f 72 64 2c 20 |Shift, n|XCoord, |
|000021c0| 6e 59 43 6f 6f 72 64 0d | 0a 0d 0a 6c 6f 63 61 6c |nYCoord.|...local|
|000021d0| 20 74 53 74 61 72 74 2c | 20 74 4c 61 73 74 0d 0a | tStart,| tLast..|
|000021e0| 74 53 74 61 72 74 3d 53 | 65 63 6f 6e 64 73 28 29 |tStart=S|econds()|
|000021f0| 0d 0a 74 68 69 73 2e 43 | 6c 69 63 6b 0d 0a 64 6f |..this.C|lick..do|
|00002200| 20 77 68 69 6c 65 20 6d | 44 6f 77 6e 28 29 20 2e | while m|Down() .|
|00002210| 61 6e 64 2e 20 74 68 69 | 73 2e 65 6e 61 62 6c 65 |and. thi|s.enable|
|00002220| 64 0d 0a 0d 0a 09 09 2a | 0d 0a 09 09 2a 09 54 68 |d......*|....*.Th|
|00002230| 69 73 20 63 6f 64 65 20 | 68 61 6e 64 6c 65 73 20 |is code |handles |
|00002240| 74 68 65 20 62 75 74 74 | 6f 6e 20 62 65 69 6e 67 |the butt|on being|
|00002250| 20 70 72 65 73 73 65 64 | 20 63 6f 6e 74 69 6e 75 | pressed| continu|
|00002260| 6f 73 6c 79 0d 0a 09 09 | 2a 09 49 74 20 77 6f 72 |osly....|*.It wor|
|00002270| 6b 73 20 77 65 6c 6c 20 | 6f 6e 20 61 20 70 65 6e |ks well |on a pen|
|00002280| 74 69 75 6d 20 39 30 2c | 20 62 75 74 20 6d 61 79 |tium 90,| but may|
|00002290| 20 6e 65 65 64 20 74 77 | 65 65 6b 69 6e 67 20 6f | need tw|eeking o|
|000022a0| 6e 0d 0a 09 09 2a 09 61 | 20 73 6c 6f 77 65 72 20 |n....*.a| slower |
|000022b0| 6d 61 63 68 69 6e 65 0d | 0a 09 09 2a 0d 0a 09 09 |machine.|...*....|
|000022c0| 74 4c 61 73 74 3d 53 65 | 63 6f 6e 64 73 28 29 0d |tLast=Se|conds().|
|000022d0| 0a 09 09 69 66 20 28 53 | 65 63 6f 6e 64 73 28 29 |...if (S|econds()|
|000022e0| 2d 74 53 74 61 72 74 29 | 20 3e 20 5f 44 42 4c 43 |-tStart)| > _DBLC|
|000022f0| 4c 49 43 4b 0d 0a 09 09 | 09 54 68 69 73 2e 43 6c |LICK....|.This.Cl|
|00002300| 69 63 6b 0d 0a 09 09 65 | 6e 64 69 66 0d 0a 09 09 |ick....e|ndif....|
|00002310| 69 66 20 6d 44 6f 77 6e | 28 29 3d 3d 2e 66 2e 0d |if mDown|()==.f..|
|00002320| 0a 09 09 09 65 78 69 74 | 0d 0a 09 09 65 6c 73 65 |....exit|....else|
|00002330| 0d 0a 09 09 09 3d 69 6e | 6b 65 79 28 61 62 73 28 |.....=in|key(abs(|
|00002340| 5f 44 42 4c 43 4c 49 43 | 4b 2d 28 73 65 63 6f 6e |_DBLCLIC|K-(secon|
|00002350| 64 73 28 29 2d 74 4c 61 | 73 74 29 29 2c 22 48 4d |ds()-tLa|st)),"HM|
|00002360| 22 29 0d 0a 09 09 65 6e | 64 69 66 0d 0a 65 6e 64 |")....en|dif..end|
|00002370| 64 6f 0d 0a 2a 20 4e 4f | 44 45 46 41 55 4c 54 0d |do..* NO|DEFAULT.|
|00002380| 0a 74 68 69 73 2e 6d 44 | 6f 77 6e 3d 2e 74 2e 0d |.this.mD|own=.t..|
|00002390| 0a 0d 0a 45 4e 44 50 52 | 4f 43 0d 0a 50 52 4f 43 |...ENDPR|OC..PROC|
|000023a0| 45 44 55 52 45 20 61 75 | 74 6f 73 65 74 66 6f 6e |EDURE au|tosetfon|
|000023b0| 74 73 69 7a 65 0d 0a 43 | 61 6c 42 75 74 74 6f 6e |tsize..C|alButton|
|000023c0| 3a 3a 41 75 74 6f 53 65 | 74 46 6f 6e 74 53 69 7a |::AutoSe|tFontSiz|
|000023d0| 65 28 32 2c 30 2c 22 78 | 78 22 29 0d 0a 45 4e 44 |e(2,0,"x|x")..END|
|000023e0| 50 52 4f 43 0d 0a 00 00 | 00 01 00 00 02 85 fe f2 |PROC....|........|
|000023f0| ff 1b 02 01 00 00 00 6c | 02 00 00 6c 02 00 00 00 |.......l|...l....|
|00002400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002410| 00 00 00 00 00 af 1b 01 | 00 00 00 25 00 00 00 ed |........|...%....|
|00002420| 01 00 00 00 00 00 00 23 | 02 00 00 15 00 00 00 f9 |.......#|........|
|00002430| 01 00 00 00 00 00 00 00 | 00 00 00 fc 03 00 03 00 |........|........|
|00002440| 55 00 00 55 01 0b 00 af | f7 00 00 07 f7 01 00 fe |U..U....|........|
|00002450| 18 00 25 fc 43 f7 00 00 | a1 f1 06 00 43 f7 00 00 |..%.C...|....C...|
|00002460| d1 0b fd f9 05 30 00 fe | 0d 00 54 f7 00 00 10 fc |.....0..|..T.....|
|00002470| 43 ea 86 fd fe 04 00 1e | fe 13 00 25 fc 43 f7 00 |C.......|...%.C..|
|00002480| 00 ea 80 43 24 0f fd f9 | 05 98 00 fe 16 00 54 f4 |...C$...|......T.|
|00002490| 02 00 f4 03 00 f7 04 00 | 10 fc 43 f7 00 00 ea 80 |........|..C.....|
|000024a0| fd fe 25 00 54 f4 02 00 | f4 03 00 f6 05 00 fc f8 |..%.T...|........|
|000024b0| 01 01 fd 07 fc f8 01 01 | fd 16 10 fc f4 02 00 f4 |........|........|
|000024c0| 03 00 f7 04 00 fd fe 16 | 00 99 fc 43 43 f7 00 00 |........|...CC...|
|000024d0| ea 80 f4 02 00 f4 03 00 | f6 06 00 fd fe 04 00 1e |........|........|
|000024e0| fe 16 00 54 f4 02 00 f4 | 07 00 f7 04 00 10 fc 43 |...T....|.......C|
|000024f0| f7 00 00 ea 83 fd fe 16 | 00 54 f4 02 00 f4 08 00 |........|.T......|
|00002500| f7 04 00 10 fc 43 f7 00 | 00 ea 84 fd fe 0d 00 25 |.....C..|.......%|
|00002510| fc f7 01 00 fd f9 05 20 | 01 fe 11 00 54 f4 02 00 |....... |....T...|
|00002520| f4 03 00 f7 09 00 10 fc | 2d fd fe 18 00 54 f4 02 |........|-....T..|
|00002530| 00 f7 0a 00 10 fc fb 08 | 00 43 61 6c 65 6e 64 61 |........|.Calenda|
|00002540| 72 fd fe 11 00 54 f4 02 | 00 f4 07 00 f7 09 00 10 |r....T..|........|
|00002550| fc 2d fd fe 11 00 54 f4 | 02 00 f4 08 00 f7 09 00 |.-....T.|........|
|00002560| 10 fc 2d fd fe 08 00 1b | f9 05 4e 01 fe 26 00 54 |..-.....|..N..&.T|
|00002570| f4 02 00 f7 0a 00 10 fc | fb 16 00 53 65 6c 65 63 |........|...Selec|
|00002580| 74 20 61 20 44 61 74 65 | 20 61 6e 64 20 54 69 6d |t a Date| and Tim|
|00002590| 65 fd fe 04 00 1e fe 03 | 00 55 0b 00 05 00 54 54 |e.......|.U....TT|
|000025a0| 49 4d 45 09 00 4c 52 45 | 41 44 4f 4e 4c 59 04 00 |IME..LRE|ADONLY..|
|000025b0| 54 48 49 53 08 00 43 41 | 4c 45 4e 44 41 52 05 00 |THIS..CA|LENDAR..|
|000025c0| 56 41 4c 55 45 09 00 41 | 53 45 4c 45 43 54 45 44 |VALUE..A|SELECTED|
|000025d0| 0c 00 53 45 54 55 50 44 | 49 53 50 4c 41 59 07 00 |..SETUPD|ISPLAY..|
|000025e0| 53 50 48 4f 55 52 53 09 | 00 53 50 4d 49 4e 55 54 |SPHOURS.|.SPMINUT|
|000025f0| 45 53 07 00 45 4e 41 42 | 4c 45 44 07 00 43 41 50 |ES..ENAB|LED..CAP|
|00002600| 54 49 4f 4e 04 00 49 6e | 69 74 2c 00 00 00 00 00 |TION..In|it,.....|
|00002610| 31 00 b1 00 82 01 d1 00 | 41 00 32 01 61 01 51 02 |1.......|A.2.a.Q.|
|00002620| 61 01 41 00 62 01 61 01 | d2 00 11 01 81 01 11 01 |a.A.b.a.|........|
|00002630| 11 01 81 00 61 02 41 00 | 31 00 00 00 00 00 00 00 |....a.A.|1.......|
|00002640| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 10 00 |........|........|
|00002650| 00 00 05 02 00 00 01 00 | 00 00 00 29 00 00 00 6c |........|...)...l|
|00002660| 02 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002670| 00 00 00 00 00 00 01 00 | 00 00 0b 63 61 6c 68 65 |........|...calhe|
|00002680| 6c 70 2e 76 63 78 00 00 | 00 01 00 00 00 d1 48 65 |lp.vcx..|......He|
|00002690| 69 67 68 74 20 3d 20 32 | 35 30 0d 0a 57 69 64 74 |ight = 2|50..Widt|
|000026a0| 68 20 3d 20 33 37 35 0d | 0a 44 6f 43 72 65 61 74 |h = 375.|.DoCreat|
|000026b0| 65 20 3d 20 2e 54 2e 0d | 0a 53 68 6f 77 54 69 70 |e = .T..|.ShowTip|
|000026c0| 73 20 3d 20 2e 54 2e 0d | 0a 41 75 74 6f 43 65 6e |s = .T..|.AutoCen|
|000026d0| 74 65 72 20 3d 20 2e 54 | 2e 0d 0a 42 61 63 6b 43 |ter = .T|...BackC|
|000026e0| 6f 6c 6f 72 20 3d 20 31 | 39 32 2c 31 39 32 2c 31 |olor = 1|92,192,1|
|000026f0| 39 32 0d 0a 42 6f 72 64 | 65 72 53 74 79 6c 65 20 |92..Bord|erStyle |
|00002700| 3d 20 32 0d 0a 43 61 70 | 74 69 6f 6e 20 3d 20 22 |= 2..Cap|tion = "|
|00002710| 46 6f 72 6d 22 0d 0a 4d | 61 78 42 75 74 74 6f 6e |Form"..M|axButton|
|00002720| 20 3d 20 2e 46 2e 0d 0a | 4d 69 6e 42 75 74 74 6f | = .F...|MinButto|
|00002730| 6e 20 3d 20 2e 46 2e 0d | 0a 57 69 6e 64 6f 77 54 |n = .F..|.WindowT|
|00002740| 79 70 65 20 3d 20 31 0d | 0a 4e 61 6d 65 20 3d 20 |ype = 1.|.Name = |
|00002750| 22 63 61 6c 62 61 73 65 | 66 6f 72 6d 22 0d 0a 00 |"calbase|form"...|
|00002760| 00 00 01 00 00 01 ec fe | f2 ff 1b 02 01 00 00 00 |........|........|
|00002770| d3 01 00 00 d3 01 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002780| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 1f 4c |........|.......L|
|00002790| 02 00 00 00 25 00 00 00 | 3c 01 00 00 00 00 00 00 |....%...|<.......|
|000027a0| 7a 01 00 00 0d 00 00 00 | 60 01 00 00 00 00 00 00 |z.......|`.......|
|000027b0| 00 00 00 00 fc 03 00 03 | 00 55 00 00 9e 00 0b 00 |........|.U......|
|000027c0| ae f7 00 00 07 f7 01 00 | fe 0d 00 54 f7 00 00 10 |........|...T....|
|000027d0| fc fb 00 00 fd fe 17 00 | 84 f7 01 00 10 fc f8 01 |........|........|
|000027e0| 00 fd 28 fc f8 02 0b fd | f9 05 62 00 fe 1c 00 25 |..(.....|..b....%|
|000027f0| fc 43 43 43 43 24 f7 01 | 00 c3 21 3e 43 f7 00 00 |.CCCC$..|..!>C...|
|00002800| 3e 11 03 fd f9 05 5e 00 | fe 13 00 54 f7 00 00 10 |>.....^.|...T....|
|00002810| fc 43 43 43 24 f7 01 00 | c3 21 fd fe 04 00 1e fe |.CCC$...|.!......|
|00002820| 04 00 85 fe 1d 00 54 f7 | 00 00 10 fc f7 00 00 fb |......T.|........|
|00002830| 02 00 2c 20 06 43 43 43 | 24 69 f8 01 04 5a 06 fd |.., .CCC|$i...Z..|
|00002840| fe 18 00 99 fc 43 f8 01 | 03 f8 01 00 00 f7 00 00 |.....C..|........|
|00002850| df e3 02 00 f6 03 00 fd | fe 03 00 55 04 00 0a 00 |........|...U....|
|00002860| 43 4d 41 58 4c 45 4e 47 | 54 48 01 00 4e 09 00 43 |CMAXLENG|TH..N..C|
|00002870| 41 4c 42 55 54 54 4f 4e | 0f 00 41 55 54 4f 53 45 |ALBUTTON|..AUTOSE|
|00002880| 54 46 4f 4e 54 53 49 5a | 45 1c 00 19 00 99 fc 43 |TFONTSIZ|E......C|
|00002890| f4 00 00 f4 01 00 f7 03 | 00 f4 00 00 f4 01 00 f6 |........|........|
|000028a0| 02 00 fd fe 03 00 55 04 | 00 04 00 54 48 49 53 06 |......U.|...THIS.|
|000028b0| 00 50 41 52 45 4e 54 0c | 00 53 45 54 55 50 44 49 |.PARENT.|.SETUPDI|
|000028c0| 53 50 4c 41 59 05 00 56 | 41 4c 55 45 0f 00 61 75 |SPLAY..V|ALUE..au|
|000028d0| 74 6f 73 65 74 66 6f 6e | 74 73 69 7a 65 2c 00 00 |tosetfon|tsize,..|
|000028e0| 00 00 00 05 00 43 6c 69 | 63 6b f9 00 00 00 00 00 |.....Cli|ck......|
|000028f0| 31 00 b1 00 d1 00 71 01 | c1 01 31 01 41 00 41 00 |1.....q.|..1.A.A.|
|00002900| d1 01 81 01 32 00 91 01 | 31 00 00 00 00 00 00 00 |....2...|1.......|
|00002910| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 1b 00 |........|........|
|00002920| 00 00 18 01 00 00 01 00 | 00 00 0b 00 00 00 34 01 |........|......4.|
|00002930| 00 00 5f 01 00 00 0c 00 | 00 00 00 29 00 00 00 d3 |.._.....|...)....|
|00002940| 01 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002950| 00 00 00 00 00 00 01 00 | 00 00 68 64 61 74 65 20 |........|..hdate |
|00002960| 43 75 72 72 65 6e 74 20 | 64 61 74 65 20 61 73 73 |Current |date ass|
|00002970| 6f 63 69 61 74 65 64 20 | 77 69 74 68 20 74 68 69 |ociated |with thi|
|00002980| 73 20 63 6f 6d 6d 61 6e | 64 20 62 75 74 74 6f 6e |s comman|d button|
|00002990| 2e 0d 0a 73 65 6c 65 63 | 74 65 64 20 2e 54 2e 20 |...selec|ted .T. |
|000029a0| 69 66 20 63 6f 6e 74 72 | 6f 6c 20 69 73 20 63 75 |if contr|ol is cu|
|000029b0| 72 72 65 6e 74 6c 79 20 | 73 65 6c 65 63 74 65 64 |rrently |selected|
|000029c0| 2e 0d 0a 00 00 00 01 00 | 00 00 3d 48 65 69 67 68 |........|..=Heigh|
|000029d0| 74 20 3d 20 32 36 0d 0a | 57 69 64 74 68 20 3d 20 |t = 26..|Width = |
|000029e0| 34 30 0d 0a 64 61 74 65 | 20 3d 20 7b 20 20 2f 20 |40..date| = { / |
|000029f0| 20 2f 20 20 7d 0d 0a 4e | 61 6d 65 20 3d 20 22 63 | / }..N|ame = "c|
|00002a00| 61 6c 64 61 79 22 0d 0a | 00 00 00 01 00 00 00 22 |alday"..|......."|
|00002a10| 41 72 69 61 6c 2c 20 31 | 2c 20 31 30 2c 20 36 2c |Arial, 1|, 10, 6,|
|00002a20| 20 31 36 2c 20 31 33 2c | 20 31 36 2c 20 33 2c 20 | 16, 13,| 16, 3, |
|00002a30| 30 0a 00 00 00 01 00 00 | 05 c2 fe f2 ff 1b 02 01 |0.......|........|
|00002a40| 00 00 00 a9 05 00 00 a9 | 05 00 00 00 00 00 00 00 |........|........|
|00002a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a60| 00 ab f8 03 00 00 00 25 | 00 00 00 b5 04 00 00 00 |.......%|........|
|00002a70| 00 00 00 40 05 00 00 2b | 00 00 00 ea 04 00 00 00 |...@...+|........|
|00002a80| 00 00 00 00 00 00 00 fc | 03 00 03 00 55 00 00 a8 |........|....U...|
|00002a90| 02 0f 00 af f7 00 00 07 | f7 01 00 07 f7 02 00 fe |........|........|
|00002aa0| 0f 00 ae f7 03 00 07 f7 | 04 00 07 f7 05 00 fe 0f |........|........|
|00002ab0| 00 25 fc 43 f7 00 00 a1 | fd f9 05 3a 00 fe 0d 00 |.%.C....|...:....|
|00002ac0| 54 f7 00 00 10 fc f8 01 | 01 fd fe 04 00 1e fe 0f |T.......|........|
|00002ad0| 00 25 fc 43 f7 02 00 a1 | fd f9 05 5d 00 fe 10 00 |.%.C....|...]....|
|00002ae0| 54 f7 02 00 10 fc f4 06 | 00 f7 07 00 fd fe 04 00 |T.......|........|
|00002af0| 1e fe 0f 00 25 fc 43 f7 | 01 00 a1 fd f9 05 a5 00 |....%.C.|........|
|00002b00| fe 13 00 54 f7 01 00 10 | fc 43 f7 02 00 3e f7 00 |...T....|.C...>..|
|00002b10| 00 08 fd fe 11 00 25 fc | f7 01 00 f8 01 00 0d fd |......%.|........|
|00002b20| f9 05 a1 00 fe 0d 00 54 | f7 01 00 10 fc f8 01 00 |.......T|........|
|00002b30| fd fe 04 00 1e fe 04 00 | 1e fe 10 00 54 f7 04 00 |........|....T...|
|00002b40| 10 fc f4 06 00 f7 08 00 | fd fe 4b 00 54 f7 05 00 |........|..K.T...|
|00002b50| 10 fc 43 f4 06 00 f7 09 | 00 f2 07 00 fb 01 00 42 |..C.....|.......B|
|00002b60| f3 03 00 fb 00 00 36 43 | f4 06 00 f7 0a 00 f2 07 |......6C|........|
|00002b70| 00 fb 01 00 49 f3 03 00 | fb 00 00 36 06 43 f4 06 |....I...|...6.C..|
|00002b80| 00 f7 0b 00 f2 07 00 fb | 01 00 4f f3 03 00 fb 00 |........|..O.....|
|00002b90| 00 36 06 fd fe 68 00 54 | f7 03 00 10 fc 43 f8 01 |.6...h.T|.....C..|
|00002ba0| 01 f4 06 00 f7 0c 00 f7 | 04 00 f7 05 00 ea 24 f4 |........|......$.|
|00002bb0| 06 00 f7 0d 00 f8 01 04 | 08 03 11 03 f1 3c 00 f7 |........|.....<..|
|00002bc0| 00 00 43 f8 01 07 f4 06 | 00 f7 0c 00 f7 04 00 f7 |..C.....|........|
|00002bd0| 05 00 ea 24 04 f7 01 00 | 43 f8 01 06 f4 06 00 f7 |...$....|C.......|
|00002be0| 0c 00 f7 04 00 f7 05 00 | ea 24 04 06 03 f4 06 00 |........|.$......|
|00002bf0| f7 0e 00 f8 01 06 08 03 | 11 03 0b fd fe 0c 00 18 |........|........|
|00002c00| 2b fc 61 fd f9 05 91 02 | fe 0d 00 25 fc f7 03 00 |+.a.....|...%....|
|00002c10| fd f9 05 f5 01 fe 68 00 | 25 fc 43 f8 01 01 f4 06 |......h.|%.C.....|
|00002c20| 00 f7 0c 00 f7 04 00 f7 | 05 00 ea 24 f4 06 00 f7 |........|...$....|
|00002c30| 0d 00 f8 01 04 08 03 0e | 03 f0 3c 00 f7 00 00 43 |........|..<....C|
|00002c40| f8 01 07 f4 06 00 f7 0c | 00 f7 04 00 f7 05 00 ea |........|........|
|00002c50| 24 04 f7 01 00 43 f8 01 | 06 f4 06 00 f7 0c 00 f7 |$....C..|........|
|00002c60| 04 00 f7 05 00 ea 24 04 | 06 03 f4 06 00 f7 0e 00 |......$.|........|
|00002c70| f8 01 06 08 03 0e 03 09 | fd f9 05 f1 01 fe 04 00 |........|........|
|00002c80| 21 fe 04 00 1e fe 08 00 | 1b f9 05 6d 02 fe 68 00 |!.......|...m..h.|
|00002c90| 25 fc 43 f8 01 01 f4 06 | 00 f7 0c 00 f7 04 00 f7 |%.C.....|........|
|00002ca0| 05 00 ea 24 f4 06 00 f7 | 0d 00 f8 01 08 08 03 12 |...$....|........|
|00002cb0| 03 f1 3c 00 f7 00 00 43 | f8 01 07 f4 06 00 f7 0c |..<....C|........|
|00002cc0| 00 f7 04 00 f7 05 00 ea | 24 04 f7 01 00 43 f8 01 |........|$....C..|
|00002cd0| 06 f4 06 00 f7 0c 00 f7 | 04 00 f7 05 00 ea 24 04 |........|......$.|
|00002ce0| 06 03 f4 06 00 f7 0e 00 | f8 02 0a 08 03 12 03 0b |........|........|
|00002cf0| fd f9 05 69 02 fe 04 00 | 21 fe 04 00 1e fe 04 00 |...i....|!.......|
|00002d00| 1e fe 20 00 54 f7 04 00 | 10 fc f7 04 00 43 f7 03 |.. .T...|.....C..|
|00002d10| 00 f2 07 00 f9 02 ff ff | f3 03 00 f8 01 01 36 06 |........|......6.|
|00002d20| fd fe 04 00 1d fe 10 00 | 54 f4 06 00 f7 08 00 10 |........|T.......|
|00002d30| fc f7 04 00 fd fe 03 00 | 55 0f 00 07 00 4e 57 49 |........|U....NWI|
|00002d40| 44 45 53 54 04 00 4e 41 | 56 47 08 00 43 43 41 50 |DEST..NA|VG..CCAP|
|00002d50| 54 49 4f 4e 07 00 4c 42 | 49 47 47 45 52 09 00 4e |TION..LB|IGGER..N|
|00002d60| 46 4f 4e 54 53 49 5a 45 | 06 00 43 53 54 59 4c 45 |FONTSIZE|..CSTYLE|
|00002d70| 04 00 54 48 49 53 07 00 | 43 41 50 54 49 4f 4e 08 |..THIS..|CAPTION.|
|00002d80| 00 46 4f 4e 54 53 49 5a | 45 08 00 46 4f 4e 54 42 |.FONTSIZ|E..FONTB|
|00002d90| 4f 4c 44 0a 00 46 4f 4e | 54 49 54 41 4c 49 43 0b |OLD..FON|TITALIC.|
|00002da0| 00 46 4f 4e 54 4f 55 54 | 4c 49 4e 45 08 00 46 4f |.FONTOUT|LINE..FO|
|00002db0| 4e 54 4e 41 4d 45 06 00 | 48 45 49 47 48 54 05 00 |NTNAME..|HEIGHT..|
|00002dc0| 57 49 44 54 48 a9 00 13 | 00 af f7 00 00 07 f7 01 |WIDTH...|........|
|00002dd0| 00 07 f7 02 00 07 f7 03 | 00 fe 1b 00 54 f4 04 00 |........|....T...|
|00002de0| f7 05 00 10 fc f4 04 00 | f4 06 00 f7 05 00 f7 02 |........|........|
|00002df0| 00 0c 03 fd fe 1b 00 54 | f4 04 00 f7 07 00 10 fc |.......T|........|
|00002e00| f4 04 00 f4 06 00 f7 07 | 00 f7 03 00 0c 03 fd fe |........|........|
|00002e10| 24 00 54 f4 04 00 f7 08 | 00 10 fc f7 00 00 f8 01 |$.T.....|........|
|00002e20| 01 08 03 f4 04 00 f4 06 | 00 f7 05 00 f7 02 00 0c |........|........|
|00002e30| 03 04 fd fe 24 00 54 f4 | 04 00 f7 09 00 10 fc f7 |....$.T.|........|
|00002e40| 01 00 f8 01 01 08 03 f4 | 04 00 f4 06 00 f7 07 00 |........|........|
|00002e50| f7 03 00 0c 03 04 fd fe | 0e 00 54 f4 04 00 f7 0a |........|..T.....|
|00002e60| 00 10 fc 61 fd fe 07 00 | 42 fc 61 fd fe 03 00 55 |...a....|B.a....U|
|00002e70| 0b 00 04 00 4e 52 4f 57 | 07 00 4e 43 4f 4c 55 4d |....NROW|..NCOLUM|
|00002e80| 4e 0a 00 4e 54 4f 54 41 | 4c 52 4f 57 53 0a 00 4e |N..NTOTA|LROWS..N|
|00002e90| 54 4f 54 41 4c 43 4f 4c | 53 04 00 54 48 49 53 06 |TOTALCOL|S..THIS.|
|00002ea0| 00 48 45 49 47 48 54 06 | 00 50 41 52 45 4e 54 05 |.HEIGHT.|.PARENT.|
|00002eb0| 00 57 49 44 54 48 03 00 | 54 4f 50 04 00 4c 45 46 |.WIDTH..|TOP..LEF|
|00002ec0| 54 07 00 56 49 53 49 42 | 4c 45 27 00 12 00 54 f4 |T..VISIB|LE'...T.|
|00002ed0| 00 00 f4 01 00 f7 02 00 | 10 fc 43 24 fd fe 12 00 |........|..C$....|
|00002ee0| 99 fc 43 43 24 f4 00 00 | f4 01 00 f6 03 00 fd fe |..CC$...|........|
|00002ef0| 03 00 55 04 00 04 00 54 | 48 49 53 06 00 50 41 52 |..U....T|HIS..PAR|
|00002f00| 45 4e 54 05 00 56 41 4c | 55 45 0c 00 53 45 54 55 |ENT..VAL|UE..SETU|
|00002f10| 50 44 49 53 50 4c 41 59 | 0f 00 61 75 74 6f 73 65 |PDISPLAY|..autose|
|00002f20| 74 66 6f 6e 74 73 69 7a | 65 2c 00 00 00 00 00 04 |tfontsiz|e,......|
|00002f30| 00 49 6e 69 74 62 03 00 | 00 00 00 0a 00 52 69 67 |.Initb..|.....Rig|
|00002f40| 68 74 43 6c 69 63 6b 67 | 04 00 00 00 00 31 00 f1 |htClickg|.....1..|
|00002f50| 00 f2 00 f2 00 d1 00 41 | 00 f2 00 01 01 41 00 f2 |.......A|.....A..|
|00002f60| 00 31 01 11 01 d1 00 41 | 00 41 00 02 01 b1 04 8d |.1.....A|.A......|
|00002f70| 06 c7 00 d1 00 81 06 41 | 00 41 00 81 00 81 06 41 |.......A|.A.....A|
|00002f80| 00 41 00 41 00 01 02 41 | 00 01 01 32 00 31 01 b2 |.A.A...A|...2.1..|
|00002f90| 01 b1 01 42 02 41 02 e2 | 00 72 00 32 00 21 01 21 |...B.A..|.r.2.!.!|
|00002fa0| 01 31 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.1......|........|
|00002fb0| 00 00 00 01 00 00 00 1b | 00 00 00 28 05 00 00 01 |........|...(....|
|00002fc0| 00 00 00 20 00 00 00 43 | 05 00 00 5b 06 00 00 38 |... ...C|...[...8|
|00002fd0| 00 00 00 28 00 00 00 7c | 06 00 00 b6 06 00 00 45 |...(...||.......E|
|00002fe0| 00 00 00 00 29 00 00 00 | a9 05 00 00 00 00 00 00 |....)...|........|
|00002ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00003000| 00 00 06 c1 50 52 4f 43 | 45 44 55 52 45 20 61 75 |....PROC|EDURE au|
|00003010| 74 6f 73 65 74 66 6f 6e | 74 73 69 7a 65 0d 0a 4c |tosetfon|tsize..L|
|00003020| 50 41 52 41 4d 45 54 45 | 52 53 20 6e 57 69 64 65 |PARAMETE|RS nWide|
|00003030| 73 74 2c 20 6e 41 76 67 | 2c 20 63 43 61 70 74 69 |st, nAvg|, cCapti|
|00003040| 6f 6e 0d 0a 0d 0a 6c 6f | 63 61 6c 20 6c 42 69 67 |on....lo|cal lBig|
|00003050| 67 65 72 2c 20 6e 46 6f | 6e 74 53 69 7a 65 2c 20 |ger, nFo|ntSize, |
|00003060| 63 53 74 79 6c 65 0d 0a | 0d 0a 69 66 20 65 6d 70 |cStyle..|..if emp|
|00003070| 74 79 28 6e 57 69 64 65 | 73 74 29 0d 0a 09 6e 57 |ty(nWide|st)...nW|
|00003080| 69 64 65 73 74 3d 31 0d | 0a 65 6e 64 69 66 0d 0a |idest=1.|.endif..|
|00003090| 0d 0a 69 66 20 65 6d 70 | 74 79 28 63 43 61 70 74 |..if emp|ty(cCapt|
|000030a0| 69 6f 6e 29 0d 0a 09 63 | 43 61 70 74 69 6f 6e 3d |ion)...c|Caption=|
|000030b0| 74 68 69 73 2e 63 61 70 | 74 69 6f 6e 0d 0a 65 6e |this.cap|tion..en|
|000030c0| 64 69 66 0d 0a 0d 0a 69 | 66 20 65 6d 70 74 79 28 |dif....i|f empty(|
|000030d0| 6e 41 76 67 29 0d 0a 09 | 6e 41 76 67 3d 6c 65 6e |nAvg)...|nAvg=len|
|000030e0| 28 63 43 61 70 74 69 6f | 6e 29 2d 6e 57 69 64 65 |(cCaptio|n)-nWide|
|000030f0| 73 74 0d 0a 09 69 66 20 | 6e 41 76 67 20 3c 20 30 |st...if |nAvg < 0|
|00003100| 0d 0a 09 09 6e 41 76 67 | 3d 30 0d 0a 09 65 6e 64 |....nAvg|=0...end|
|00003110| 69 66 0d 0a 65 6e 64 69 | 66 0d 0a 0d 0a 6e 46 6f |if..endi|f....nFo|
|00003120| 6e 74 53 69 7a 65 3d 74 | 68 69 73 2e 46 6f 6e 74 |ntSize=t|his.Font|
|00003130| 53 69 7a 65 0d 0a 63 53 | 74 79 6c 65 3d 69 69 66 |Size..cS|tyle=iif|
|00003140| 28 74 68 69 73 2e 46 6f | 6e 74 42 6f 6c 64 2c 27 |(this.Fo|ntBold,'|
|00003150| 42 27 2c 27 27 29 2b 69 | 69 66 28 74 68 69 73 2e |B','')+i|if(this.|
|00003160| 46 6f 6e 74 49 74 61 6c | 69 63 2c 27 49 27 2c 27 |FontItal|ic,'I','|
|00003170| 27 29 2b 69 69 66 28 74 | 68 69 73 2e 46 6f 6e 74 |')+iif(t|his.Font|
|00003180| 4f 75 74 4c 69 6e 65 2c | 27 4f 27 2c 27 27 29 0d |OutLine,|'O','').|
|00003190| 0a 23 64 65 66 69 6e 65 | 20 48 45 49 47 48 54 5f |.#define| HEIGHT_|
|000031a0| 4c 4f 57 20 28 74 68 69 | 73 2e 68 65 69 67 68 74 |LOW (thi|s.height|
|000031b0| 2d 38 29 0d 0a 23 64 65 | 66 69 6e 65 20 48 45 49 |-8)..#de|fine HEI|
|000031c0| 47 48 54 5f 48 49 47 48 | 20 28 74 68 69 73 2e 68 |GHT_HIGH| (this.h|
|000031d0| 65 69 67 68 74 2d 34 29 | 0d 0a 0d 0a 23 64 65 66 |eight-4)|....#def|
|000031e0| 69 6e 65 20 57 49 44 54 | 48 5f 4c 4f 57 20 28 74 |ine WIDT|H_LOW (t|
|000031f0| 68 69 73 2e 77 69 64 74 | 68 2d 31 30 29 0d 0a 23 |his.widt|h-10)..#|
|00003200| 64 65 66 69 6e 65 20 57 | 49 44 54 48 5f 48 49 47 |define W|IDTH_HIG|
|00003210| 48 20 28 74 68 69 73 2e | 57 69 64 74 68 2d 36 29 |H (this.|Width-6)|
|00003220| 0d 0a 0d 0a 23 64 65 66 | 69 6e 65 20 4d 41 58 5f |....#def|ine MAX_|
|00003230| 46 4f 4e 54 5f 43 48 41 | 52 20 46 6f 6e 74 4d 65 |FONT_CHA|R FontMe|
|00003240| 74 72 69 63 28 37 2c 74 | 68 69 73 2e 66 6f 6e 74 |tric(7,t|his.font|
|00003250| 4e 61 6d 65 2c 6e 46 6f | 6e 74 53 69 7a 65 2c 63 |Name,nFo|ntSize,c|
|00003260| 53 74 79 6c 65 29 0d 0a | 23 64 65 66 69 6e 65 20 |Style)..|#define |
|00003270| 41 56 47 5f 46 4f 4e 54 | 5f 43 48 41 52 20 46 6f |AVG_FONT|_CHAR Fo|
|00003280| 6e 74 4d 65 74 72 69 63 | 28 36 2c 74 68 69 73 2e |ntMetric|(6,this.|
|00003290| 66 6f 6e 74 4e 61 6d 65 | 2c 6e 46 6f 6e 74 53 69 |fontName|,nFontSi|
|000032a0| 7a 65 2c 63 53 74 79 6c | 65 29 0d 0a 23 64 65 66 |ze,cStyl|e)..#def|
|000032b0| 69 6e 65 20 54 58 54 5f | 57 49 44 54 48 20 28 6e |ine TXT_|WIDTH (n|
|000032c0| 57 69 64 65 73 74 2a 4d | 41 58 5f 46 4f 4e 54 5f |Widest*M|AX_FONT_|
|000032d0| 43 48 41 52 2b 6e 41 76 | 67 2a 41 56 47 5f 46 4f |CHAR+nAv|g*AVG_FO|
|000032e0| 4e 54 5f 43 48 41 52 29 | 0d 0a 0d 0a 23 64 65 66 |NT_CHAR)|....#def|
|000032f0| 69 6e 65 20 54 58 54 5f | 48 45 49 47 48 54 20 46 |ine TXT_|HEIGHT F|
|00003300| 6f 6e 74 4d 65 74 72 69 | 63 28 31 2c 74 68 69 73 |ontMetri|c(1,this|
|00003310| 2e 66 6f 6e 74 4e 61 6d | 65 2c 6e 46 6f 6e 74 53 |.fontNam|e,nFontS|
|00003320| 69 7a 65 2c 63 53 74 79 | 6c 65 29 0d 0a 0d 0a 6c |ize,cSty|le)....l|
|00003330| 42 69 67 67 65 72 3d 28 | 54 58 54 5f 48 45 49 47 |Bigger=(|TXT_HEIG|
|00003340| 48 54 20 3e 20 48 45 49 | 47 48 54 5f 48 49 47 48 |HT > HEI|GHT_HIGH|
|00003350| 29 20 2e 6f 72 2e 20 28 | 54 58 54 5f 57 49 44 54 |) .or. (|TXT_WIDT|
|00003360| 48 20 3e 20 57 49 44 54 | 48 5f 48 49 47 48 29 0d |H > WIDT|H_HIGH).|
|00003370| 0a 2a 0d 0a 2a 20 69 66 | 20 74 68 65 20 68 65 69 |.*..* if| the hei|
|00003380| 67 68 74 20 6f 66 20 74 | 68 65 20 74 65 78 74 20 |ght of t|he text |
|00003390| 69 73 20 73 6d 61 6c 6c | 65 72 20 74 68 61 6e 20 |is small|er than |
|000033a0| 74 68 65 20 63 6f 6e 74 | 72 6f 6c 0d 0a 2a 20 6f |the cont|rol..* o|
|000033b0| 72 20 74 68 65 20 77 69 | 64 74 68 20 6f 66 20 74 |r the wi|dth of t|
|000033c0| 68 65 20 74 65 78 74 20 | 69 73 20 73 6d 61 6c 6c |he text |is small|
|000033d0| 65 72 2c 20 69 6e 63 72 | 65 6d 65 6e 74 20 75 6e |er, incr|ement un|
|000033e0| 74 69 6c 20 6f 6e 65 0d | 0a 2a 20 6f 66 20 74 68 |til one.|.* of th|
|000033f0| 65 20 76 61 6c 75 65 73 | 20 67 6f 65 73 20 6f 75 |e values| goes ou|
|00003400| 74 73 69 64 65 20 74 68 | 65 20 6c 69 6d 69 74 2e |tside th|e limit.|
|00003410| 0d 0a 2a 0d 0a 0d 0a 64 | 6f 20 77 68 69 6c 65 20 |..*....d|o while |
|00003420| 2e 74 2e 0d 0a 09 69 66 | 20 6c 42 69 67 67 65 72 |.t....if| lBigger|
|00003430| 0d 0a 09 09 69 66 20 28 | 54 58 54 5f 48 45 49 47 |....if (|TXT_HEIG|
|00003440| 48 54 20 3c 3d 20 48 45 | 49 47 48 54 5f 48 49 47 |HT <= HE|IGHT_HIG|
|00003450| 48 29 20 2e 61 6e 64 2e | 20 28 54 58 54 5f 57 49 |H) .and.| (TXT_WI|
|00003460| 44 54 48 20 3c 3d 20 57 | 49 44 54 48 5f 48 49 47 |DTH <= W|IDTH_HIG|
|00003470| 48 29 0d 0a 09 09 09 65 | 78 69 74 0d 0a 09 09 65 |H).....e|xit....e|
|00003480| 6e 64 69 66 0d 0a 09 65 | 6c 73 65 0d 0a 09 09 69 |ndif...e|lse....i|
|00003490| 66 20 28 54 58 54 5f 48 | 45 49 47 48 54 20 3e 3d |f (TXT_H|EIGHT >=|
|000034a0| 20 48 45 49 47 48 54 5f | 4c 4f 57 29 20 2e 6f 72 | HEIGHT_|LOW) .or|
|000034b0| 2e 20 28 54 58 54 5f 57 | 49 44 54 48 20 3e 3d 20 |. (TXT_W|IDTH >= |
|000034c0| 57 49 44 54 48 5f 4c 4f | 57 29 0d 0a 09 09 09 65 |WIDTH_LO|W).....e|
|000034d0| 78 69 74 0d 0a 09 09 65 | 6e 64 69 66 0d 0a 09 65 |xit....e|ndif...e|
|000034e0| 6e 64 69 66 0d 0a 09 6e | 46 6f 6e 74 53 69 7a 65 |ndif...n|FontSize|
|000034f0| 3d 6e 46 6f 6e 74 53 69 | 7a 65 2b 69 69 66 28 6c |=nFontSi|ze+iif(l|
|00003500| 42 69 67 67 65 72 2c 2d | 31 2c 31 29 0d 0a 65 6e |Bigger,-|1,1)..en|
|00003510| 64 64 6f 0d 0a 74 68 69 | 73 2e 46 6f 6e 74 53 69 |ddo..thi|s.FontSi|
|00003520| 7a 65 3d 6e 46 6f 6e 74 | 53 69 7a 65 0d 0a 45 4e |ze=nFont|Size..EN|
|00003530| 44 50 52 4f 43 0d 0a 50 | 52 4f 43 45 44 55 52 45 |DPROC..P|ROCEDURE|
|00003540| 20 49 6e 69 74 0d 0a 4c | 50 41 52 41 4d 45 54 45 | Init..L|PARAMETE|
|00003550| 52 53 20 6e 52 6f 77 2c | 20 6e 43 6f 6c 75 6d 6e |RS nRow,| nColumn|
|00003560| 2c 20 6e 54 6f 74 61 6c | 52 6f 77 73 2c 20 6e 54 |, nTotal|Rows, nT|
|00003570| 6f 74 61 6c 43 6f 6c 73 | 0d 0a 0d 0a 74 68 69 73 |otalCols|....this|
|00003580| 2e 68 65 69 67 68 74 3d | 28 74 68 69 73 2e 70 61 |.height=|(this.pa|
|00003590| 72 65 6e 74 2e 68 65 69 | 67 68 74 2f 6e 54 6f 74 |rent.hei|ght/nTot|
|000035a0| 61 6c 52 6f 77 73 29 0d | 0a 74 68 69 73 2e 57 69 |alRows).|.this.Wi|
|000035b0| 64 74 68 3d 28 74 68 69 | 73 2e 70 61 72 65 6e 74 |dth=(thi|s.parent|
|000035c0| 2e 57 69 64 74 68 2f 6e | 54 6f 74 61 6c 43 6f 6c |.Width/n|TotalCol|
|000035d0| 73 29 0d 0a 0d 0a 74 68 | 69 73 2e 54 6f 70 3d 28 |s)....th|is.Top=(|
|000035e0| 6e 52 6f 77 2d 31 29 2a | 28 74 68 69 73 2e 50 61 |nRow-1)*|(this.Pa|
|000035f0| 72 65 6e 74 2e 48 65 69 | 67 68 74 2f 6e 54 6f 74 |rent.Hei|ght/nTot|
|00003600| 61 6c 52 6f 77 73 29 0d | 0a 74 68 69 73 2e 6c 65 |alRows).|.this.le|
|00003610| 66 74 3d 28 6e 43 6f 6c | 75 6d 6e 2d 31 29 2a 28 |ft=(nCol|umn-1)*(|
|00003620| 74 68 69 73 2e 50 61 72 | 65 6e 74 2e 57 69 64 74 |this.Par|ent.Widt|
|00003630| 68 2f 6e 54 6f 74 61 6c | 43 6f 6c 73 29 0d 0a 0d |h/nTotal|Cols)...|
|00003640| 0a 74 68 69 73 2e 56 69 | 73 69 62 6c 65 3d 2e 74 |.this.Vi|sible=.t|
|00003650| 2e 0d 0a 0d 0a 72 65 74 | 75 72 6e 20 2e 74 2e 0d |.....ret|urn .t..|
|00003660| 0a 45 4e 44 50 52 4f 43 | 0d 0a 50 52 4f 43 45 44 |.ENDPROC|..PROCED|
|00003670| 55 52 45 20 52 69 67 68 | 74 43 6c 69 63 6b 0d 0a |URE Righ|tClick..|
|00003680| 74 68 69 73 2e 70 61 72 | 65 6e 74 2e 76 61 6c 75 |this.par|ent.valu|
|00003690| 65 3d 64 61 74 65 28 29 | 0d 0a 74 68 69 73 2e 70 |e=date()|..this.p|
|000036a0| 61 72 65 6e 74 2e 53 65 | 74 75 70 44 69 73 70 6c |arent.Se|tupDispl|
|000036b0| 61 79 28 64 61 74 65 28 | 29 29 0d 0a 45 4e 44 50 |ay(date(|))..ENDP|
|000036c0| 52 4f 43 0d 0a 00 00 00 | 01 00 00 02 09 fe f2 ff |ROC.....|........|
|000036d0| 1b 02 01 00 00 00 f0 01 | 00 00 f0 01 00 00 00 00 |........|........|
|000036e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000036f0| 00 00 00 00 04 2a 01 00 | 00 00 25 00 00 00 79 01 |.....*..|..%...y.|
|00003700| 00 00 00 00 00 00 a7 01 | 00 00 11 00 00 00 85 01 |........|........|
|00003710| 00 00 00 00 00 00 00 00 | 00 00 fc 03 00 03 00 55 |........|.......U|
|00003720| 00 00 f1 00 0b 00 af f7 | 00 00 07 f7 01 00 fe 0f |........|........|
|00003730| 00 25 fc 43 f7 00 00 a1 | fd f9 05 26 00 fe 0c 00 |.%.C....|...&....|
|00003740| 54 f7 00 00 10 fc 43 24 | fd fe 04 00 1e fe 0d 00 |T.....C$|........|
|00003750| 25 fc f7 01 00 fd f9 05 | 6b 00 fe 23 00 54 f4 02 |%.......|k..#.T..|
|00003760| 00 f7 03 00 10 fc fb 0d | 00 43 61 6c 65 6e 64 61 |........|.Calenda|
|00003770| 72 20 66 6f 72 20 43 f7 | 00 00 2a 06 fd fe 11 00 |r for C.|..*.....|
|00003780| 54 f4 02 00 f4 04 00 f7 | 05 00 10 fc 2d fd fe 08 |T.......|....-...|
|00003790| 00 1b f9 05 90 00 fe 1d | 00 54 f4 02 00 f7 03 00 |........|.T......|
|000037a0| 10 fc fb 0d 00 53 65 6c | 65 63 74 20 61 20 44 61 |.....Sel|ect a Da|
|000037b0| 74 65 fd fe 04 00 1e fe | 10 00 25 fc f7 00 00 43 |te......|..%....C|
|000037c0| 24 0f fd f9 05 ea 00 fe | 13 00 54 f4 02 00 f4 04 |$.......|..T.....|
|000037d0| 00 f7 06 00 10 fc f7 00 | 00 fd fe 1f 00 54 f4 02 |........|.....T..|
|000037e0| 00 f4 04 00 f6 07 00 fc | f8 01 01 fd 07 fc f8 01 |........|........|
|000037f0| 01 fd 16 10 fc f7 00 00 | fd fe 14 00 99 fc 43 00 |........|......C.|
|00003800| f7 00 00 f4 02 00 f4 04 | 00 f6 08 00 fd fe 04 00 |........|........|
|00003810| 1e fe 03 00 55 09 00 09 | 00 44 53 48 4f 57 44 41 |....U...|.DSHOWDA|
|00003820| 54 45 09 00 4c 52 45 41 | 44 4f 4e 4c 59 04 00 54 |TE..LREA|DONLY..T|
|00003830| 48 49 53 07 00 43 41 50 | 54 49 4f 4e 08 00 43 41 |HIS..CAP|TION..CA|
|00003840| 4c 45 4e 44 41 52 07 00 | 45 4e 41 42 4c 45 44 05 |LENDAR..|ENABLED.|
|00003850| 00 56 41 4c 55 45 09 00 | 41 53 45 4c 45 43 54 45 |.VALUE..|ASELECTE|
|00003860| 44 0c 00 53 45 54 55 50 | 44 49 53 50 4c 41 59 04 |D..SETUP|DISPLAY.|
|00003870| 00 49 6e 69 74 2c 00 00 | 00 00 00 31 00 b1 00 f2 |.Init,..|...1....|
|00003880| 00 c1 00 41 00 d2 00 31 | 02 11 01 81 00 d1 01 41 |...A...1|.......A|
|00003890| 00 02 01 31 01 f1 01 41 | 01 41 00 33 00 00 00 00 |...1...A|.A.3....|
|000038a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 01 00 00 |........|........|
|000038b0| 00 10 00 00 00 7d 01 00 | 00 01 00 00 00 00 29 00 |.....}..|......).|
|000038c0| 00 00 f0 01 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000038d0| 00 00 00 00 00 00 00 00 | 00 01 00 00 01 88 50 52 |........|......PR|
|000038e0| 4f 43 45 44 55 52 45 20 | 49 6e 69 74 0d 0a 4c 50 |OCEDURE |Init..LP|
|000038f0| 41 52 41 4d 45 54 45 52 | 53 20 64 53 68 6f 77 44 |ARAMETER|S dShowD|
|00003900| 61 74 65 2c 20 6c 52 65 | 61 64 4f 6e 6c 79 0d 0a |ate, lRe|adOnly..|
|00003910| 0d 0a 69 66 20 65 6d 70 | 74 79 28 64 53 68 6f 77 |..if emp|ty(dShow|
|00003920| 64 61 74 65 29 0d 0a 09 | 64 53 68 6f 77 44 61 74 |date)...|dShowDat|
|00003930| 65 3d 64 61 74 65 28 29 | 0d 0a 65 6e 64 69 66 0d |e=date()|..endif.|
|00003940| 0a 0d 0a 69 66 20 6c 52 | 65 61 64 4f 6e 6c 79 0d |...if lR|eadOnly.|
|00003950| 0a 09 74 68 69 73 2e 43 | 61 70 74 69 6f 6e 3d 22 |..this.C|aption="|
|00003960| 43 61 6c 65 6e 64 61 72 | 20 66 6f 72 20 22 2b 64 |Calendar| for "+d|
|00003970| 74 6f 63 28 64 53 68 6f | 77 44 61 74 65 29 0d 0a |toc(dSho|wDate)..|
|00003980| 09 74 68 69 73 2e 43 61 | 6c 65 6e 64 61 72 2e 45 |.this.Ca|lendar.E|
|00003990| 6e 61 62 6c 65 64 3d 2e | 66 2e 0d 0a 65 6c 73 65 |nabled=.|f...else|
|000039a0| 09 0d 0a 09 74 68 69 73 | 2e 43 61 70 74 69 6f 6e |....this|.Caption|
|000039b0| 3d 22 53 65 6c 65 63 74 | 20 61 20 44 61 74 65 22 |="Select| a Date"|
|000039c0| 0d 0a 65 6e 64 69 66 0d | 0a 0d 0a 69 66 20 64 53 |..endif.|...if dS|
|000039d0| 68 6f 77 44 61 74 65 21 | 3d 64 61 74 65 28 29 0d |howDate!|=date().|
|000039e0| 0a 09 74 68 69 73 2e 43 | 61 6c 65 6e 64 61 72 2e |..this.C|alendar.|
|000039f0| 56 61 6c 75 65 3d 64 53 | 68 6f 77 44 61 74 65 0d |Value=dS|howDate.|
|00003a00| 0a 09 74 68 69 73 2e 43 | 61 6c 65 6e 64 61 72 2e |..this.C|alendar.|
|00003a10| 61 53 65 6c 65 63 74 65 | 64 5b 31 2c 31 5d 3d 64 |aSelecte|d[1,1]=d|
|00003a20| 53 68 6f 77 44 61 74 65 | 0d 0a 09 74 68 69 73 2e |ShowDate|...this.|
|00003a30| 43 61 6c 65 6e 64 61 72 | 2e 53 65 74 75 70 44 69 |Calendar|.SetupDi|
|00003a40| 73 70 6c 61 79 28 64 53 | 68 6f 77 44 61 74 65 29 |splay(dS|howDate)|
|00003a50| 0d 0a 65 6e 64 69 66 0d | 0a 0d 0a 0d 0a 45 4e 44 |..endif.|.....END|
|00003a60| 50 52 4f 43 0d 0a 00 00 | 00 01 00 00 02 5e fe f2 |PROC....|.....^..|
|00003a70| ff 1b 02 01 00 00 00 45 | 02 00 00 45 02 00 00 00 |.......E|...E....|
|00003a80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003a90| 00 00 00 00 00 22 c6 03 | 00 00 00 25 00 00 00 93 |....."..|...%....|
|00003aa0| 01 00 00 00 00 00 00 dc | 01 00 00 0b 00 00 00 c6 |........|........|
|00003ab0| 01 00 00 00 00 00 00 00 | 00 00 00 fc 03 00 03 00 |........|........|
|00003ac0| 55 00 00 24 00 21 00 99 | fc 43 f8 01 01 fa 03 01 |U..$.!..|.C......|
|00003ad0| 00 00 00 00 00 00 e0 3f | fb 02 00 38 38 df e3 00 |.......?|...88...|
|00003ae0| 00 f6 01 00 fd fe 03 00 | 55 02 00 09 00 43 41 4c |........|U....CAL|
|00003af0| 42 55 54 54 4f 4e 0f 00 | 41 55 54 4f 53 45 54 46 |BUTTON..|AUTOSETF|
|00003b00| 4f 4e 54 53 49 5a 45 35 | 00 14 00 54 f4 00 00 f7 |ONTSIZE5|...T....|
|00003b10| 01 00 10 fc f4 00 00 f7 | 01 00 0a fd fe 0a 00 99 |........|........|
|00003b20| f4 00 00 f7 02 00 fe 14 | 00 99 fc 43 00 f7 00 00 |........|...C....|
|00003b30| f4 00 00 f4 03 00 f6 04 | 00 fd fe 03 00 55 05 00 |........|.....U..|
|00003b40| 04 00 54 48 49 53 08 00 | 53 45 4c 45 43 54 45 44 |..THIS..|SELECTED|
|00003b50| 07 00 52 45 46 52 45 53 | 48 06 00 50 41 52 45 4e |..REFRES|H..PAREN|
|00003b60| 54 0e 00 44 41 59 53 45 | 4c 45 43 54 45 56 45 4e |T..DAYSE|LECTEVEN|
|00003b70| 54 71 00 37 00 25 fc f4 | 00 00 f7 01 00 43 f4 00 |Tq.7.%..|.....C..|
|00003b80| 00 f7 02 00 f2 0f 00 f4 | 00 00 f4 03 00 f4 04 00 |........|........|
|00003b90| f7 05 00 f3 0c 00 f4 00 | 00 f4 03 00 f4 04 00 f7 |........|........|
|00003ba0| 01 00 36 0f fd f9 05 6a | 00 fe 33 00 54 f4 00 00 |..6....j|..3.T...|
|00003bb0| f7 01 00 10 fc 43 f4 00 | 00 f7 02 00 f2 0f 00 f4 |.....C..|........|
|00003bc0| 00 00 f4 03 00 f4 04 00 | f7 05 00 f3 0c 00 f4 00 |........|........|
|00003bd0| 00 f4 03 00 f4 04 00 f7 | 01 00 36 fd fe 04 00 1e |........|..6.....|
|00003be0| fe 03 00 55 06 00 04 00 | 54 48 49 53 09 00 46 4f |...U....|THIS..FO|
|00003bf0| 52 45 43 4f 4c 4f 52 08 | 00 53 45 4c 45 43 54 45 |RECOLOR.|.SELECTE|
|00003c00| 44 06 00 50 41 52 45 4e | 54 0c 00 45 44 54 46 4f |D..PAREN|T..EDTFO|
|00003c10| 4e 54 43 4f 4c 4f 52 11 | 00 53 45 4c 45 43 54 45 |NTCOLOR.|.SELECTE|
|00003c20| 44 46 4f 52 45 43 4f 4c | 4f 52 0f 00 61 75 74 6f |DFORECOL|OR..auto|
|00003c30| 73 65 74 66 6f 6e 74 73 | 69 7a 65 2c 00 00 00 00 |setfonts|ize,....|
|00003c40| 00 05 00 43 6c 69 63 6b | 70 00 00 00 00 00 07 00 |...Click|p.......|
|00003c50| 52 65 66 72 65 73 68 da | 00 00 00 00 00 31 00 11 |Refresh.|.....1..|
|00003c60| 02 32 00 42 01 a1 00 41 | 01 33 00 75 03 35 03 41 |.2.B...A|.3.u.5.A|
|00003c70| 00 32 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.2......|........|
|00003c80| 00 00 00 01 00 00 00 1b | 00 00 00 41 00 00 00 01 |........|...A....|
|00003c90| 00 00 00 03 00 00 00 5d | 00 00 00 fe 00 00 00 04 |.......]|........|
|00003ca0| 00 00 00 07 00 00 00 1c | 01 00 00 87 02 00 00 0b |........|........|
|00003cb0| 00 00 00 00 29 00 00 00 | 45 02 00 00 00 00 00 00 |....)...|E.......|
|00003cc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00003cd0| 00 00 02 92 50 52 4f 43 | 45 44 55 52 45 20 61 75 |....PROC|EDURE au|
|00003ce0| 74 6f 73 65 74 66 6f 6e | 74 73 69 7a 65 0d 0a 43 |tosetfon|tsize..C|
|00003cf0| 61 6c 42 75 74 74 6f 6e | 3a 3a 41 75 74 6f 53 65 |alButton|::AutoSe|
|00003d00| 74 46 6f 6e 74 53 69 7a | 65 28 31 2c 30 2e 35 2c |tFontSiz|e(1,0.5,|
|00003d10| 22 38 38 22 29 0d 0a 45 | 4e 44 50 52 4f 43 0d 0a |"88")..E|NDPROC..|
|00003d20| 50 52 4f 43 45 44 55 52 | 45 20 43 6c 69 63 6b 0d |PROCEDUR|E Click.|
|00003d30| 0a 2a 20 43 6c 69 63 6b | 0d 0a 74 68 69 73 2e 53 |.* Click|..this.S|
|00003d40| 65 6c 65 63 74 65 64 3d | 21 74 68 69 73 2e 53 65 |elected=|!this.Se|
|00003d50| 6c 65 63 74 65 64 09 09 | 26 26 20 54 6f 67 67 6c |lected..|&& Toggl|
|00003d60| 65 20 43 75 72 72 65 6e | 74 20 53 74 61 74 65 0d |e Curren|t State.|
|00003d70| 0a 74 68 69 73 2e 52 65 | 66 72 65 73 68 09 09 09 |.this.Re|fresh...|
|00003d80| 09 09 09 26 26 20 52 65 | 73 65 74 20 74 68 65 20 |...&& Re|set the |
|00003d90| 63 6f 6c 6f 72 0d 0a 74 | 68 69 73 2e 50 61 72 65 |color..t|his.Pare|
|00003da0| 6e 74 2e 44 61 79 53 65 | 6c 65 63 74 45 76 65 6e |nt.DaySe|lectEven|
|00003db0| 74 28 74 68 69 73 29 09 | 26 26 20 43 61 6c 6c 20 |t(this).|&& Call |
|00003dc0| 74 68 65 20 70 61 72 65 | 6e 74 20 65 76 65 6e 74 |the pare|nt event|
|00003dd0| 0d 0a 0d 0a 45 4e 44 50 | 52 4f 43 0d 0a 50 52 4f |....ENDP|ROC..PRO|
|00003de0| 43 45 44 55 52 45 20 52 | 65 66 72 65 73 68 0d 0a |CEDURE R|efresh..|
|00003df0| 2a 20 52 65 66 72 65 73 | 68 0d 0a 23 64 65 66 69 |* Refres|h..#defi|
|00003e00| 6e 65 20 46 4f 52 45 5f | 43 4f 4c 4f 52 20 74 68 |ne FORE_|COLOR th|
|00003e10| 69 73 2e 70 61 72 65 6e | 74 2e 65 64 74 46 6f 6e |is.paren|t.edtFon|
|00003e20| 74 43 6f 6c 6f 72 2e 46 | 6f 72 65 43 6f 6c 6f 72 |tColor.F|oreColor|
|00003e30| 0d 0a 23 64 65 66 69 6e | 65 20 46 4f 52 45 5f 53 |..#defin|e FORE_S|
|00003e40| 45 4c 45 43 54 45 44 20 | 74 68 69 73 2e 70 61 72 |ELECTED |this.par|
|00003e50| 65 6e 74 2e 65 64 74 46 | 6f 6e 74 43 6f 6c 6f 72 |ent.edtF|ontColor|
|00003e60| 2e 53 65 6c 65 63 74 65 | 64 46 6f 72 65 43 6f 6c |.Selecte|dForeCol|
|00003e70| 6f 72 0d 0a 0d 0a 69 66 | 20 74 68 69 73 2e 46 6f |or....if| this.Fo|
|00003e80| 72 65 43 6f 6c 6f 72 21 | 3d 69 69 66 28 74 68 69 |reColor!|=iif(thi|
|00003e90| 73 2e 53 65 6c 65 63 74 | 65 64 2c 46 4f 52 45 5f |s.Select|ed,FORE_|
|00003ea0| 53 45 4c 45 43 54 45 44 | 2c 46 4f 52 45 5f 43 4f |SELECTED|,FORE_CO|
|00003eb0| 4c 4f 52 29 0d 0a 09 2a | 0d 0a 09 2a 09 4f 6e 6c |LOR)...*|...*.Onl|
|00003ec0| 79 20 63 68 61 6e 67 69 | 6e 67 20 74 68 69 73 20 |y changi|ng this |
|00003ed0| 70 72 6f 70 65 72 74 79 | 20 77 68 65 6e 20 69 74 |property| when it|
|00003ee0| 20 69 73 20 64 69 66 66 | 65 72 65 6e 74 20 68 61 | is diff|erent ha|
|00003ef0| 73 20 61 20 64 72 61 6d | 61 74 69 63 0d 0a 09 2a |s a dram|atic...*|
|00003f00| 09 69 6d 70 61 63 74 20 | 6f 6e 20 73 70 65 65 64 |.impact |on speed|
|00003f10| 2e 0d 0a 09 2a 0d 0a 09 | 74 68 69 73 2e 46 6f 72 |....*...|this.For|
|00003f20| 65 43 6f 6c 6f 72 3d 69 | 69 66 28 74 68 69 73 2e |eColor=i|if(this.|
|00003f30| 53 65 6c 65 63 74 65 64 | 2c 46 4f 52 45 5f 53 45 |Selected|,FORE_SE|
|00003f40| 4c 45 43 54 45 44 2c 46 | 4f 52 45 5f 43 4f 4c 4f |LECTED,F|ORE_COLO|
|00003f50| 52 29 0d 0a 65 6e 64 69 | 66 0d 0a 0d 0a 45 4e 44 |R)..endi|f....END|
|00003f60| 50 52 4f 43 0d 0a | |PROC.. | |
+--------+-------------------------+-------------------------+--------+--------+
