home *** CD-ROM | disk | FTP | other *** search
Unknown | 1998-05-26 | 22.1 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.
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 58 58 00 00 00 01 | 00 00 00 00 00 00 00 00 |..XX....|........|
|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 a4 |= 3.00|........|
|00000220| 4d 53 20 53 61 6e 73 20 | 53 65 72 69 66 2c 20 30 |MS Sans |Serif, 0|
|00000230| 2c 20 38 2c 20 35 2c 20 | 31 33 2c 20 31 31 2c 20 |, 8, 5, |13, 11, |
|00000240| 31 31 2c 20 32 2c 20 30 | 0a 4d 53 20 53 61 6e 73 |11, 2, 0|.MS Sans|
|00000250| 20 53 65 72 69 66 2c 20 | 31 2c 20 38 2c 20 36 2c | Serif, |1, 8, 6,|
|00000260| 20 31 33 2c 20 31 31 2c | 20 31 32 2c 20 32 2c 20 | 13, 11,| 12, 2, |
|00000270| 30 0a 4d 53 20 53 61 6e | 73 20 53 65 72 69 66 2c |0.MS San|s Serif,|
|00000280| 20 32 2c 20 38 2c 20 35 | 2c 20 31 33 2c 20 31 31 | 2, 8, 5|, 13, 11|
|00000290| 2c 20 31 31 2c 20 32 2c | 20 30 0a 4d 53 20 53 61 |, 11, 2,| 0.MS Sa|
|000002a0| 6e 73 20 53 65 72 69 66 | 2c 20 34 2c 20 38 2c 20 |ns Serif|, 4, 8, |
|000002b0| 35 2c 20 31 33 2c 20 31 | 31 2c 20 31 31 2c 20 32 |5, 13, 1|1, 11, 2|
|000002c0| 2c 20 30 0a 00 00 00 01 | 00 00 00 0b 5f 74 62 72 |, 0.....|...._tbr|
|000002d0| 65 64 69 74 69 6e 67 00 | 00 00 01 00 00 00 06 50 |editing.|.......P|
|000002e0| 69 78 65 6c 73 00 00 00 | 01 00 00 00 05 43 6c 61 |ixels...|.....Cla|
|000002f0| 73 73 00 00 00 01 00 00 | 00 02 31 30 00 00 00 01 |ss......|..10....|
|00000300| 00 00 00 08 5f 74 6f 6f | 6c 62 61 72 00 00 00 01 |...._too|lbar....|
|00000310| 00 00 00 0b 5f 74 62 72 | 65 64 69 74 69 6e 67 00 |...._tbr|editing.|
|00000320| 00 00 01 00 00 06 1d fe | f2 ff 20 02 01 00 00 00 |........|.. .....|
|00000330| 04 06 00 00 04 06 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 0d 41 |........|.......A|
|00000350| 02 00 00 00 25 00 00 00 | 10 05 00 00 00 00 00 00 |....%...|........|
|00000360| ab 05 00 00 39 00 00 00 | 39 05 00 00 00 00 00 00 |....9...|9.......|
|00000370| 00 00 00 00 fc 03 00 03 | 00 55 00 00 69 00 16 00 |........|.U..i...|
|00000380| 99 fc 43 d9 06 00 43 6f | 6c 6f 72 73 f4 00 00 f6 |..C...Co|lors....|
|00000390| 01 00 fd fe 20 00 99 fc | 43 d9 10 00 53 65 74 20 |.... ...|C...Set |
|000003a0| 46 6f 72 65 43 6f 6c 6f | 72 2e 2e 2e f4 00 00 f6 |ForeColo|r.......|
|000003b0| 01 00 fd fe 20 00 99 fc | 43 d9 10 00 53 65 74 20 |.... ...|C...Set |
|000003c0| 42 61 63 6b 43 6f 6c 6f | 72 2e 2e 2e f4 00 00 f6 |BackColo|r.......|
|000003d0| 01 00 fd fe 10 00 54 f4 | 00 00 f7 02 00 10 fc f8 |......T.|........|
|000003e0| 01 01 fd fe 03 00 55 03 | 00 04 00 54 48 49 53 07 |......U.|...THIS.|
|000003f0| 00 41 44 44 49 54 45 4d | 09 00 4c 49 53 54 49 4e |.ADDITEM|..LISTIN|
|00000400| 44 45 58 b6 03 13 00 ae | f7 00 00 07 f7 01 00 07 |DEX.....|........|
|00000410| f7 02 00 07 f7 03 00 fe | 26 00 25 fc 43 d9 12 00 |........|&.%.C...|
|00000420| 5f 53 43 52 45 45 4e 2e | 41 63 74 69 76 65 46 6f |_SCREEN.|ActiveFo|
|00000430| 72 6d 62 fb 01 00 4f 10 | fd f9 05 58 00 fe 0f 00 |rmb...O.|...X....|
|00000440| 54 f7 00 00 10 fc e1 39 | f7 04 00 fd fe 10 00 54 |T......9|.......T|
|00000450| f7 01 00 10 fc f4 00 00 | f7 05 00 fd fe 08 00 1b |........|........|
|00000460| f9 05 64 00 fe 04 00 42 | fe 04 00 1e fe 0d 00 18 |..d....B|........|
|00000470| 48 f9 05 75 00 f9 05 9f | 03 fe 14 00 0c fc f4 06 |H..u....|........|
|00000480| 00 f7 07 00 f8 01 01 10 | fd f9 05 8d 00 fe 04 00 |........|........|
|00000490| 42 fe 14 00 0c fc f4 06 | 00 f7 07 00 f8 01 02 10 |B.......|........|
|000004a0| fd f9 05 08 02 fe 0d 00 | 54 f7 03 00 10 fc 43 ea |........|T.....C.|
|000004b0| 8c fd fe 14 00 25 fc f5 | 0d f7 03 00 f9 02 ff ff |.....%..|........|
|000004c0| 11 fd f9 05 04 02 fe 0d | 00 18 48 f9 05 cf 00 f9 |........|..H.....|
|000004d0| 05 00 02 fe 14 00 0c fc | f4 08 00 f7 09 00 f8 01 |........|........|
|000004e0| 01 10 fd f9 05 67 01 fe | 26 00 25 fc 43 d9 12 00 |.....g..|&.%.C...|
|000004f0| 6f 43 6f 6e 74 72 6f 6c | 2e 46 6f 72 65 43 6f 6c |oControl|.ForeCol|
|00000500| 6f 72 62 d9 01 00 4e 10 | fd f9 05 1b 01 fe 12 00 |orb...N.|........|
|00000510| 54 f4 01 00 f7 0a 00 10 | fc f5 0d f7 03 00 fd fe |T.......|........|
|00000520| 08 00 1b f9 05 63 01 fe | 2a 00 25 fc 43 d9 16 00 |.....c..|*.%.C...|
|00000530| 6f 43 6f 6e 74 72 6f 6c | 2e 49 74 65 6d 46 6f 72 |oControl|.ItemFor|
|00000540| 65 43 6f 6c 6f 72 62 d9 | 01 00 4e 10 fd f9 05 5f |eColorb.|..N...._|
|00000550| 01 fe 12 00 54 f4 01 00 | f7 0b 00 10 fc f5 0d f7 |....T...|........|
|00000560| 03 00 fd fe 04 00 1e fe | 04 00 1e fe 14 00 0c fc |........|........|
|00000570| f4 08 00 f7 09 00 f8 01 | 02 10 fd f9 05 cd 01 fe |........|........|
|00000580| 29 00 99 fc 43 fb 09 00 | 46 6f 72 65 43 6f 6c 6f |)...C...|ForeColo|
|00000590| 72 00 f5 0d f7 03 00 fb | 07 00 54 45 58 54 42 4f |r.......|..TEXTBO|
|000005a0| 58 f4 00 00 f6 0c 00 fd | fe 29 00 99 fc 43 fb 09 |X.......|.)...C..|
|000005b0| 00 46 6f 72 65 43 6f 6c | 6f 72 00 f5 0d f7 03 00 |.ForeCol|or......|
|000005c0| fb 07 00 45 44 49 54 42 | 4f 58 f4 00 00 f6 0c 00 |...EDITB|OX......|
|000005d0| fd fe 14 00 0c fc f4 08 | 00 f7 09 00 f8 01 03 10 |........|........|
|000005e0| fd f9 05 00 02 fe 1f 00 | 99 fc 43 fb 09 00 46 6f |........|..C...Fo|
|000005f0| 72 65 43 6f 6c 6f 72 00 | f5 0d f7 03 00 f4 00 00 |reColor.|........|
|00000600| f6 0c 00 fd fe 04 00 1c | fe 04 00 1e fe 14 00 0c |........|........|
|00000610| fc f4 06 00 f7 07 00 f8 | 01 03 10 fd f9 05 9f 03 |........|........|
|00000620| fe 0d 00 54 f7 02 00 10 | fc 43 ea 8c fd fe 14 00 |...T....|.C......|
|00000630| 25 fc f5 0d f7 02 00 f9 | 02 ff ff 11 fd f9 05 9b |%.......|........|
|00000640| 03 fe 0d 00 18 48 f9 05 | 4a 02 f9 05 97 03 fe 14 |.....H..|J.......|
|00000650| 00 0c fc f4 08 00 f7 09 | 00 f8 01 01 10 fd f9 05 |........|........|
|00000660| fe 02 fe 31 00 25 fc 43 | d9 1d 00 6f 46 6f 72 6d |...1.%.C|...oForm|
|00000670| 2e 41 63 74 69 76 65 43 | 6f 6e 74 72 6f 6c 2e 42 |.ActiveC|ontrol.B|
|00000680| 61 63 6b 43 6f 6c 6f 72 | 62 d9 01 00 4e 10 fd f9 |ackColor|b...N...|
|00000690| 05 a4 02 fe 15 00 54 f4 | 00 00 f4 05 00 f7 0d 00 |......T.|........|
|000006a0| 10 fc f5 0d f7 02 00 fd | fe 08 00 1b f9 05 fa 02 |........|........|
|000006b0| fe 35 00 25 fc 43 d9 21 | 00 6f 46 6f 72 6d 2e 41 |.5.%.C.!|.oForm.A|
|000006c0| 63 74 69 76 65 43 6f 6e | 74 72 6f 6c 2e 49 74 65 |ctiveCon|trol.Ite|
|000006d0| 6d 42 61 63 6b 43 6f 6c | 6f 72 62 d9 01 00 4e 10 |mBackCol|orb...N.|
|000006e0| fd f9 05 f6 02 fe 15 00 | 54 f4 00 00 f4 05 00 f7 |........|T.......|
|000006f0| 0e 00 10 fc f5 0d f7 02 | 00 fd fe 04 00 1e fe 04 |........|........|
|00000700| 00 1e fe 14 00 0c fc f4 | 08 00 f7 09 00 f8 01 02 |........|........|
|00000710| 10 fd f9 05 64 03 fe 29 | 00 99 fc 43 fb 09 00 42 |....d..)|...C...B|
|00000720| 61 63 6b 43 6f 6c 6f 72 | 00 f5 0d f7 02 00 fb 07 |ackColor|........|
|00000730| 00 54 45 58 54 42 4f 58 | f4 00 00 f6 0c 00 fd fe |.TEXTBOX|........|
|00000740| 29 00 99 fc 43 fb 09 00 | 42 61 63 6b 43 6f 6c 6f |)...C...|BackColo|
|00000750| 72 00 f5 0d f7 02 00 fb | 07 00 45 44 49 54 42 4f |r.......|..EDITBO|
|00000760| 58 f4 00 00 f6 0c 00 fd | fe 14 00 0c fc f4 08 00 |X.......|........|
|00000770| f7 09 00 f8 01 03 10 fd | f9 05 97 03 fe 1f 00 99 |........|........|
|00000780| fc 43 fb 09 00 42 61 63 | 6b 43 6f 6c 6f 72 00 f5 |.C...Bac|kColor..|
|00000790| 0d f7 02 00 f4 00 00 f6 | 0c 00 fd fe 04 00 1c fe |........|........|
|000007a0| 04 00 1e fe 04 00 1c fe | 10 00 54 f4 06 00 f7 07 |........|..T.....|
|000007b0| 00 10 fc f8 01 01 fd fe | 03 00 55 0f 00 05 00 4f |........|..U....O|
|000007c0| 46 4f 52 4d 08 00 4f 43 | 4f 4e 54 52 4f 4c 0a 00 |FORM..OC|ONTROL..|
|000007d0| 4e 42 41 43 4b 43 4f 4c | 4f 52 0a 00 4e 46 4f 52 |NBACKCOL|OR..NFOR|
|000007e0| 45 43 4f 4c 4f 52 0a 00 | 41 43 54 49 56 45 46 4f |ECOLOR..|ACTIVEFO|
|000007f0| 52 4d 0d 00 41 43 54 49 | 56 45 43 4f 4e 54 52 4f |RM..ACTI|VECONTRO|
|00000800| 4c 04 00 54 48 49 53 05 | 00 56 41 4c 55 45 08 00 |L..THIS.|.VALUE..|
|00000810| 54 48 49 53 46 4f 52 4d | 0a 00 4e 41 50 50 4c 49 |THISFORM|..NAPPLI|
|00000820| 45 53 54 4f 09 00 46 4f | 52 45 43 4f 4c 4f 52 0d |ESTO..FO|RECOLOR.|
|00000830| 00 49 54 45 4d 46 4f 52 | 45 43 4f 4c 4f 52 06 00 |.ITEMFOR|ECOLOR..|
|00000840| 53 45 54 41 4c 4c 09 00 | 42 41 43 4b 43 4f 4c 4f |SETALL..|BACKCOLO|
|00000850| 52 0d 00 49 54 45 4d 42 | 41 43 4b 43 4f 4c 4f 52 |R..ITEMB|ACKCOLOR|
|00000860| 04 00 49 6e 69 74 2c 00 | 00 00 00 00 ff ff 11 00 |..Init,.|........|
|00000870| 49 6e 74 65 72 61 63 74 | 69 76 65 43 68 61 6e 67 |Interact|iveChang|
|00000880| 65 b3 00 00 00 00 00 ff | ff 31 00 65 01 01 02 01 |e.......|.1.e....|
|00000890| 02 01 01 33 00 31 01 62 | 02 f1 00 01 01 81 00 41 |...3.1.b|.......A|
|000008a0| 00 41 00 d1 00 41 01 41 | 00 41 01 d1 00 41 01 d1 |.A...A.A|.A...A..|
|000008b0| 00 41 01 61 02 21 01 81 | 00 a1 02 21 01 41 00 41 |.A.a.!..|...!.A.A|
|000008c0| 00 41 01 91 02 91 02 42 | 01 f1 01 41 00 41 00 42 |.A.....B|...A.A.B|
|000008d0| 01 d1 00 41 01 d1 00 41 | 01 11 03 51 01 81 00 51 |...A...A|...Q...Q|
|000008e0| 03 51 01 41 00 41 00 41 | 01 91 02 91 02 42 01 f1 |.Q.A.A.A|.....B..|
|000008f0| 01 41 00 41 00 41 00 01 | 01 33 00 00 00 00 00 00 |.A.A.A..|.3......|
|00000900| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 00 10 |........|........|
|00000910| 00 00 00 fd 00 00 00 01 | 00 00 00 06 00 00 00 25 |........|.......%|
|00000920| 01 00 00 4c 07 00 00 0c | 00 00 00 00 29 00 00 00 |...L....|....)...|
|00000930| 04 06 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000940| 00 00 00 00 00 00 00 01 | 00 00 07 57 50 52 4f 43 |........|...WPROC|
|00000950| 45 44 55 52 45 20 49 6e | 69 74 0d 0a 23 44 45 46 |EDURE In|it..#DEF|
|00000960| 49 4e 45 20 49 54 45 4d | 5f 43 4f 4c 4f 52 53 5f |INE ITEM|_COLORS_|
|00000970| 4c 4f 43 09 22 43 6f 6c | 6f 72 73 22 0d 0a 23 44 |LOC."Col|ors"..#D|
|00000980| 45 46 49 4e 45 20 49 54 | 45 4d 5f 46 43 4f 4c 4f |EFINE IT|EM_FCOLO|
|00000990| 52 5f 4c 4f 43 09 22 53 | 65 74 20 46 6f 72 65 43 |R_LOC."S|et ForeC|
|000009a0| 6f 6c 6f 72 2e 2e 2e 22 | 0d 0a 23 44 45 46 49 4e |olor..."|..#DEFIN|
|000009b0| 45 20 49 54 45 4d 5f 42 | 43 4f 4c 4f 52 5f 4c 4f |E ITEM_B|COLOR_LO|
|000009c0| 43 09 22 53 65 74 20 42 | 61 63 6b 43 6f 6c 6f 72 |C."Set B|ackColor|
|000009d0| 2e 2e 2e 22 0d 0a 0d 0a | 54 48 49 53 2e 41 64 64 |..."....|THIS.Add|
|000009e0| 49 74 65 6d 28 49 54 45 | 4d 5f 43 4f 4c 4f 52 53 |Item(ITE|M_COLORS|
|000009f0| 5f 4c 4f 43 29 0d 0a 54 | 48 49 53 2e 41 64 64 49 |_LOC)..T|HIS.AddI|
|00000a00| 74 65 6d 28 49 54 45 4d | 5f 46 43 4f 4c 4f 52 5f |tem(ITEM|_FCOLOR_|
|00000a10| 4c 4f 43 29 0d 0a 54 48 | 49 53 2e 41 64 64 49 74 |LOC)..TH|IS.AddIt|
|00000a20| 65 6d 28 49 54 45 4d 5f | 42 43 4f 4c 4f 52 5f 4c |em(ITEM_|BCOLOR_L|
|00000a30| 4f 43 29 0d 0a 54 48 49 | 53 2e 4c 69 73 74 49 6e |OC)..THI|S.ListIn|
|00000a40| 64 65 78 20 3d 20 31 0d | 0a 0d 0a 45 4e 44 50 52 |dex = 1.|...ENDPR|
|00000a50| 4f 43 0d 0a 50 52 4f 43 | 45 44 55 52 45 20 49 6e |OC..PROC|EDURE In|
|00000a60| 74 65 72 61 63 74 69 76 | 65 43 68 61 6e 67 65 0d |teractiv|eChange.|
|00000a70| 0a 4c 4f 43 41 4c 20 6f | 46 6f 72 6d 2c 6f 43 6f |.LOCAL o|Form,oCo|
|00000a80| 6e 74 72 6f 6c 2c 6e 42 | 61 63 6b 43 6f 6c 6f 72 |ntrol,nB|ackColor|
|00000a90| 2c 6e 46 6f 72 65 43 6f | 6c 6f 72 20 0d 0a 0d 0a |,nForeCo|lor ....|
|00000aa0| 49 46 20 54 59 50 45 28 | 22 5f 53 43 52 45 45 4e |IF TYPE(|"_SCREEN|
|00000ab0| 2e 41 63 74 69 76 65 46 | 6f 72 6d 22 29 20 3d 20 |.ActiveF|orm") = |
|00000ac0| 27 4f 27 0d 0a 09 6f 46 | 6f 72 6d 20 3d 20 5f 53 |'O'...oF|orm = _S|
|00000ad0| 43 52 45 45 4e 2e 41 63 | 74 69 76 65 46 6f 72 6d |CREEN.Ac|tiveForm|
|00000ae0| 0d 0a 09 6f 43 6f 6e 74 | 72 6f 6c 20 3d 20 6f 46 |...oCont|rol = oF|
|00000af0| 6f 72 6d 2e 41 63 74 69 | 76 65 43 6f 6e 74 72 6f |orm.Acti|veContro|
|00000b00| 6c 0d 0a 45 4c 53 45 0d | 0a 09 52 45 54 55 52 4e |l..ELSE.|..RETURN|
|00000b10| 0d 0a 45 4e 44 49 46 0d | 0a 44 4f 20 43 41 53 45 |..ENDIF.|.DO CASE|
|00000b20| 20 0d 0a 09 43 41 53 45 | 20 54 68 69 73 2e 56 61 | ...CASE| This.Va|
|00000b30| 6c 75 65 20 3d 20 31 0d | 0a 09 09 52 45 54 55 52 |lue = 1.|...RETUR|
|00000b40| 4e 0d 0a 09 43 41 53 45 | 20 54 68 69 73 2e 56 61 |N...CASE| This.Va|
|00000b50| 6c 75 65 20 3d 20 32 20 | 26 26 20 47 65 74 20 46 |lue = 2 |&& Get F|
|00000b60| 6f 72 65 43 6f 6c 6f 72 | 0d 0a 09 09 6e 46 6f 72 |oreColor|....nFor|
|00000b70| 65 43 6f 6c 6f 72 20 3d | 20 47 45 54 43 4f 4c 4f |eColor =| GETCOLO|
|00000b80| 52 28 29 0d 0a 09 09 49 | 46 20 6d 2e 6e 46 6f 72 |R()....I|F m.nFor|
|00000b90| 65 43 6f 6c 6f 72 20 3e | 20 2d 31 0d 0a 09 09 44 |eColor >| -1....D|
|00000ba0| 4f 20 43 41 53 45 0d 0a | 09 09 09 43 41 53 45 20 |O CASE..|...CASE |
|00000bb0| 54 48 49 53 46 4f 52 4d | 2e 6e 41 70 70 6c 69 65 |THISFORM|.nApplie|
|00000bc0| 73 54 6f 20 3d 20 31 20 | 26 26 20 63 75 72 72 65 |sTo = 1 |&& curre|
|00000bd0| 6e 74 20 63 6f 6e 74 72 | 6f 6c 0d 0a 09 09 09 09 |nt contr|ol......|
|00000be0| 49 46 20 54 59 50 45 28 | 22 6f 43 6f 6e 74 72 6f |IF TYPE(|"oContro|
|00000bf0| 6c 2e 46 6f 72 65 43 6f | 6c 6f 72 22 29 20 3d 20 |l.ForeCo|lor") = |
|00000c00| 22 4e 22 0d 0a 09 09 09 | 09 09 6f 43 6f 6e 74 72 |"N".....|..oContr|
|00000c10| 6f 6c 2e 46 6f 72 65 43 | 6f 6c 6f 72 20 3d 20 6d |ol.ForeC|olor = m|
|00000c20| 2e 6e 46 6f 72 65 43 6f | 6c 6f 72 0d 0a 09 09 09 |.nForeCo|lor.....|
|00000c30| 09 45 4c 53 45 0d 0a 09 | 09 09 09 09 49 46 20 54 |.ELSE...|....IF T|
|00000c40| 59 50 45 28 22 6f 43 6f | 6e 74 72 6f 6c 2e 49 74 |YPE("oCo|ntrol.It|
|00000c50| 65 6d 46 6f 72 65 43 6f | 6c 6f 72 22 29 20 3d 20 |emForeCo|lor") = |
|00000c60| 22 4e 22 0d 0a 09 09 09 | 09 09 09 6f 43 6f 6e 74 |"N".....|...oCont|
|00000c70| 72 6f 6c 2e 49 74 65 6d | 46 6f 72 65 43 6f 6c 6f |rol.Item|ForeColo|
|00000c80| 72 20 3d 20 6d 2e 6e 46 | 6f 72 65 43 6f 6c 6f 72 |r = m.nF|oreColor|
|00000c90| 0d 0a 09 09 09 09 09 45 | 4e 44 49 46 0d 0a 09 09 |.......E|NDIF....|
|00000ca0| 09 09 45 4e 44 49 46 0d | 0a 09 09 09 43 41 53 45 |..ENDIF.|....CASE|
|00000cb0| 20 54 48 49 53 46 4f 52 | 4d 2e 6e 41 70 70 6c 69 | THISFOR|M.nAppli|
|00000cc0| 65 73 54 6f 20 3d 20 32 | 20 26 26 20 74 65 78 74 |esTo = 2| && text|
|00000cd0| 20 61 6e 64 20 65 64 69 | 74 20 62 6f 78 65 73 0d | and edi|t boxes.|
|00000ce0| 0a 09 09 09 09 6f 46 6f | 72 6d 2e 53 65 74 41 6c |.....oFo|rm.SetAl|
|00000cf0| 6c 28 27 46 6f 72 65 43 | 6f 6c 6f 72 27 2c 20 6d |l('ForeC|olor', m|
|00000d00| 2e 6e 46 6f 72 65 43 6f | 6c 6f 72 2c 20 27 54 45 |.nForeCo|lor, 'TE|
|00000d10| 58 54 42 4f 58 27 29 0d | 0a 09 09 09 09 6f 46 6f |XTBOX').|.....oFo|
|00000d20| 72 6d 2e 53 65 74 41 6c | 6c 28 27 46 6f 72 65 43 |rm.SetAl|l('ForeC|
|00000d30| 6f 6c 6f 72 27 2c 20 6d | 2e 6e 46 6f 72 65 43 6f |olor', m|.nForeCo|
|00000d40| 6c 6f 72 2c 20 27 45 44 | 49 54 42 4f 58 27 29 0d |lor, 'ED|ITBOX').|
|00000d50| 0a 09 09 09 0d 0a 09 09 | 09 43 41 53 45 20 54 48 |........|.CASE TH|
|00000d60| 49 53 46 4f 52 4d 2e 6e | 41 70 70 6c 69 65 73 54 |ISFORM.n|AppliesT|
|00000d70| 6f 20 3d 20 33 20 26 26 | 20 41 6c 6c 20 63 6f 6e |o = 3 &&| All con|
|00000d80| 74 72 6f 6c 73 0d 0a 09 | 09 09 09 6f 46 6f 72 6d |trols...|...oForm|
|00000d90| 2e 53 65 74 41 6c 6c 28 | 27 46 6f 72 65 43 6f 6c |.SetAll(|'ForeCol|
|00000da0| 6f 72 27 2c 20 6d 2e 6e | 46 6f 72 65 43 6f 6c 6f |or', m.n|ForeColo|
|00000db0| 72 29 0d 0a 09 09 45 4e | 44 43 41 53 45 0d 0a 09 |r)....EN|DCASE...|
|00000dc0| 09 45 4e 44 49 46 0d 0a | 0d 0a 09 43 41 53 45 20 |.ENDIF..|...CASE |
|00000dd0| 54 68 69 73 2e 56 61 6c | 75 65 20 3d 20 33 20 26 |This.Val|ue = 3 &|
|00000de0| 26 20 47 65 74 20 42 61 | 63 6b 43 6f 6c 6f 72 0d |& Get Ba|ckColor.|
|00000df0| 0a 09 09 6e 42 61 63 6b | 43 6f 6c 6f 72 20 3d 20 |...nBack|Color = |
|00000e00| 47 45 54 43 4f 4c 4f 52 | 28 29 0d 0a 09 09 49 46 |GETCOLOR|()....IF|
|00000e10| 20 6d 2e 6e 42 61 63 6b | 43 6f 6c 6f 72 20 3e 20 | m.nBack|Color > |
|00000e20| 2d 31 0d 0a 09 09 44 4f | 20 43 41 53 45 0d 0a 09 |-1....DO| CASE...|
|00000e30| 09 09 43 41 53 45 20 54 | 48 49 53 46 4f 52 4d 2e |..CASE T|HISFORM.|
|00000e40| 6e 41 70 70 6c 69 65 73 | 54 6f 20 3d 20 31 20 26 |nApplies|To = 1 &|
|00000e50| 26 20 63 75 72 72 65 6e | 74 20 63 6f 6e 74 72 6f |& curren|t contro|
|00000e60| 6c 0d 0a 09 09 09 09 49 | 46 20 54 59 50 45 28 22 |l......I|F TYPE("|
|00000e70| 6f 46 6f 72 6d 2e 41 63 | 74 69 76 65 43 6f 6e 74 |oForm.Ac|tiveCont|
|00000e80| 72 6f 6c 2e 42 61 63 6b | 43 6f 6c 6f 72 22 29 20 |rol.Back|Color") |
|00000e90| 3d 20 22 4e 22 0d 0a 09 | 09 09 09 09 6f 46 6f 72 |= "N"...|....oFor|
|00000ea0| 6d 2e 41 63 74 69 76 65 | 43 6f 6e 74 72 6f 6c 2e |m.Active|Control.|
|00000eb0| 42 61 63 6b 43 6f 6c 6f | 72 20 3d 20 6d 2e 6e 42 |BackColo|r = m.nB|
|00000ec0| 61 63 6b 43 6f 6c 6f 72 | 0d 0a 09 09 09 09 45 4c |ackColor|......EL|
|00000ed0| 53 45 0d 0a 09 09 09 09 | 09 49 46 20 54 59 50 45 |SE......|.IF TYPE|
|00000ee0| 28 22 6f 46 6f 72 6d 2e | 41 63 74 69 76 65 43 6f |("oForm.|ActiveCo|
|00000ef0| 6e 74 72 6f 6c 2e 49 74 | 65 6d 42 61 63 6b 43 6f |ntrol.It|emBackCo|
|00000f00| 6c 6f 72 22 29 20 3d 20 | 22 4e 22 0d 0a 09 09 09 |lor") = |"N".....|
|00000f10| 09 09 09 6f 46 6f 72 6d | 2e 41 63 74 69 76 65 43 |...oForm|.ActiveC|
|00000f20| 6f 6e 74 72 6f 6c 2e 49 | 74 65 6d 42 61 63 6b 43 |ontrol.I|temBackC|
|00000f30| 6f 6c 6f 72 20 3d 20 6d | 2e 6e 42 61 63 6b 43 6f |olor = m|.nBackCo|
|00000f40| 6c 6f 72 0d 0a 09 09 09 | 09 09 45 4e 44 49 46 0d |lor.....|..ENDIF.|
|00000f50| 0a 09 09 09 09 45 4e 44 | 49 46 0d 0a 09 09 09 43 |.....END|IF.....C|
|00000f60| 41 53 45 20 54 48 49 53 | 46 4f 52 4d 2e 6e 41 70 |ASE THIS|FORM.nAp|
|00000f70| 70 6c 69 65 73 54 6f 20 | 3d 20 32 20 26 26 20 74 |pliesTo |= 2 && t|
|00000f80| 65 78 74 20 61 6e 64 20 | 65 64 69 74 20 62 6f 78 |ext and |edit box|
|00000f90| 65 73 0d 0a 09 09 09 09 | 6f 46 6f 72 6d 2e 53 65 |es......|oForm.Se|
|00000fa0| 74 41 6c 6c 28 27 42 61 | 63 6b 43 6f 6c 6f 72 27 |tAll('Ba|ckColor'|
|00000fb0| 2c 20 6d 2e 6e 42 61 63 | 6b 43 6f 6c 6f 72 2c 20 |, m.nBac|kColor, |
|00000fc0| 27 54 45 58 54 42 4f 58 | 27 29 0d 0a 09 09 09 09 |'TEXTBOX|')......|
|00000fd0| 6f 46 6f 72 6d 2e 53 65 | 74 41 6c 6c 28 27 42 61 |oForm.Se|tAll('Ba|
|00000fe0| 63 6b 43 6f 6c 6f 72 27 | 2c 20 6d 2e 6e 42 61 63 |ckColor'|, m.nBac|
|00000ff0| 6b 43 6f 6c 6f 72 2c 20 | 27 45 44 49 54 42 4f 58 |kColor, |'EDITBOX|
|00001000| 27 29 0d 0a 09 09 09 0d | 0a 09 09 09 43 41 53 45 |')......|....CASE|
|00001010| 20 54 48 49 53 46 4f 52 | 4d 2e 6e 41 70 70 6c 69 | THISFOR|M.nAppli|
|00001020| 65 73 54 6f 20 3d 20 33 | 20 26 26 20 41 6c 6c 20 |esTo = 3| && All |
|00001030| 63 6f 6e 74 72 6f 6c 73 | 0d 0a 09 09 09 09 6f 46 |controls|......oF|
|00001040| 6f 72 6d 2e 53 65 74 41 | 6c 6c 28 27 42 61 63 6b |orm.SetA|ll('Back|
|00001050| 43 6f 6c 6f 72 27 2c 20 | 6d 2e 6e 42 61 63 6b 43 |Color', |m.nBackC|
|00001060| 6f 6c 6f 72 29 0d 0a 09 | 09 45 4e 44 43 41 53 45 |olor)...|.ENDCASE|
|00001070| 0d 0a 09 09 45 4e 44 49 | 46 09 09 0d 0a 45 4e 44 |....ENDI|F....END|
|00001080| 43 41 53 45 0d 0a 54 48 | 49 53 2e 56 61 6c 75 65 |CASE..TH|IS.Value|
|00001090| 20 3d 20 31 0d 0a 0d 0a | 0d 0a 45 4e 44 50 52 4f | = 1....|..ENDPRO|
|000010a0| 43 0d 0a 00 00 00 01 00 | 00 00 ba 46 6f 6e 74 42 |C.......|...FontB|
|000010b0| 6f 6c 64 20 3d 20 2e 46 | 2e 0d 0a 46 6f 6e 74 4e |old = .F|...FontN|
|000010c0| 61 6d 65 20 3d 20 22 4d | 53 20 53 61 6e 73 20 53 |ame = "M|S Sans S|
|000010d0| 65 72 69 66 22 0d 0a 46 | 6f 6e 74 53 69 7a 65 20 |erif"..F|ontSize |
|000010e0| 3d 20 38 0d 0a 56 61 6c | 75 65 20 3d 20 30 0d 0a |= 8..Val|ue = 0..|
|000010f0| 48 65 69 67 68 74 20 3d | 20 32 32 0d 0a 4c 65 66 |Height =| 22..Lef|
|00001100| 74 20 3d 20 32 36 35 0d | 0a 53 74 79 6c 65 20 3d |t = 265.|.Style =|
|00001110| 20 32 0d 0a 54 6f 6f 6c | 54 69 70 54 65 78 74 20 | 2..Tool|TipText |
|00001120| 3d 20 22 46 6f 72 65 43 | 6f 6c 6f 72 20 61 6e 64 |= "ForeC|olor and|
|00001130| 20 42 61 63 6b 43 6f 6c | 6f 72 22 0d 0a 54 6f 70 | BackCol|or"..Top|
|00001140| 20 3d 20 35 0d 0a 57 69 | 64 74 68 20 3d 20 36 39 | = 5..Wi|dth = 69|
|00001150| 0d 0a 4e 61 6d 65 20 3d | 20 22 63 62 6f 43 6f 6c |..Name =| "cboCol|
|00001160| 6f 72 22 0d 0a 00 00 00 | 01 00 00 00 0b 5f 74 62 |or".....|....._tb|
|00001170| 72 65 64 69 74 69 6e 67 | 00 00 00 01 00 00 00 08 |rediting|........|
|00001180| 63 62 6f 43 6f 6c 6f 72 | 00 00 00 01 00 00 00 08 |cboColor|........|
|00001190| 63 6f 6d 62 6f 62 6f 78 | 00 00 00 01 00 00 00 09 |combobox|........|
|000011a0| 5f 62 61 73 65 2e 76 63 | 78 00 00 00 01 00 00 00 |_base.vc|x.......|
|000011b0| 09 5f 63 6f 6d 62 6f 62 | 6f 78 00 00 00 01 00 00 |._combob|ox......|
|000011c0| 00 42 54 6f 70 20 3d 20 | 35 0d 0a 4c 65 66 74 20 |.BTop = |5..Left |
|000011d0| 3d 20 32 36 35 0d 0a 48 | 65 69 67 68 74 20 3d 20 |= 265..H|eight = |
|000011e0| 32 32 0d 0a 57 69 64 74 | 68 20 3d 20 30 0d 0a 4e |22..Widt|h = 0..N|
|000011f0| 61 6d 65 20 3d 20 22 53 | 65 70 61 72 61 74 6f 72 |ame = "S|eparator|
|00001200| 32 22 0d 0a 00 00 00 01 | 00 00 00 0b 5f 74 62 72 |2"......|...._tbr|
|00001210| 65 64 69 74 69 6e 67 00 | 00 00 01 00 00 00 0a 53 |editing.|.......S|
|00001220| 65 70 61 72 61 74 6f 72 | 32 00 00 00 01 00 00 00 |eparator|2.......|
|00001230| 09 73 65 70 61 72 61 74 | 6f 72 00 00 00 01 00 00 |.separat|or......|
|00001240| 00 09 73 65 70 61 72 61 | 74 6f 72 00 00 00 01 00 |..separa|tor.....|
|00001250| 00 02 9e fe f2 ff 20 02 | 01 00 00 00 85 02 00 00 |...... .|........|
|00001260| 85 02 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001270| 00 00 00 00 00 00 00 00 | 00 00 a6 d9 01 00 00 00 |........|........|
|00001280| 25 00 00 00 fb 01 00 00 | 00 00 00 00 3c 02 00 00 |%.......|....<...|
|00001290| 13 00 00 00 16 02 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000012a0| fc 03 00 03 00 55 00 00 | 71 01 07 00 ae f7 00 00 |.....U..|q.......|
|000012b0| fe 26 00 25 fc 43 d9 12 | 00 5f 53 43 52 45 45 4e |.&.%.C..|._SCREEN|
|000012c0| 2e 41 63 74 69 76 65 46 | 6f 72 6d 62 fb 01 00 4f |.ActiveF|ormb...O|
|000012d0| 10 fd f9 05 3c 00 fe 0f | 00 54 f7 00 00 10 fc e1 |....<...|.T......|
|000012e0| 39 f7 01 00 fd fe 08 00 | 1b f9 05 48 00 fe 04 00 |9.......|...H....|
|000012f0| 42 fe 04 00 1e fe 0d 00 | 18 48 f9 05 59 00 f9 05 |B.......|.H..Y...|
|00001300| 6a 01 fe 17 00 0c fc f4 | 02 00 f4 03 00 f7 04 00 |j.......|........|
|00001310| f8 01 01 10 fd f9 05 bf | 00 fe 35 00 25 fc 43 d9 |........|..5.%.C.|
|00001320| 21 00 6f 46 6f 72 6d 2e | 41 63 74 69 76 65 43 6f |!.oForm.|ActiveCo|
|00001330| 6e 74 72 6f 6c 2e 46 6f | 6e 74 55 6e 64 65 72 6c |ntrol.Fo|ntUnderl|
|00001340| 69 6e 65 62 d9 01 00 55 | 0f fd f9 05 bb 00 fe 16 |ineb...U|........|
|00001350| 00 54 f4 00 00 f4 05 00 | f7 06 00 10 fc f4 02 00 |.T......|........|
|00001360| f7 07 00 fd fe 04 00 1e | fe 17 00 0c fc f4 02 00 |........|........|
|00001370| f4 03 00 f7 04 00 f8 01 | 02 10 fd f9 05 30 01 fe |........|.....0..|
|00001380| 2d 00 99 fc 43 fb 0d 00 | 46 6f 6e 74 55 6e 64 65 |-...C...|FontUnde|
|00001390| 72 6c 69 6e 65 f4 02 00 | f7 07 00 fb 07 00 54 45 |rline...|......TE|
|000013a0| 58 54 42 4f 58 f4 00 00 | f6 08 00 fd fe 2d 00 99 |XTBOX...|.....-..|
|000013b0| fc 43 fb 0d 00 46 6f 6e | 74 55 6e 64 65 72 6c 69 |.C...Fon|tUnderli|
|000013c0| 6e 65 f4 02 00 f7 07 00 | fb 07 00 45 44 49 54 42 |ne......|...EDITB|
|000013d0| 4f 58 f4 00 00 f6 08 00 | fd fe 17 00 0c fc f4 02 |OX......|........|
|000013e0| 00 f4 03 00 f7 04 00 f8 | 01 03 10 fd f9 05 6a 01 |........|......j.|
|000013f0| fe 23 00 99 fc 43 fb 0d | 00 46 6f 6e 74 55 6e 64 |.#...C..|.FontUnd|
|00001400| 65 72 6c 69 6e 65 f4 02 | 00 f7 07 00 f4 00 00 f6 |erline..|........|
|00001410| 08 00 fd fe 04 00 1c fe | 03 00 55 09 00 05 00 4f |........|..U....O|
|00001420| 46 4f 52 4d 0a 00 41 43 | 54 49 56 45 46 4f 52 4d |FORM..AC|TIVEFORM|
|00001430| 04 00 54 48 49 53 06 00 | 50 41 52 45 4e 54 0a 00 |..THIS..|PARENT..|
|00001440| 4e 41 50 50 4c 49 45 53 | 54 4f 0d 00 41 43 54 49 |NAPPLIES|TO..ACTI|
|00001450| 56 45 43 4f 4e 54 52 4f | 4c 0d 00 46 4f 4e 54 55 |VECONTRO|L..FONTU|
|00001460| 4e 44 45 52 4c 49 4e 45 | 05 00 56 41 4c 55 45 06 |NDERLINE|..VALUE.|
|00001470| 00 53 45 54 41 4c 4c 11 | 00 49 6e 74 65 72 61 63 |.SETALL.|.Interac|
|00001480| 74 69 76 65 43 68 61 6e | 67 65 2c 00 00 00 00 00 |tiveChan|ge,.....|
|00001490| ff ff 31 00 71 00 62 02 | f1 00 81 00 41 00 41 00 |..1.q.b.|....A.A.|
|000014a0| d2 00 71 01 51 03 61 01 | 41 00 71 01 d1 02 d1 02 |..q.Q.a.|A.q.....|
|000014b0| 72 01 31 02 41 00 32 00 | 00 00 00 00 00 00 00 00 |r.1.A.2.|........|
|000014c0| 00 00 00 00 00 00 00 00 | 01 00 00 00 1d 00 00 00 |........|........|
|000014d0| 55 02 00 00 01 00 00 00 | 00 29 00 00 00 85 02 00 |U.......|.)......|
|000014e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014f0| 00 00 00 00 01 00 00 02 | 60 50 52 4f 43 45 44 55 |........|`PROCEDU|
|00001500| 52 45 20 49 6e 74 65 72 | 61 63 74 69 76 65 43 68 |RE Inter|activeCh|
|00001510| 61 6e 67 65 0d 0a 4c 4f | 43 41 4c 20 6f 46 6f 72 |ange..LO|CAL oFor|
|00001520| 6d 0d 0a 0d 0a 49 46 20 | 54 59 50 45 28 22 5f 53 |m....IF |TYPE("_S|
|00001530| 43 52 45 45 4e 2e 41 63 | 74 69 76 65 46 6f 72 6d |CREEN.Ac|tiveForm|
|00001540| 22 29 20 3d 20 27 4f 27 | 0d 0a 09 6f 46 6f 72 6d |") = 'O'|...oForm|
|00001550| 20 3d 20 5f 53 43 52 45 | 45 4e 2e 41 63 74 69 76 | = _SCRE|EN.Activ|
|00001560| 65 46 6f 72 6d 0d 0a 45 | 4c 53 45 0d 0a 09 52 45 |eForm..E|LSE...RE|
|00001570| 54 55 52 4e 0d 0a 45 4e | 44 49 46 0d 0a 0d 0a 44 |TURN..EN|DIF....D|
|00001580| 4f 20 43 41 53 45 0d 0a | 09 43 41 53 45 20 54 48 |O CASE..|.CASE TH|
|00001590| 49 53 2e 50 61 72 65 6e | 74 2e 6e 41 70 70 6c 69 |IS.Paren|t.nAppli|
|000015a0| 65 73 54 6f 20 3d 20 31 | 09 26 26 20 43 75 72 72 |esTo = 1|.&& Curr|
|000015b0| 65 6e 74 20 43 6f 6e 74 | 72 6f 6c 0d 0a 09 09 49 |ent Cont|rol....I|
|000015c0| 46 20 54 59 50 45 28 22 | 6f 46 6f 72 6d 2e 41 63 |F TYPE("|oForm.Ac|
|000015d0| 74 69 76 65 43 6f 6e 74 | 72 6f 6c 2e 46 6f 6e 74 |tiveCont|rol.Font|
|000015e0| 55 6e 64 65 72 6c 69 6e | 65 22 29 20 23 22 55 22 |Underlin|e") #"U"|
|000015f0| 0d 0a 09 09 09 6f 46 6f | 72 6d 2e 41 63 74 69 76 |.....oFo|rm.Activ|
|00001600| 65 43 6f 6e 74 72 6f 6c | 2e 46 6f 6e 74 55 6e 64 |eControl|.FontUnd|
|00001610| 65 72 6c 69 6e 65 20 3d | 20 54 48 49 53 2e 56 61 |erline =| THIS.Va|
|00001620| 6c 75 65 0d 0a 09 09 45 | 4e 44 49 46 0d 0a 09 43 |lue....E|NDIF...C|
|00001630| 41 53 45 20 54 48 49 53 | 2e 50 61 72 65 6e 74 2e |ASE THIS|.Parent.|
|00001640| 6e 41 70 70 6c 69 65 73 | 54 6f 20 3d 20 32 09 26 |nApplies|To = 2.&|
|00001650| 26 20 41 6c 6c 20 74 65 | 78 74 62 6f 78 65 73 20 |& All te|xtboxes |
|00001660| 61 6e 64 20 65 64 69 74 | 62 6f 78 65 73 0d 0a 09 |and edit|boxes...|
|00001670| 09 6f 46 6f 72 6d 2e 53 | 65 74 41 6c 6c 28 27 46 |.oForm.S|etAll('F|
|00001680| 6f 6e 74 55 6e 64 65 72 | 6c 69 6e 65 27 2c 20 54 |ontUnder|line', T|
|00001690| 48 49 53 2e 56 61 6c 75 | 65 2c 20 27 54 45 58 54 |HIS.Valu|e, 'TEXT|
|000016a0| 42 4f 58 27 29 09 09 0d | 0a 09 09 6f 46 6f 72 6d |BOX')...|...oForm|
|000016b0| 2e 53 65 74 41 6c 6c 28 | 27 46 6f 6e 74 55 6e 64 |.SetAll(|'FontUnd|
|000016c0| 65 72 6c 69 6e 65 27 2c | 20 54 48 49 53 2e 56 61 |erline',| THIS.Va|
|000016d0| 6c 75 65 2c 20 27 45 44 | 49 54 42 4f 58 27 29 09 |lue, 'ED|ITBOX').|
|000016e0| 09 0d 0a 09 0d 0a 09 43 | 41 53 45 20 54 48 49 53 |.......C|ASE THIS|
|000016f0| 2e 50 61 72 65 6e 74 2e | 6e 41 70 70 6c 69 65 73 |.Parent.|nApplies|
|00001700| 54 6f 20 3d 20 33 09 26 | 26 20 41 6c 6c 20 43 6f |To = 3.&|& All Co|
|00001710| 6e 74 72 6f 6c 73 0d 0a | 09 09 6f 46 6f 72 6d 2e |ntrols..|..oForm.|
|00001720| 53 65 74 41 6c 6c 28 27 | 46 6f 6e 74 55 6e 64 65 |SetAll('|FontUnde|
|00001730| 72 6c 69 6e 65 27 2c 20 | 54 48 49 53 2e 56 61 6c |rline', |THIS.Val|
|00001740| 75 65 29 0d 0a 45 4e 44 | 43 41 53 45 0d 0a 0d 0a |ue)..END|CASE....|
|00001750| 45 4e 44 50 52 4f 43 0d | 0a 00 00 00 01 00 00 00 |ENDPROC.|........|
|00001760| c6 54 6f 70 20 3d 20 35 | 0d 0a 4c 65 66 74 20 3d |.Top = 5|..Left =|
|00001770| 20 32 33 34 0d 0a 48 65 | 69 67 68 74 20 3d 20 32 | 234..He|ight = 2|
|00001780| 32 0d 0a 57 69 64 74 68 | 20 3d 20 32 36 0d 0a 46 |2..Width| = 26..F|
|00001790| 6f 6e 74 4e 61 6d 65 20 | 3d 20 22 4d 53 20 53 61 |ontName |= "MS Sa|
|000017a0| 6e 73 20 53 65 72 69 66 | 22 0d 0a 46 6f 6e 74 53 |ns Serif|"..FontS|
|000017b0| 69 7a 65 20 3d 20 38 0d | 0a 46 6f 6e 74 55 6e 64 |ize = 8.|.FontUnd|
|000017c0| 65 72 6c 69 6e 65 20 3d | 20 2e 54 2e 0d 0a 43 61 |erline =| .T...Ca|
|000017d0| 70 74 69 6f 6e 20 3d 20 | 22 55 22 0d 0a 56 61 6c |ption = |"U"..Val|
|000017e0| 75 65 20 3d 20 2e 46 2e | 0d 0a 53 74 79 6c 65 20 |ue = .F.|..Style |
|000017f0| 3d 20 31 0d 0a 54 6f 6f | 6c 54 69 70 54 65 78 74 |= 1..Too|lTipText|
|00001800| 20 3d 20 22 55 6e 64 65 | 72 6c 69 6e 65 22 0d 0a | = "Unde|rline"..|
|00001810| 4e 61 6d 65 20 3d 20 22 | 63 68 6b 55 6e 64 65 72 |Name = "|chkUnder|
|00001820| 6c 69 6e 65 22 0d 0a 00 | 00 00 01 00 00 00 0b 5f |line"...|......._|
|00001830| 74 62 72 65 64 69 74 69 | 6e 67 00 00 00 01 00 00 |tbrediti|ng......|
|00001840| 00 0c 63 68 6b 55 6e 64 | 65 72 6c 69 6e 65 00 00 |..chkUnd|erline..|
|00001850| 00 01 00 00 00 08 63 68 | 65 63 6b 62 6f 78 00 00 |......ch|eckbox..|
|00001860| 00 01 00 00 00 09 5f 62 | 61 73 65 2e 76 63 78 00 |......_b|ase.vcx.|
|00001870| 00 00 01 00 00 00 09 5f | 63 68 65 63 6b 62 6f 78 |......._|checkbox|
|00001880| 00 00 00 01 00 00 02 8f | fe f2 ff 20 02 01 00 00 |........|... ....|
|00001890| 00 76 02 00 00 76 02 00 | 00 00 00 00 00 00 00 00 |.v...v..|........|
|000018a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|000018b0| 69 01 00 00 00 25 00 00 | 00 ec 01 00 00 00 00 00 |i....%..|........|
|000018c0| 00 2d 02 00 00 13 00 00 | 00 07 02 00 00 00 00 00 |.-......|........|
|000018d0| 00 00 00 00 00 fc 03 00 | 03 00 55 00 00 65 01 07 |........|..U..e..|
|000018e0| 00 ae f7 00 00 fe 26 00 | 25 fc 43 d9 12 00 5f 53 |......&.|%.C..._S|
|000018f0| 43 52 45 45 4e 2e 41 63 | 74 69 76 65 46 6f 72 6d |CREEN.Ac|tiveForm|
|00001900| 62 fb 01 00 4f 10 fd f9 | 05 3c 00 fe 0f 00 54 f7 |b...O...|.<....T.|
|00001910| 00 00 10 fc e1 39 f7 01 | 00 fd fe 08 00 1b f9 05 |.....9..|........|
|00001920| 48 00 fe 04 00 42 fe 04 | 00 1e fe 0d 00 18 48 f9 |H....B..|......H.|
|00001930| 05 59 00 f9 05 5e 01 fe | 17 00 0c fc f4 02 00 f4 |.Y...^..|........|
|00001940| 03 00 f7 04 00 f8 01 01 | 10 fd f9 05 bc 00 fe 32 |........|.......2|
|00001950| 00 25 fc 43 d9 1e 00 6f | 46 6f 72 6d 2e 41 63 74 |.%.C...o|Form.Act|
|00001960| 69 76 65 43 6f 6e 74 72 | 6f 6c 2e 46 6f 6e 74 49 |iveContr|ol.FontI|
|00001970| 74 61 6c 69 63 62 d9 01 | 00 55 0f fd f9 05 b8 00 |talicb..|.U......|
|00001980| fe 16 00 54 f4 00 00 f4 | 05 00 f7 06 00 10 fc f4 |...T....|........|
|00001990| 02 00 f7 07 00 fd fe 04 | 00 1e fe 17 00 0c fc f4 |........|........|
|000019a0| 02 00 f4 03 00 f7 04 00 | f8 01 02 10 fd f9 05 27 |........|.......'|
|000019b0| 01 fe 2a 00 99 fc 43 fb | 0a 00 46 6f 6e 74 49 74 |..*...C.|..FontIt|
|000019c0| 61 6c 69 63 f4 02 00 f7 | 07 00 fb 07 00 54 45 58 |alic....|.....TEX|
|000019d0| 54 42 4f 58 f4 00 00 f6 | 08 00 fd fe 2a 00 99 fc |TBOX....|....*...|
|000019e0| 43 fb 0a 00 46 6f 6e 74 | 49 74 61 6c 69 63 f4 02 |C...Font|Italic..|
|000019f0| 00 f7 07 00 fb 07 00 45 | 44 49 54 42 4f 58 f4 00 |.......E|DITBOX..|
|00001a00| 00 f6 08 00 fd fe 17 00 | 0c fc f4 02 00 f4 03 00 |........|........|
|00001a10| f7 04 00 f8 01 03 10 fd | f9 05 5e 01 fe 20 00 99 |........|..^.. ..|
|00001a20| fc 43 fb 0a 00 46 6f 6e | 74 49 74 61 6c 69 63 f4 |.C...Fon|tItalic.|
|00001a30| 02 00 f7 07 00 f4 00 00 | f6 08 00 fd fe 04 00 1c |........|........|
|00001a40| fe 03 00 55 09 00 05 00 | 4f 46 4f 52 4d 0a 00 41 |...U....|OFORM..A|
|00001a50| 43 54 49 56 45 46 4f 52 | 4d 04 00 54 48 49 53 06 |CTIVEFOR|M..THIS.|
|00001a60| 00 50 41 52 45 4e 54 0a | 00 4e 41 50 50 4c 49 45 |.PARENT.|.NAPPLIE|
|00001a70| 53 54 4f 0d 00 41 43 54 | 49 56 45 43 4f 4e 54 52 |STO..ACT|IVECONTR|
|00001a80| 4f 4c 0a 00 46 4f 4e 54 | 49 54 41 4c 49 43 05 00 |OL..FONT|ITALIC..|
|00001a90| 56 41 4c 55 45 06 00 53 | 45 54 41 4c 4c 11 00 49 |VALUE..S|ETALL..I|
|00001aa0| 6e 74 65 72 61 63 74 69 | 76 65 43 68 61 6e 67 65 |nteracti|veChange|
|00001ab0| 2c 00 00 00 00 00 ff ff | 31 00 71 00 62 02 f1 00 |,.......|1.q.b...|
|00001ac0| 81 00 41 00 41 00 d2 00 | 71 01 21 03 61 01 41 00 |..A.A...|q.!.a.A.|
|00001ad0| 71 01 a1 02 a1 02 72 01 | 01 02 42 00 32 00 00 00 |q.....r.|..B.2...|
|00001ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 01 00 |........|........|
|00001af0| 00 00 1d 00 00 00 48 02 | 00 00 01 00 00 00 00 29 |......H.|.......)|
|00001b00| 00 00 00 76 02 00 00 00 | 00 00 00 00 00 00 00 00 |...v....|........|
|00001b10| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 02 53 50 |........|......SP|
|00001b20| 52 4f 43 45 44 55 52 45 | 20 49 6e 74 65 72 61 63 |ROCEDURE| Interac|
|00001b30| 74 69 76 65 43 68 61 6e | 67 65 0d 0a 4c 4f 43 41 |tiveChan|ge..LOCA|
|00001b40| 4c 20 6f 46 6f 72 6d 0d | 0a 0d 0a 49 46 20 54 59 |L oForm.|...IF TY|
|00001b50| 50 45 28 22 5f 53 43 52 | 45 45 4e 2e 41 63 74 69 |PE("_SCR|EEN.Acti|
|00001b60| 76 65 46 6f 72 6d 22 29 | 20 3d 20 27 4f 27 0d 0a |veForm")| = 'O'..|
|00001b70| 09 6f 46 6f 72 6d 20 3d | 20 5f 53 43 52 45 45 4e |.oForm =| _SCREEN|
|00001b80| 2e 41 63 74 69 76 65 46 | 6f 72 6d 0d 0a 45 4c 53 |.ActiveF|orm..ELS|
|00001b90| 45 0d 0a 09 52 45 54 55 | 52 4e 0d 0a 45 4e 44 49 |E...RETU|RN..ENDI|
|00001ba0| 46 0d 0a 0d 0a 44 4f 20 | 43 41 53 45 0d 0a 09 43 |F....DO |CASE...C|
|00001bb0| 41 53 45 20 54 48 49 53 | 2e 50 61 72 65 6e 74 2e |ASE THIS|.Parent.|
|00001bc0| 6e 41 70 70 6c 69 65 73 | 54 6f 20 3d 20 31 09 26 |nApplies|To = 1.&|
|00001bd0| 26 20 43 75 72 72 65 6e | 74 20 43 6f 6e 74 72 6f |& Curren|t Contro|
|00001be0| 6c 0d 0a 09 09 49 46 20 | 54 59 50 45 28 22 6f 46 |l....IF |TYPE("oF|
|00001bf0| 6f 72 6d 2e 41 63 74 69 | 76 65 43 6f 6e 74 72 6f |orm.Acti|veContro|
|00001c00| 6c 2e 46 6f 6e 74 49 74 | 61 6c 69 63 22 29 23 22 |l.FontIt|alic")#"|
|00001c10| 55 22 0d 0a 09 09 09 6f | 46 6f 72 6d 2e 41 63 74 |U".....o|Form.Act|
|00001c20| 69 76 65 43 6f 6e 74 72 | 6f 6c 2e 46 6f 6e 74 49 |iveContr|ol.FontI|
|00001c30| 74 61 6c 69 63 20 3d 20 | 54 48 49 53 2e 56 61 6c |talic = |THIS.Val|
|00001c40| 75 65 0d 0a 09 09 45 4e | 44 49 46 09 0d 0a 09 43 |ue....EN|DIF....C|
|00001c50| 41 53 45 20 54 48 49 53 | 2e 50 61 72 65 6e 74 2e |ASE THIS|.Parent.|
|00001c60| 6e 41 70 70 6c 69 65 73 | 54 6f 20 3d 20 32 09 26 |nApplies|To = 2.&|
|00001c70| 26 20 41 6c 6c 20 74 65 | 78 74 62 6f 78 65 73 20 |& All te|xtboxes |
|00001c80| 61 6e 64 20 65 64 69 74 | 62 6f 78 65 73 0d 0a 09 |and edit|boxes...|
|00001c90| 09 6f 46 6f 72 6d 2e 53 | 65 74 41 6c 6c 28 27 46 |.oForm.S|etAll('F|
|00001ca0| 6f 6e 74 49 74 61 6c 69 | 63 27 2c 20 54 48 49 53 |ontItali|c', THIS|
|00001cb0| 2e 56 61 6c 75 65 2c 20 | 27 54 45 58 54 42 4f 58 |.Value, |'TEXTBOX|
|00001cc0| 27 29 09 09 0d 0a 09 09 | 6f 46 6f 72 6d 2e 53 65 |')......|oForm.Se|
|00001cd0| 74 41 6c 6c 28 27 46 6f | 6e 74 49 74 61 6c 69 63 |tAll('Fo|ntItalic|
|00001ce0| 27 2c 20 54 48 49 53 2e | 56 61 6c 75 65 2c 20 27 |', THIS.|Value, '|
|00001cf0| 45 44 49 54 42 4f 58 27 | 29 09 09 0d 0a 09 0d 0a |EDITBOX'|).......|
|00001d00| 09 43 41 53 45 20 54 48 | 49 53 2e 50 61 72 65 6e |.CASE TH|IS.Paren|
|00001d10| 74 2e 6e 41 70 70 6c 69 | 65 73 54 6f 20 3d 20 33 |t.nAppli|esTo = 3|
|00001d20| 09 26 26 20 41 6c 6c 20 | 43 6f 6e 74 72 6f 6c 73 |.&& All |Controls|
|00001d30| 0d 0a 09 09 6f 46 6f 72 | 6d 2e 53 65 74 41 6c 6c |....oFor|m.SetAll|
|00001d40| 28 27 46 6f 6e 74 49 74 | 61 6c 69 63 27 2c 20 54 |('FontIt|alic', T|
|00001d50| 48 49 53 2e 56 61 6c 75 | 65 29 0d 0a 0d 0a 45 4e |HIS.Valu|e)....EN|
|00001d60| 44 43 41 53 45 0d 0a 0d | 0a 45 4e 44 50 52 4f 43 |DCASE...|.ENDPROC|
|00001d70| 0d 0a 00 00 00 01 00 00 | 00 bd 54 6f 70 20 3d 20 |........|..Top = |
|00001d80| 35 0d 0a 4c 65 66 74 20 | 3d 20 32 30 39 0d 0a 48 |5..Left |= 209..H|
|00001d90| 65 69 67 68 74 20 3d 20 | 32 32 0d 0a 57 69 64 74 |eight = |22..Widt|
|00001da0| 68 20 3d 20 32 36 0d 0a | 46 6f 6e 74 49 74 61 6c |h = 26..|FontItal|
|00001db0| 69 63 20 3d 20 2e 54 2e | 0d 0a 46 6f 6e 74 4e 61 |ic = .T.|..FontNa|
|00001dc0| 6d 65 20 3d 20 22 4d 53 | 20 53 61 6e 73 20 53 65 |me = "MS| Sans Se|
|00001dd0| 72 69 66 22 0d 0a 46 6f | 6e 74 53 69 7a 65 20 3d |rif"..Fo|ntSize =|
|00001de0| 20 38 0d 0a 43 61 70 74 | 69 6f 6e 20 3d 20 22 49 | 8..Capt|ion = "I|
|00001df0| 22 0d 0a 56 61 6c 75 65 | 20 3d 20 2e 46 2e 0d 0a |"..Value| = .F...|
|00001e00| 53 74 79 6c 65 20 3d 20 | 31 0d 0a 54 6f 6f 6c 54 |Style = |1..ToolT|
|00001e10| 69 70 54 65 78 74 20 3d | 20 22 49 74 61 6c 69 63 |ipText =| "Italic|
|00001e20| 22 0d 0a 4e 61 6d 65 20 | 3d 20 22 63 68 6b 49 74 |"..Name |= "chkIt|
|00001e30| 61 6c 69 63 22 0d 0a 00 | 00 00 01 00 00 00 0b 5f |alic"...|......._|
|00001e40| 74 62 72 65 64 69 74 69 | 6e 67 00 00 00 01 00 00 |tbrediti|ng......|
|00001e50| 00 09 63 68 6b 49 74 61 | 6c 69 63 00 00 00 01 00 |..chkIta|lic.....|
|00001e60| 00 00 08 63 68 65 63 6b | 62 6f 78 00 00 00 01 00 |...check|box.....|
|00001e70| 00 00 09 5f 62 61 73 65 | 2e 76 63 78 00 00 00 01 |..._base|.vcx....|
|00001e80| 00 00 00 09 5f 63 68 65 | 63 6b 62 6f 78 00 00 00 |...._che|ckbox...|
|00001e90| 01 00 00 02 85 fe f2 ff | 20 02 01 00 00 00 6c 02 |........| .....l.|
|00001ea0| 00 00 6c 02 00 00 00 00 | 00 00 00 00 00 00 00 00 |..l.....|........|
|00001eb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 c6 fb 01 00 |........|........|
|00001ec0| 00 00 25 00 00 00 e2 01 | 00 00 00 00 00 00 23 02 |..%.....|......#.|
|00001ed0| 00 00 13 00 00 00 fd 01 | 00 00 00 00 00 00 00 00 |........|........|
|00001ee0| 00 00 fc 03 00 03 00 55 | 00 00 5d 01 07 00 ae f7 |.......U|..].....|
|00001ef0| 00 00 fe 26 00 25 fc 43 | d9 12 00 5f 53 43 52 45 |...&.%.C|..._SCRE|
|00001f00| 45 4e 2e 41 63 74 69 76 | 65 46 6f 72 6d 62 fb 01 |EN.Activ|eFormb..|
|00001f10| 00 4f 10 fd f9 05 3c 00 | fe 0f 00 54 f7 00 00 10 |.O....<.|...T....|
|00001f20| fc e1 39 f7 01 00 fd fe | 08 00 1b f9 05 48 00 fe |..9.....|.....H..|
|00001f30| 04 00 42 fe 04 00 1e fe | 0d 00 18 48 f9 05 59 00 |..B.....|...H..Y.|
|00001f40| f9 05 56 01 fe 17 00 0c | fc f4 02 00 f4 03 00 f7 |..V.....|........|
|00001f50| 04 00 f8 01 01 10 fd f9 | 05 ba 00 fe 30 00 25 fc |........|....0.%.|
|00001f60| 43 d9 1c 00 6f 46 6f 72 | 6d 2e 41 63 74 69 76 65 |C...oFor|m.Active|
|00001f70| 43 6f 6e 74 72 6f 6c 2e | 46 6f 6e 74 42 6f 6c 64 |Control.|FontBold|
|00001f80| 62 d9 01 00 55 0f fd f9 | 05 b6 00 fe 16 00 54 f4 |b...U...|......T.|
|00001f90| 00 00 f4 05 00 f7 06 00 | 10 fc f4 02 00 f7 07 00 |........|........|
|00001fa0| fd fe 04 00 1e fe 17 00 | 0c fc f4 02 00 f4 03 00 |........|........|
|00001fb0| f7 04 00 f8 01 02 10 fd | f9 05 21 01 fe 28 00 99 |........|..!..(..|
|00001fc0| fc 43 fb 08 00 46 6f 6e | 74 42 6f 6c 64 f4 02 00 |.C...Fon|tBold...|
|00001fd0| f7 07 00 fb 07 00 54 45 | 58 54 42 4f 58 f4 00 00 |......TE|XTBOX...|
|00001fe0| f6 08 00 fd fe 28 00 99 | fc 43 fb 08 00 46 6f 6e |.....(..|.C...Fon|
|00001ff0| 74 42 6f 6c 64 f4 02 00 | f7 07 00 fb 07 00 45 44 |tBold...|......ED|
|00002000| 49 54 42 4f 58 f4 00 00 | f6 08 00 fd fe 17 00 0c |ITBOX...|........|
|00002010| fc f4 02 00 f4 03 00 f7 | 04 00 f8 01 03 10 fd f9 |........|........|
|00002020| 05 56 01 fe 1e 00 99 fc | 43 fb 08 00 46 6f 6e 74 |.V......|C...Font|
|00002030| 42 6f 6c 64 f4 02 00 f7 | 07 00 f4 00 00 f6 08 00 |Bold....|........|
|00002040| fd fe 04 00 1c fe 03 00 | 55 09 00 05 00 4f 46 4f |........|U....OFO|
|00002050| 52 4d 0a 00 41 43 54 49 | 56 45 46 4f 52 4d 04 00 |RM..ACTI|VEFORM..|
|00002060| 54 48 49 53 06 00 50 41 | 52 45 4e 54 0a 00 4e 41 |THIS..PA|RENT..NA|
|00002070| 50 50 4c 49 45 53 54 4f | 0d 00 41 43 54 49 56 45 |PPLIESTO|..ACTIVE|
|00002080| 43 4f 4e 54 52 4f 4c 08 | 00 46 4f 4e 54 42 4f 4c |CONTROL.|.FONTBOL|
|00002090| 44 05 00 56 41 4c 55 45 | 06 00 53 45 54 41 4c 4c |D..VALUE|..SETALL|
|000020a0| 11 00 49 6e 74 65 72 61 | 63 74 69 76 65 43 68 61 |..Intera|ctiveCha|
|000020b0| 6e 67 65 2c 00 00 00 00 | 00 ff ff 31 00 71 00 62 |nge,....|...1.q.b|
|000020c0| 02 f1 00 81 00 41 00 41 | 00 d2 00 71 01 01 03 61 |.....A.A|...q...a|
|000020d0| 01 41 00 72 01 81 02 81 | 02 72 01 e1 01 41 00 32 |.A.r....|.r...A.2|
|000020e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000020f0| 00 01 00 00 00 1d 00 00 | 00 3f 02 00 00 01 00 00 |........|.?......|
|00002100| 00 00 29 00 00 00 6c 02 | 00 00 00 00 00 00 00 00 |..)...l.|........|
|00002110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 01 00 00 |........|........|
|00002120| 02 4a 50 52 4f 43 45 44 | 55 52 45 20 49 6e 74 65 |.JPROCED|URE Inte|
|00002130| 72 61 63 74 69 76 65 43 | 68 61 6e 67 65 0d 0a 4c |ractiveC|hange..L|
|00002140| 4f 43 41 4c 20 6f 46 6f | 72 6d 0d 0a 0d 0a 49 46 |OCAL oFo|rm....IF|
|00002150| 20 54 59 50 45 28 22 5f | 53 43 52 45 45 4e 2e 41 | TYPE("_|SCREEN.A|
|00002160| 63 74 69 76 65 46 6f 72 | 6d 22 29 20 3d 20 27 4f |ctiveFor|m") = 'O|
|00002170| 27 0d 0a 09 6f 46 6f 72 | 6d 20 3d 20 5f 53 43 52 |'...oFor|m = _SCR|
|00002180| 45 45 4e 2e 41 63 74 69 | 76 65 46 6f 72 6d 0d 0a |EEN.Acti|veForm..|
|00002190| 45 4c 53 45 0d 0a 09 52 | 45 54 55 52 4e 0d 0a 45 |ELSE...R|ETURN..E|
|000021a0| 4e 44 49 46 0d 0a 0d 0a | 44 4f 20 43 41 53 45 0d |NDIF....|DO CASE.|
|000021b0| 0a 09 43 41 53 45 20 54 | 48 49 53 2e 50 61 72 65 |..CASE T|HIS.Pare|
|000021c0| 6e 74 2e 6e 41 70 70 6c | 69 65 73 54 6f 20 3d 20 |nt.nAppl|iesTo = |
|000021d0| 31 09 26 26 20 43 75 72 | 72 65 6e 74 20 43 6f 6e |1.&& Cur|rent Con|
|000021e0| 74 72 6f 6c 0d 0a 09 09 | 49 46 20 54 59 50 45 28 |trol....|IF TYPE(|
|000021f0| 22 6f 46 6f 72 6d 2e 41 | 63 74 69 76 65 43 6f 6e |"oForm.A|ctiveCon|
|00002200| 74 72 6f 6c 2e 46 6f 6e | 74 42 6f 6c 64 22 29 23 |trol.Fon|tBold")#|
|00002210| 22 55 22 0d 0a 09 09 09 | 6f 46 6f 72 6d 2e 41 63 |"U".....|oForm.Ac|
|00002220| 74 69 76 65 43 6f 6e 74 | 72 6f 6c 2e 46 6f 6e 74 |tiveCont|rol.Font|
|00002230| 42 6f 6c 64 20 3d 20 54 | 48 49 53 2e 56 61 6c 75 |Bold = T|HIS.Valu|
|00002240| 65 0d 0a 09 09 45 4e 44 | 49 46 0d 0a 09 09 0d 0a |e....END|IF......|
|00002250| 09 43 41 53 45 20 54 48 | 49 53 2e 50 61 72 65 6e |.CASE TH|IS.Paren|
|00002260| 74 2e 6e 41 70 70 6c 69 | 65 73 54 6f 20 3d 20 32 |t.nAppli|esTo = 2|
|00002270| 09 26 26 20 41 6c 6c 20 | 74 65 78 74 62 6f 78 65 |.&& All |textboxe|
|00002280| 73 20 61 6e 64 20 65 64 | 69 74 62 6f 78 65 73 0d |s and ed|itboxes.|
|00002290| 0a 09 09 6f 46 6f 72 6d | 2e 53 65 74 41 6c 6c 28 |...oForm|.SetAll(|
|000022a0| 27 46 6f 6e 74 42 6f 6c | 64 27 2c 20 54 48 49 53 |'FontBol|d', THIS|
|000022b0| 2e 56 61 6c 75 65 2c 20 | 27 54 45 58 54 42 4f 58 |.Value, |'TEXTBOX|
|000022c0| 27 29 09 09 0d 0a 09 09 | 6f 46 6f 72 6d 2e 53 65 |')......|oForm.Se|
|000022d0| 74 41 6c 6c 28 27 46 6f | 6e 74 42 6f 6c 64 27 2c |tAll('Fo|ntBold',|
|000022e0| 20 54 48 49 53 2e 56 61 | 6c 75 65 2c 20 27 45 44 | THIS.Va|lue, 'ED|
|000022f0| 49 54 42 4f 58 27 29 09 | 09 0d 0a 09 0d 0a 09 43 |ITBOX').|.......C|
|00002300| 41 53 45 20 54 48 49 53 | 2e 50 61 72 65 6e 74 2e |ASE THIS|.Parent.|
|00002310| 6e 41 70 70 6c 69 65 73 | 54 6f 20 3d 20 33 09 26 |nApplies|To = 3.&|
|00002320| 26 20 41 6c 6c 20 43 6f | 6e 74 72 6f 6c 73 0d 0a |& All Co|ntrols..|
|00002330| 09 09 6f 46 6f 72 6d 2e | 53 65 74 41 6c 6c 28 27 |..oForm.|SetAll('|
|00002340| 46 6f 6e 74 42 6f 6c 64 | 27 2c 20 54 48 49 53 2e |FontBold|', THIS.|
|00002350| 56 61 6c 75 65 29 0d 0a | 45 4e 44 43 41 53 45 0d |Value)..|ENDCASE.|
|00002360| 0a 0d 0a 45 4e 44 50 52 | 4f 43 0d 0a 00 00 00 01 |...ENDPR|OC......|
|00002370| 00 00 00 b7 54 6f 70 20 | 3d 20 35 0d 0a 4c 65 66 |....Top |= 5..Lef|
|00002380| 74 20 3d 20 31 38 34 0d | 0a 48 65 69 67 68 74 20 |t = 184.|.Height |
|00002390| 3d 20 32 32 0d 0a 57 69 | 64 74 68 20 3d 20 32 36 |= 22..Wi|dth = 26|
|000023a0| 0d 0a 46 6f 6e 74 42 6f | 6c 64 20 3d 20 2e 54 2e |..FontBo|ld = .T.|
|000023b0| 0d 0a 46 6f 6e 74 4e 61 | 6d 65 20 3d 20 22 4d 53 |..FontNa|me = "MS|
|000023c0| 20 53 61 6e 73 20 53 65 | 72 69 66 22 0d 0a 46 6f | Sans Se|rif"..Fo|
|000023d0| 6e 74 53 69 7a 65 20 3d | 20 38 0d 0a 43 61 70 74 |ntSize =| 8..Capt|
|000023e0| 69 6f 6e 20 3d 20 22 42 | 22 0d 0a 56 61 6c 75 65 |ion = "B|"..Value|
|000023f0| 20 3d 20 2e 46 2e 0d 0a | 53 74 79 6c 65 20 3d 20 | = .F...|Style = |
|00002400| 31 0d 0a 54 6f 6f 6c 54 | 69 70 54 65 78 74 20 3d |1..ToolT|ipText =|
|00002410| 20 22 42 6f 6c 64 22 0d | 0a 4e 61 6d 65 20 3d 20 | "Bold".|.Name = |
|00002420| 22 63 68 6b 42 6f 6c 64 | 22 0d 0a 00 00 00 01 00 |"chkBold|".......|
|00002430| 00 00 0b 5f 74 62 72 65 | 64 69 74 69 6e 67 00 00 |..._tbre|diting..|
|00002440| 00 01 00 00 00 07 63 68 | 6b 42 6f 6c 64 00 00 00 |......ch|kBold...|
|00002450| 01 00 00 00 08 63 68 65 | 63 6b 62 6f 78 00 00 00 |.....che|ckbox...|
|00002460| 01 00 00 00 09 5f 62 61 | 73 65 2e 76 63 78 00 00 |....._ba|se.vcx..|
|00002470| 00 01 00 00 00 09 5f 63 | 68 65 63 6b 62 6f 78 00 |......_c|heckbox.|
|00002480| 00 00 01 00 00 00 42 54 | 6f 70 20 3d 20 35 0d 0a |......BT|op = 5..|
|00002490| 4c 65 66 74 20 3d 20 31 | 38 34 0d 0a 48 65 69 67 |Left = 1|84..Heig|
|000024a0| 68 74 20 3d 20 32 32 0d | 0a 57 69 64 74 68 20 3d |ht = 22.|.Width =|
|000024b0| 20 30 0d 0a 4e 61 6d 65 | 20 3d 20 22 53 65 70 61 | 0..Name| = "Sepa|
|000024c0| 72 61 74 6f 72 31 22 0d | 0a 00 00 00 01 00 00 00 |rator1".|........|
|000024d0| 0b 5f 74 62 72 65 64 69 | 74 69 6e 67 00 00 00 01 |._tbredi|ting....|
|000024e0| 00 00 00 0a 53 65 70 61 | 72 61 74 6f 72 31 00 00 |....Sepa|rator1..|
|000024f0| 00 01 00 00 00 09 73 65 | 70 61 72 61 74 6f 72 00 |......se|parator.|
|00002500| 00 00 01 00 00 00 09 73 | 65 70 61 72 61 74 6f 72 |.......s|eparator|
|00002510| 00 00 00 01 00 00 04 e6 | fe f2 ff 20 02 01 00 00 |........|... ....|
|00002520| 00 cd 04 00 00 cd 04 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 15 |........|........|
|00002540| d1 02 00 00 00 25 00 00 | 00 fa 03 00 00 00 00 00 |.....%..|........|
|00002550| 00 74 04 00 00 28 00 00 | 00 24 04 00 00 00 00 00 |.t...(..|.$......|
|00002560| 00 00 00 00 00 fc 03 00 | 03 00 55 00 00 a4 01 0f |........|..U.....|
|00002570| 00 af f7 00 00 07 f7 01 | 00 07 f7 02 00 fe 0b 00 |........|........|
|00002580| ae f7 03 00 07 f7 04 00 | fe 0d 00 18 48 f9 05 27 |........|....H..'|
|00002590| 00 f9 05 9d 01 fe 12 00 | 0c fc f7 00 00 f9 04 59 |........|.......Y|
|000025a0| 07 10 fd f9 05 d0 00 fe | 42 00 52 2c ce fc f8 01 |........|B.R,....|
|000025b0| 02 fd fc d9 32 00 54 68 | 65 20 63 6f 6e 74 72 6f |....2.Th|e contro|
|000025c0| 6c 20 64 6f 65 73 6e 27 | 74 20 73 75 70 70 6f 72 |l doesn'|t suppor|
|000025d0| 74 20 74 68 65 20 73 65 | 6c 65 63 74 65 64 20 66 |t the se|lected f|
|000025e0| 6f 6e 74 73 69 7a 65 2e | fd fe 38 00 25 fc 43 d9 |ontsize.|..8.%.C.|
|000025f0| 24 00 41 70 70 6c 69 63 | 61 74 69 6f 6e 2e 41 63 |$.Applic|ation.Ac|
|00002600| 74 69 76 65 46 6f 72 6d | 2e 41 63 74 69 76 65 43 |tiveForm|.ActiveC|
|00002610| 6f 6e 74 72 6f 6c 62 d9 | 01 00 4f 10 fd f9 05 cc |ontrolb.|..O.....|
|00002620| 00 fe 19 00 99 fc 43 f4 | 08 00 f4 09 00 f7 0a 00 |......C.|........|
|00002630| f4 05 00 f4 06 00 f6 07 | 00 fd fe 04 00 1e fe 08 |........|........|
|00002640| 00 32 f9 05 9d 01 fe 66 | 00 54 f7 03 00 10 fc d9 |.2.....f|.T......|
|00002650| 0e 00 45 72 72 6f 72 20 | 4e 75 6d 62 65 72 3a 20 |..Error |Number: |
|00002660| 43 43 f7 00 00 5a 9b 06 | 43 f8 02 0d 20 06 43 f8 |CC...Z..|C... .C.|
|00002670| 02 0d 20 06 d9 0f 00 45 | 72 72 6f 72 20 4d 65 73 |.. ....E|rror Mes|
|00002680| 73 61 67 65 3a 20 06 43 | 45 06 43 f8 02 0d 20 06 |sage: .C|E.C... .|
|00002690| 43 f8 02 0d 20 06 d9 0b | 00 50 72 6f 63 65 64 75 |C... ...|.Procedu|
|000026a0| 72 65 3a 20 06 43 f8 01 | 01 74 06 fd fe 14 00 54 |re: .C..|.t.....T|
|000026b0| f7 04 00 10 fc 43 f7 03 | 00 f9 04 32 02 ea 78 fd |.....C..|...2..x.|
|000026c0| fe 0d 00 18 48 f9 05 5f | 01 f9 05 99 01 fe 13 00 |....H.._|........|
|000026d0| 0c fc f5 0d f7 04 00 f8 | 01 03 10 fd f9 05 76 01 |........|......v.|
|000026e0| fe 04 00 0b fe 13 00 0c | fc f5 0d f7 04 00 f8 01 |........|........|
|000026f0| 04 10 fd f9 05 8d 01 fe | 04 00 58 fe 08 00 32 f9 |........|..X...2.|
|00002700| 05 99 01 fe 04 00 42 fe | 04 00 1c fe 04 00 1c fe |......B.|........|
|00002710| 03 00 55 0b 00 06 00 4e | 45 52 52 4f 52 07 00 43 |..U....N|ERROR..C|
|00002720| 4d 45 54 48 4f 44 05 00 | 4e 4c 49 4e 45 05 00 4c |METHOD..|NLINE..L|
|00002730| 43 4d 53 47 08 00 4c 4e | 41 4e 53 57 45 52 04 00 |CMSG..LN|ANSWER..|
|00002740| 54 48 49 53 06 00 50 41 | 52 45 4e 54 07 00 52 45 |THIS..PA|RENT..RE|
|00002750| 46 52 45 53 48 0b 00 41 | 50 50 4c 49 43 41 54 49 |FRESH..A|PPLICATI|
|00002760| 4f 4e 0a 00 41 43 54 49 | 56 45 46 4f 52 4d 0d 00 |ON..ACTI|VEFORM..|
|00002770| 41 43 54 49 56 45 43 4f | 4e 54 52 4f 4c 65 01 07 |ACTIVECO|NTROLe..|
|00002780| 00 ae f7 00 00 fe 26 00 | 25 fc 43 d9 12 00 5f 53 |......&.|%.C..._S|
|00002790| 43 52 45 45 4e 2e 41 63 | 74 69 76 65 46 6f 72 6d |CREEN.Ac|tiveForm|
|000027a0| 62 d9 01 00 4f 10 fd f9 | 05 3c 00 fe 0f 00 54 f7 |b...O...|.<....T.|
|000027b0| 00 00 10 fc e1 39 f7 01 | 00 fd fe 08 00 1b f9 05 |.....9..|........|
|000027c0| 48 00 fe 04 00 42 fe 04 | 00 1e fe 0d 00 18 48 f9 |H....B..|......H.|
|000027d0| 05 59 00 f9 05 5e 01 fe | 17 00 0c fc f4 02 00 f4 |.Y...^..|........|
|000027e0| 03 00 f7 04 00 f8 01 01 | 10 fd f9 05 bc 00 fe 30 |........|.......0|
|000027f0| 00 25 fc 43 d9 1c 00 6f | 46 6f 72 6d 2e 41 63 74 |.%.C...o|Form.Act|
|00002800| 69 76 65 43 6f 6e 74 72 | 6f 6c 2e 46 6f 6e 74 73 |iveContr|ol.Fonts|
|00002810| 69 7a 65 62 d9 01 00 55 | 0f fd f9 05 b8 00 fe 18 |izeb...U|........|
|00002820| 00 54 f4 00 00 f4 05 00 | f7 06 00 10 fc 43 f4 02 |.T......|.....C..|
|00002830| 00 f7 07 00 67 fd fe 04 | 00 1e fe 17 00 0c fc f4 |....g...|........|
|00002840| 02 00 f4 03 00 f7 04 00 | f8 01 02 10 fd f9 05 27 |........|.......'|
|00002850| 01 fe 2a 00 99 fc 43 fb | 08 00 46 6f 6e 74 53 69 |..*...C.|..FontSi|
|00002860| 7a 65 43 f4 02 00 f7 07 | 00 67 fb 07 00 54 45 58 |zeC.....|.g...TEX|
|00002870| 54 42 4f 58 f4 00 00 f6 | 08 00 fd fe 2a 00 99 fc |TBOX....|....*...|
|00002880| 43 fb 08 00 46 6f 6e 74 | 53 69 7a 65 43 f4 02 00 |C...Font|SizeC...|
|00002890| f7 07 00 67 fb 07 00 45 | 44 49 54 42 4f 58 f4 00 |...g...E|DITBOX..|
|000028a0| 00 f6 08 00 fd fe 17 00 | 0c fc f4 02 00 f4 03 00 |........|........|
|000028b0| f7 04 00 f8 01 03 10 fd | f9 05 5e 01 fe 20 00 99 |........|..^.. ..|
|000028c0| fc 43 fb 08 00 46 6f 6e | 74 53 69 7a 65 43 f4 02 |.C...Fon|tSizeC..|
|000028d0| 00 f7 07 00 67 f4 00 00 | f6 08 00 fd fe 04 00 1c |....g...|........|
|000028e0| fe 03 00 55 09 00 05 00 | 4f 46 4f 52 4d 0a 00 41 |...U....|OFORM..A|
|000028f0| 43 54 49 56 45 46 4f 52 | 4d 04 00 54 48 49 53 06 |CTIVEFOR|M..THIS.|
|00002900| 00 50 41 52 45 4e 54 0a | 00 4e 41 50 50 4c 49 45 |.PARENT.|.NAPPLIE|
|00002910| 53 54 4f 0d 00 41 43 54 | 49 56 45 43 4f 4e 54 52 |STO..ACT|IVECONTR|
|00002920| 4f 4c 08 00 46 4f 4e 54 | 53 49 5a 45 05 00 56 41 |OL..FONT|SIZE..VA|
|00002930| 4c 55 45 06 00 53 45 54 | 41 4c 4c 05 00 45 72 72 |LUE..SET|ALL..Err|
|00002940| 6f 72 2c 00 00 00 00 00 | ff ff 11 00 49 6e 74 65 |or,.....|....Inte|
|00002950| 72 61 63 74 69 76 65 43 | 68 61 6e 67 65 3c 02 00 |ractiveC|hange<..|
|00002960| 00 00 00 ff ff 31 00 f1 | 00 b8 00 d1 00 21 01 21 |.....1..|.....!.!|
|00002970| 04 81 03 91 01 41 00 82 | 00 66 06 41 01 d1 00 31 |.....A..|.f.A...1|
|00002980| 01 41 00 31 01 41 00 81 | 00 41 00 41 00 41 00 33 |.A.1.A..|.A.A.A.3|
|00002990| 00 71 00 61 02 f1 00 81 | 00 41 00 41 00 d2 00 71 |.q.a....|.A.A...q|
|000029a0| 01 01 03 81 01 41 00 72 | 01 a1 02 a1 02 72 01 01 |.....A.r|.....r..|
|000029b0| 02 42 00 32 00 00 00 00 | 00 00 00 00 00 00 00 00 |.B.2....|........|
|000029c0| 00 00 00 00 00 01 00 00 | 00 11 00 00 00 06 04 00 |........|........|
|000029d0| 00 01 00 00 00 16 00 00 | 00 2e 04 00 00 64 06 00 |........|.....d..|
|000029e0| 00 25 00 00 00 00 29 00 | 00 00 cd 04 00 00 00 00 |.%....).|........|
|000029f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a00| 00 01 00 00 06 6f 50 52 | 4f 43 45 44 55 52 45 20 |.....oPR|OCEDURE |
|00002a10| 45 72 72 6f 72 0d 0a 4c | 50 41 52 41 4d 45 54 45 |Error..L|PARAMETE|
|00002a20| 52 53 20 6e 45 72 72 6f | 72 2c 20 63 4d 65 74 68 |RS nErro|r, cMeth|
|00002a30| 6f 64 2c 20 6e 4c 69 6e | 65 0d 0a 0d 0a 23 64 65 |od, nLin|e....#de|
|00002a40| 66 69 6e 65 20 4e 55 4d | 5f 4c 4f 43 20 22 45 72 |fine NUM|_LOC "Er|
|00002a50| 72 6f 72 20 4e 75 6d 62 | 65 72 3a 20 22 0d 0a 23 |ror Numb|er: "..#|
|00002a60| 64 65 66 69 6e 65 20 50 | 52 4f 47 5f 4c 4f 43 20 |define P|ROG_LOC |
|00002a70| 22 50 72 6f 63 65 64 75 | 72 65 3a 20 22 0d 0a 23 |"Procedu|re: "..#|
|00002a80| 64 65 66 69 6e 65 20 4d | 53 47 5f 4c 4f 43 20 22 |define M|SG_LOC "|
|00002a90| 45 72 72 6f 72 20 4d 65 | 73 73 61 67 65 3a 20 22 |Error Me|ssage: "|
|00002aa0| 0d 0a 23 64 65 66 69 6e | 65 20 43 52 5f 4c 4f 43 |..#defin|e CR_LOC|
|00002ab0| 20 43 48 52 28 31 33 29 | 0d 0a 23 64 65 66 69 6e | CHR(13)|..#defin|
|00002ac0| 65 20 42 41 44 53 49 5a | 45 5f 4c 4f 43 20 22 54 |e BADSIZ|E_LOC "T|
|00002ad0| 68 65 20 63 6f 6e 74 72 | 6f 6c 20 64 6f 65 73 6e |he contr|ol doesn|
|00002ae0| 27 74 20 73 75 70 70 6f | 72 74 20 74 68 65 20 73 |'t suppo|rt the s|
|00002af0| 65 6c 65 63 74 65 64 20 | 66 6f 6e 74 73 69 7a 65 |elected |fontsize|
|00002b00| 2e 22 0d 0a 0d 0a 4c 4f | 43 41 4c 20 6c 63 4d 73 |."....LO|CAL lcMs|
|00002b10| 67 2c 6c 6e 41 6e 73 77 | 65 72 20 20 0d 0a 44 4f |g,lnAnsw|er ..DO|
|00002b20| 20 43 41 53 45 0d 0a 09 | 43 41 53 45 20 6e 45 72 | CASE...|CASE nEr|
|00002b30| 72 6f 72 20 3d 20 31 38 | 38 31 20 26 26 20 46 6f |ror = 18|81 && Fo|
|00002b40| 6e 74 73 69 7a 65 20 69 | 6e 76 61 6c 69 64 20 66 |ntsize i|nvalid f|
|00002b50| 6f 72 20 74 68 65 20 63 | 6f 6e 74 72 6f 6c 0d 0a |or the c|ontrol..|
|00002b60| 09 09 57 41 49 54 20 57 | 49 4e 44 4f 57 20 42 41 |..WAIT W|INDOW BA|
|00002b70| 44 53 49 5a 45 5f 4c 4f | 43 20 54 49 4d 45 4f 55 |DSIZE_LO|C TIMEOU|
|00002b80| 54 20 32 0d 0a 09 09 49 | 46 20 54 59 50 45 28 22 |T 2....I|F TYPE("|
|00002b90| 41 70 70 6c 69 63 61 74 | 69 6f 6e 2e 41 63 74 69 |Applicat|ion.Acti|
|00002ba0| 76 65 46 6f 72 6d 2e 41 | 63 74 69 76 65 43 6f 6e |veForm.A|ctiveCon|
|00002bb0| 74 72 6f 6c 22 29 20 3d | 20 22 4f 22 0d 0a 09 09 |trol") =| "O"....|
|00002bc0| 09 54 48 49 53 2e 50 61 | 72 65 6e 74 2e 52 65 66 |.THIS.Pa|rent.Ref|
|00002bd0| 72 65 73 68 28 41 70 70 | 6c 69 63 61 74 69 6f 6e |resh(App|lication|
|00002be0| 2e 41 63 74 69 76 65 46 | 6f 72 6d 2e 41 63 74 69 |.ActiveF|orm.Acti|
|00002bf0| 76 65 43 6f 6e 74 72 6f | 6c 29 0d 0a 09 09 45 4e |veContro|l)....EN|
|00002c00| 44 49 46 0d 0a 09 0d 0a | 09 4f 54 48 45 52 57 49 |DIF.....|.OTHERWI|
|00002c10| 53 45 0d 0a 09 2a 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |SE...*--|--------|
|00002c20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002c50| 2d 0d 0a 09 2a 20 44 69 | 73 70 6c 61 79 20 69 6e |-...* Di|splay in|
|00002c60| 66 6f 72 6d 61 74 69 6f | 6e 20 61 62 6f 75 74 20 |formatio|n about |
|00002c70| 61 6e 20 75 6e 61 6e 74 | 69 63 69 70 61 74 65 64 |an unant|icipated|
|00002c80| 20 65 72 72 6f 72 2e 0d | 0a 09 2a 2d 2d 2d 2d 2d | error..|..*-----|
|00002c90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002ca0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002cb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002cc0| 2d 2d 2d 2d 2d 2d 0d 0a | 09 09 6c 63 4d 73 67 20 |------..|..lcMsg |
|00002cd0| 3d 20 4e 55 4d 5f 4c 4f | 43 20 2b 20 41 4c 4c 54 |= NUM_LO|C + ALLT|
|00002ce0| 52 49 4d 28 53 54 52 28 | 6e 45 72 72 6f 72 29 29 |RIM(STR(|nError))|
|00002cf0| 20 2b 20 43 52 5f 4c 4f | 43 20 2b 20 43 52 5f 4c | + CR_LO|C + CR_L|
|00002d00| 4f 43 20 2b 20 3b 0d 0a | 09 09 09 09 4d 53 47 5f |OC + ;..|....MSG_|
|00002d10| 4c 4f 43 20 2b 20 4d 45 | 53 53 41 47 45 28 20 29 |LOC + ME|SSAGE( )|
|00002d20| 2b 20 43 52 5f 4c 4f 43 | 20 2b 20 43 52 5f 4c 4f |+ CR_LOC| + CR_LO|
|00002d30| 43 20 2b 20 3b 0d 0a 09 | 09 09 09 50 52 4f 47 5f |C + ;...|...PROG_|
|00002d40| 4c 4f 43 20 2b 20 50 52 | 4f 47 52 41 4d 28 31 29 |LOC + PR|OGRAM(1)|
|00002d50| 0d 0a 09 09 6c 6e 41 6e | 73 77 65 72 20 3d 20 4d |....lnAn|swer = M|
|00002d60| 45 53 53 41 47 45 42 4f | 58 28 6c 63 4d 73 67 2c |ESSAGEBO|X(lcMsg,|
|00002d70| 20 32 2b 34 38 2b 35 31 | 32 29 0d 0a 09 09 44 4f | 2+48+51|2)....DO|
|00002d80| 20 43 41 53 45 0d 0a 09 | 09 09 43 41 53 45 20 6d | CASE...|..CASE m|
|00002d90| 2e 6c 6e 41 6e 73 77 65 | 72 20 3d 20 33 20 26 26 |.lnAnswe|r = 3 &&|
|00002da0| 41 62 6f 72 74 0d 0a 09 | 09 09 09 43 41 4e 43 45 |Abort...|...CANCE|
|00002db0| 4c 0d 0a 09 09 09 43 41 | 53 45 20 6d 2e 6c 6e 41 |L.....CA|SE m.lnA|
|00002dc0| 6e 73 77 65 72 20 3d 20 | 34 20 26 26 52 65 74 72 |nswer = |4 &&Retr|
|00002dd0| 79 0d 0a 09 09 09 09 52 | 45 54 52 59 0d 0a 09 09 |y......R|ETRY....|
|00002de0| 09 4f 54 48 45 52 57 49 | 53 45 0d 0a 09 09 09 09 |.OTHERWI|SE......|
|00002df0| 52 45 54 55 52 4e 0d 0a | 09 09 45 4e 44 43 41 53 |RETURN..|..ENDCAS|
|00002e00| 45 0d 0a 45 4e 44 43 41 | 53 45 0d 0a 0d 0a 45 4e |E..ENDCA|SE....EN|
|00002e10| 44 50 52 4f 43 0d 0a 50 | 52 4f 43 45 44 55 52 45 |DPROC..P|ROCEDURE|
|00002e20| 20 49 6e 74 65 72 61 63 | 74 69 76 65 43 68 61 6e | Interac|tiveChan|
|00002e30| 67 65 0d 0a 4c 4f 43 41 | 4c 20 6f 46 6f 72 6d 0d |ge..LOCA|L oForm.|
|00002e40| 0a 49 46 20 54 59 50 45 | 28 22 5f 53 43 52 45 45 |.IF TYPE|("_SCREE|
|00002e50| 4e 2e 41 63 74 69 76 65 | 46 6f 72 6d 22 29 20 3d |N.Active|Form") =|
|00002e60| 20 22 4f 22 0d 0a 09 6f | 46 6f 72 6d 20 3d 20 5f | "O"...o|Form = _|
|00002e70| 53 43 52 45 45 4e 2e 41 | 63 74 69 76 65 46 6f 72 |SCREEN.A|ctiveFor|
|00002e80| 6d 0d 0a 45 4c 53 45 0d | 0a 09 52 45 54 55 52 4e |m..ELSE.|..RETURN|
|00002e90| 0d 0a 45 4e 44 49 46 0d | 0a 0d 0a 44 4f 20 43 41 |..ENDIF.|...DO CA|
|00002ea0| 53 45 0d 0a 09 43 41 53 | 45 20 54 48 49 53 2e 50 |SE...CAS|E THIS.P|
|00002eb0| 61 72 65 6e 74 2e 6e 41 | 70 70 6c 69 65 73 54 6f |arent.nA|ppliesTo|
|00002ec0| 20 3d 20 31 09 26 26 20 | 43 75 72 72 65 6e 74 20 | = 1.&& |Current |
|00002ed0| 43 6f 6e 74 72 6f 6c 0d | 0a 09 09 49 46 20 54 59 |Control.|...IF TY|
|00002ee0| 50 45 28 22 6f 46 6f 72 | 6d 2e 41 63 74 69 76 65 |PE("oFor|m.Active|
|00002ef0| 43 6f 6e 74 72 6f 6c 2e | 46 6f 6e 74 73 69 7a 65 |Control.|Fontsize|
|00002f00| 22 29 20 23 20 22 55 22 | 0d 0a 09 09 09 6f 46 6f |") # "U"|.....oFo|
|00002f10| 72 6d 2e 41 63 74 69 76 | 65 43 6f 6e 74 72 6f 6c |rm.Activ|eControl|
|00002f20| 2e 46 6f 6e 74 53 69 7a | 65 20 3d 20 56 41 4c 28 |.FontSiz|e = VAL(|
|00002f30| 54 48 49 53 2e 56 61 6c | 75 65 29 0d 0a 09 09 45 |THIS.Val|ue)....E|
|00002f40| 4e 44 49 46 0d 0a 0d 0a | 09 43 41 53 45 20 54 48 |NDIF....|.CASE TH|
|00002f50| 49 53 2e 50 61 72 65 6e | 74 2e 6e 41 70 70 6c 69 |IS.Paren|t.nAppli|
|00002f60| 65 73 54 6f 20 3d 20 32 | 09 26 26 20 41 6c 6c 20 |esTo = 2|.&& All |
|00002f70| 74 65 78 74 62 6f 78 65 | 73 20 61 6e 64 20 65 64 |textboxe|s and ed|
|00002f80| 69 74 62 6f 78 65 73 0d | 0a 09 09 6f 46 6f 72 6d |itboxes.|...oForm|
|00002f90| 2e 53 65 74 41 6c 6c 28 | 27 46 6f 6e 74 53 69 7a |.SetAll(|'FontSiz|
|00002fa0| 65 27 2c 20 56 41 4c 28 | 54 48 49 53 2e 56 61 6c |e', VAL(|THIS.Val|
|00002fb0| 75 65 29 2c 20 27 54 45 | 58 54 42 4f 58 27 29 09 |ue), 'TE|XTBOX').|
|00002fc0| 09 0d 0a 09 09 6f 46 6f | 72 6d 2e 53 65 74 41 6c |.....oFo|rm.SetAl|
|00002fd0| 6c 28 27 46 6f 6e 74 53 | 69 7a 65 27 2c 20 56 41 |l('FontS|ize', VA|
|00002fe0| 4c 28 54 48 49 53 2e 56 | 61 6c 75 65 29 2c 20 27 |L(THIS.V|alue), '|
|00002ff0| 45 44 49 54 42 4f 58 27 | 29 09 09 0d 0a 09 0d 0a |EDITBOX'|).......|
|00003000| 09 43 41 53 45 20 54 48 | 49 53 2e 50 61 72 65 6e |.CASE TH|IS.Paren|
|00003010| 74 2e 6e 41 70 70 6c 69 | 65 73 54 6f 20 3d 20 33 |t.nAppli|esTo = 3|
|00003020| 09 26 26 20 41 6c 6c 20 | 43 6f 6e 74 72 6f 6c 73 |.&& All |Controls|
|00003030| 0d 0a 09 09 6f 46 6f 72 | 6d 2e 53 65 74 41 6c 6c |....oFor|m.SetAll|
|00003040| 28 27 46 6f 6e 74 53 69 | 7a 65 27 2c 20 56 41 4c |('FontSi|ze', VAL|
|00003050| 28 54 48 49 53 2e 56 61 | 6c 75 65 29 29 0d 0a 0d |(THIS.Va|lue))...|
|00003060| 0a 45 4e 44 43 41 53 45 | 0d 0a 0d 0a 45 4e 44 50 |.ENDCASE|....ENDP|
|00003070| 52 4f 43 0d 0a 00 00 00 | 01 00 00 00 5f 46 6f 6e |ROC.....|...._Fon|
|00003080| 74 4e 61 6d 65 20 3d 20 | 22 4d 53 20 53 61 6e 73 |tName = |"MS Sans|
|00003090| 20 53 65 72 69 66 22 0d | 0a 46 6f 6e 74 53 69 7a | Serif".|.FontSiz|
|000030a0| 65 20 3d 20 38 0d 0a 48 | 65 69 67 68 74 20 3d 20 |e = 8..H|eight = |
|000030b0| 32 32 0d 0a 4c 65 66 74 | 20 3d 20 31 33 35 0d 0a |22..Left| = 135..|
|000030c0| 54 6f 70 20 3d 20 35 0d | 0a 4e 61 6d 65 20 3d 20 |Top = 5.|.Name = |
|000030d0| 22 63 62 6f 53 69 7a 65 | 73 22 0d 0a 00 00 00 01 |"cboSize|s"......|
|000030e0| 00 00 00 0b 5f 74 62 72 | 65 64 69 74 69 6e 67 00 |...._tbr|editing.|
|000030f0| 00 00 01 00 00 00 08 63 | 62 6f 53 69 7a 65 73 00 |.......c|boSizes.|
|00003100| 00 00 01 00 00 00 08 63 | 6f 6d 62 6f 62 6f 78 00 |.......c|ombobox.|
|00003110| 00 00 01 00 00 00 0b 5f | 66 6f 72 6d 61 74 2e 76 |......._|format.v|
|00003120| 63 78 00 00 00 01 00 00 | 00 0c 5f 63 62 6f 66 6f |cx......|.._cbofo|
|00003130| 6e 74 73 69 7a 65 00 00 | 00 01 00 00 00 42 54 6f |ntsize..|.....BTo|
|00003140| 70 20 3d 20 35 0d 0a 4c | 65 66 74 20 3d 20 31 33 |p = 5..L|eft = 13|
|00003150| 35 0d 0a 48 65 69 67 68 | 74 20 3d 20 32 32 0d 0a |5..Heigh|t = 22..|
|00003160| 57 69 64 74 68 20 3d 20 | 30 0d 0a 4e 61 6d 65 20 |Width = |0..Name |
|00003170| 3d 20 22 53 65 70 61 72 | 61 74 6f 72 33 22 0d 0a |= "Separ|ator3"..|
|00003180| 00 00 00 01 00 00 00 0b | 5f 74 62 72 65 64 69 74 |........|_tbredit|
|00003190| 69 6e 67 00 00 00 01 00 | 00 00 0a 53 65 70 61 72 |ing.....|...Separ|
|000031a0| 61 74 6f 72 33 00 00 00 | 01 00 00 00 09 73 65 70 |ator3...|.....sep|
|000031b0| 61 72 61 74 6f 72 00 00 | 00 01 00 00 00 09 73 65 |arator..|......se|
|000031c0| 70 61 72 61 74 6f 72 00 | 00 00 01 00 00 03 0e fe |parator.|........|
|000031d0| f2 ff 20 02 01 00 00 00 | f5 02 00 00 f5 02 00 00 |.. .....|........|
|000031e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000031f0| 00 00 00 00 00 00 11 07 | 01 00 00 00 25 00 00 00 |........|....%...|
|00003200| 63 02 00 00 00 00 00 00 | ac 02 00 00 17 00 00 00 |c.......|........|
|00003210| 7e 02 00 00 00 00 00 00 | 00 00 00 00 fc 03 00 03 |~.......|........|
|00003220| 00 55 00 00 b7 01 0b 00 | ae f7 00 00 07 f7 01 00 |.U......|........|
|00003230| fe 54 00 25 fc 43 d9 12 | 00 5f 53 43 52 45 45 4e |.T.%.C..|._SCREEN|
|00003240| 2e 41 63 74 69 76 65 46 | 6f 72 6d 62 d9 01 00 4f |.ActiveF|ormb...O|
|00003250| 10 f0 2b 00 43 d9 20 00 | 5f 53 43 52 45 45 4e 2e |..+.C. .|_SCREEN.|
|00003260| 41 63 74 69 76 65 46 6f | 72 6d 2e 41 63 74 69 76 |ActiveFo|rm.Activ|
|00003270| 65 43 6f 6e 74 72 6f 6c | 62 d9 01 00 4f 10 09 fd |eControl|b...O...|
|00003280| f9 05 7e 00 fe 0f 00 54 | f7 00 00 10 fc e1 39 f7 |..~....T|......9.|
|00003290| 02 00 fd fe 10 00 54 f7 | 01 00 10 fc f4 00 00 f7 |......T.|........|
|000032a0| 03 00 fd fe 08 00 1b f9 | 05 8a 00 fe 04 00 42 fe |........|......B.|
|000032b0| 04 00 1e fe 0d 00 18 48 | f9 05 9b 00 f9 05 83 01 |.......H|........|
|000032c0| fe 17 00 0c fc f4 04 00 | f4 05 00 f7 06 00 f8 01 |........|........|
|000032d0| 01 10 fd f9 05 e7 00 fe | 1e 00 25 fc 43 f7 01 00 |........|..%.C...|
|000032e0| fb 08 00 46 6f 6e 74 6e | 61 6d 65 f8 01 05 ea 68 |...Fontn|ame....h|
|000032f0| fd f9 05 e3 00 fe 13 00 | 54 f4 01 00 f7 07 00 10 |........|T.......|
|00003300| fc f4 04 00 f7 08 00 fd | fe 04 00 1e fe 17 00 0c |........|........|
|00003310| fc f4 04 00 f4 05 00 f7 | 06 00 f8 01 02 10 fd f9 |........|........|
|00003320| 05 4e 01 fe 28 00 99 fc | 43 fb 08 00 46 6f 6e 74 |.N..(...|C...Font|
|00003330| 4e 61 6d 65 f4 04 00 f7 | 08 00 fb 07 00 54 45 58 |Name....|.....TEX|
|00003340| 54 42 4f 58 f4 00 00 f6 | 09 00 fd fe 28 00 99 fc |TBOX....|....(...|
|00003350| 43 fb 08 00 46 6f 6e 74 | 4e 61 6d 65 f4 04 00 f7 |C...Font|Name....|
|00003360| 08 00 fb 07 00 45 44 49 | 54 42 4f 58 f4 00 00 f6 |.....EDI|TBOX....|
|00003370| 09 00 fd fe 17 00 0c fc | f4 04 00 f4 05 00 f7 06 |........|........|
|00003380| 00 f8 01 03 10 fd f9 05 | 83 01 fe 1e 00 99 fc 43 |........|.......C|
|00003390| fb 08 00 46 6f 6e 74 4e | 61 6d 65 f4 04 00 f7 08 |...FontN|ame.....|
|000033a0| 00 f4 00 00 f6 09 00 fd | fe 04 00 1c fe 19 00 99 |........|........|
|000033b0| fc 43 f4 04 00 f7 08 00 | f4 04 00 f4 05 00 f4 0a |.C......|........|
|000033c0| 00 f6 0b 00 fd fe 14 00 | 99 fc 43 00 f7 01 00 f4 |........|..C.....|
|000033d0| 04 00 f4 05 00 f6 0c 00 | fd fe 03 00 55 0d 00 05 |........|....U...|
|000033e0| 00 4f 46 4f 52 4d 08 00 | 4f 43 4f 4e 54 52 4f 4c |.OFORM..|OCONTROL|
|000033f0| 0a 00 41 43 54 49 56 45 | 46 4f 52 4d 0d 00 41 43 |..ACTIVE|FORM..AC|
|00003400| 54 49 56 45 43 4f 4e 54 | 52 4f 4c 04 00 54 48 49 |TIVECONT|ROL..THI|
|00003410| 53 06 00 50 41 52 45 4e | 54 0a 00 4e 41 50 50 4c |S..PAREN|T..NAPPL|
|00003420| 49 45 53 54 4f 08 00 46 | 4f 4e 54 4e 41 4d 45 05 |IESTO..F|ONTNAME.|
|00003430| 00 56 41 4c 55 45 06 00 | 53 45 54 41 4c 4c 08 00 |.VALUE..|SETALL..|
|00003440| 43 42 4f 53 49 5a 45 53 | 08 00 46 49 4c 4c 4c 49 |CBOSIZES|..FILLLI|
|00003450| 53 54 07 00 52 45 46 52 | 45 53 48 11 00 49 6e 74 |ST..REFR|ESH..Int|
|00003460| 65 72 61 63 74 69 76 65 | 43 68 61 6e 67 65 2c 00 |eractive|Change,.|
|00003470| 00 00 00 00 ff ff 31 00 | b1 00 41 05 f1 00 01 01 |......1.|..A.....|
|00003480| 81 00 41 00 41 00 d2 00 | 71 01 e1 01 31 01 41 00 |..A.A...|q...1.A.|
|00003490| 72 01 81 02 81 02 f0 00 | 71 01 e1 01 42 00 92 01 |r.......|q...B...|
|000034a0| 41 01 32 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |A.2.....|........|
|000034b0| 00 00 00 00 01 00 00 00 | 1d 00 00 00 5c 05 00 00 |........|....\...|
|000034c0| 01 00 00 00 00 29 00 00 | 00 f5 02 00 00 00 00 00 |.....)..|........|
|000034d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000034e0| 01 00 00 05 67 50 52 4f | 43 45 44 55 52 45 20 49 |....gPRO|CEDURE I|
|000034f0| 6e 74 65 72 61 63 74 69 | 76 65 43 68 61 6e 67 65 |nteracti|veChange|
|00003500| 0d 0a 4c 4f 43 41 4c 20 | 6f 46 6f 72 6d 2c 20 6f |..LOCAL |oForm, o|
|00003510| 43 6f 6e 74 72 6f 6c 0d | 0a 49 46 20 54 59 50 45 |Control.|.IF TYPE|
|00003520| 28 22 5f 53 43 52 45 45 | 4e 2e 41 63 74 69 76 65 |("_SCREE|N.Active|
|00003530| 46 6f 72 6d 22 29 20 3d | 20 22 4f 22 20 41 4e 44 |Form") =| "O" AND|
|00003540| 20 54 59 50 45 28 22 5f | 53 43 52 45 45 4e 2e 41 | TYPE("_|SCREEN.A|
|00003550| 63 74 69 76 65 46 6f 72 | 6d 2e 41 63 74 69 76 65 |ctiveFor|m.Active|
|00003560| 43 6f 6e 74 72 6f 6c 22 | 29 20 3d 20 22 4f 22 0d |Control"|) = "O".|
|00003570| 0a 09 6f 46 6f 72 6d 20 | 3d 20 5f 53 43 52 45 45 |..oForm |= _SCREE|
|00003580| 4e 2e 41 63 74 69 76 65 | 46 6f 72 6d 0d 0a 09 6f |N.Active|Form...o|
|00003590| 43 6f 6e 74 72 6f 6c 20 | 3d 20 6f 46 6f 72 6d 2e |Control |= oForm.|
|000035a0| 41 63 74 69 76 65 43 6f | 6e 74 72 6f 6c 0d 0a 45 |ActiveCo|ntrol..E|
|000035b0| 4c 53 45 0d 0a 09 52 45 | 54 55 52 4e 0d 0a 45 4e |LSE...RE|TURN..EN|
|000035c0| 44 49 46 0d 0a 0d 0a 44 | 4f 20 43 41 53 45 0d 0a |DIF....D|O CASE..|
|000035d0| 09 43 41 53 45 20 54 48 | 49 53 2e 50 61 72 65 6e |.CASE TH|IS.Paren|
|000035e0| 74 2e 6e 41 70 70 6c 69 | 65 73 54 6f 20 3d 20 31 |t.nAppli|esTo = 1|
|000035f0| 09 26 26 20 43 75 72 72 | 65 6e 74 20 43 6f 6e 74 |.&& Curr|ent Cont|
|00003600| 72 6f 6c 0d 0a 09 09 49 | 46 20 50 45 4d 53 54 41 |rol....I|F PEMSTA|
|00003610| 54 55 53 28 6f 43 6f 6e | 74 72 6f 6c 2c 27 46 6f |TUS(oCon|trol,'Fo|
|00003620| 6e 74 6e 61 6d 65 27 2c | 35 29 0d 0a 09 09 09 6f |ntname',|5).....o|
|00003630| 43 6f 6e 74 72 6f 6c 2e | 46 6f 6e 74 4e 61 6d 65 |Control.|FontName|
|00003640| 20 3d 20 54 68 69 73 2e | 56 61 6c 75 65 0d 0a 09 | = This.|Value...|
|00003650| 09 45 4e 44 49 46 0d 0a | 09 09 0d 0a 09 43 41 53 |.ENDIF..|.....CAS|
|00003660| 45 20 54 48 49 53 2e 50 | 61 72 65 6e 74 2e 6e 41 |E THIS.P|arent.nA|
|00003670| 70 70 6c 69 65 73 54 6f | 20 3d 20 32 09 26 26 20 |ppliesTo| = 2.&& |
|00003680| 41 6c 6c 20 74 65 78 74 | 62 6f 78 65 73 20 61 6e |All text|boxes an|
|00003690| 64 20 65 64 69 74 62 6f | 78 65 73 0d 0a 09 09 6f |d editbo|xes....o|
|000036a0| 46 6f 72 6d 2e 53 65 74 | 41 6c 6c 28 27 46 6f 6e |Form.Set|All('Fon|
|000036b0| 74 4e 61 6d 65 27 2c 20 | 54 68 69 73 2e 56 61 6c |tName', |This.Val|
|000036c0| 75 65 2c 20 27 54 45 58 | 54 42 4f 58 27 29 0d 0a |ue, 'TEX|TBOX')..|
|000036d0| 09 09 6f 46 6f 72 6d 2e | 53 65 74 41 6c 6c 28 27 |..oForm.|SetAll('|
|000036e0| 46 6f 6e 74 4e 61 6d 65 | 27 2c 20 54 68 69 73 2e |FontName|', This.|
|000036f0| 56 61 6c 75 65 2c 20 27 | 45 44 49 54 42 4f 58 27 |Value, '|EDITBOX'|
|00003700| 29 0d 0a 09 0d 0a 09 2a | 3d 3d 3d 3d 3d 3d 3d 3d |)......*|========|
|00003710| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003720| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003730| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003740| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 0d 0a 09 2a 20 63 |========|==...* c|
|00003750| 6f 6d 6d 65 6e 74 20 6f | 75 74 20 74 68 65 20 70 |omment o|ut the p|
|00003760| 72 65 76 69 6f 75 73 20 | 32 20 6c 69 6e 65 73 20 |revious |2 lines |
|00003770| 61 6e 64 20 75 6e 63 6f | 6d 6d 65 6e 74 20 74 68 |and unco|mment th|
|00003780| 65 20 66 6f 6c 6c 6f 77 | 69 6e 67 20 6c 69 6e 65 |e follow|ing line|
|00003790| 73 0d 0a 09 2a 20 69 66 | 20 79 6f 75 20 77 61 6e |s...* if| you wan|
|000037a0| 74 20 74 6f 20 61 66 66 | 65 63 74 20 61 6c 6c 20 |t to aff|ect all |
|000037b0| 63 6f 6e 74 72 6f 6c 73 | 20 77 69 74 68 20 61 20 |controls| with a |
|000037c0| 62 61 73 65 63 6c 61 73 | 73 20 6f 66 20 74 65 78 |baseclas|s of tex|
|000037d0| 74 62 6f 78 20 0d 0a 09 | 2a 20 6f 72 20 65 64 69 |tbox ...|* or edi|
|000037e0| 74 62 6f 78 2e 0d 0a 09 | 2a 2d 2d 2d 2d 2d 2d 2d |tbox....|*-------|
|000037f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003800| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003820| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0a 09 2a 46 |--------|---...*F|
|00003830| 4f 52 20 69 20 3d 20 31 | 20 74 6f 20 6f 46 6f 72 |OR i = 1| to oFor|
|00003840| 6d 2e 43 6f 6e 74 72 6f | 6c 43 6f 75 6e 74 0d 0a |m.Contro|lCount..|
|00003850| 09 2a 20 20 3c 66 69 6e | 64 20 6f 75 74 20 77 68 |.* <fin|d out wh|
|00003860| 61 74 20 74 68 65 20 62 | 61 73 65 63 6c 61 73 73 |at the b|aseclass|
|00003870| 20 70 72 6f 70 65 72 74 | 79 20 69 73 20 74 6f 20 | propert|y is to |
|00003880| 61 76 6f 69 64 20 68 61 | 76 69 6e 67 20 74 6f 20 |avoid ha|ving to |
|00003890| 55 50 50 45 52 3e 0d 0a | 09 2a 09 49 46 20 55 50 |UPPER>..|.*.IF UP|
|000038a0| 50 45 52 28 6f 46 6f 72 | 6d 2e 43 6f 6e 74 72 6f |PER(oFor|m.Contro|
|000038b0| 6c 73 28 69 29 2e 42 61 | 73 65 43 6c 61 73 73 29 |ls(i).Ba|seClass)|
|000038c0| 20 3d 20 27 54 45 58 54 | 42 4f 58 27 20 4f 52 20 | = 'TEXT|BOX' OR |
|000038d0| 3b 0d 0a 09 2a 09 09 55 | 50 50 45 52 28 6f 46 6f |;...*..U|PPER(oFo|
|000038e0| 72 6d 2e 43 6f 6e 74 72 | 6f 6c 73 28 69 29 2e 42 |rm.Contr|ols(i).B|
|000038f0| 61 73 65 43 6c 61 73 73 | 29 20 3d 20 27 45 44 49 |aseClass|) = 'EDI|
|00003900| 54 42 4f 58 27 0d 0a 09 | 2a 09 09 6f 46 6f 72 6d |TBOX'...|*..oForm|
|00003910| 2e 43 6f 6e 74 72 6f 6c | 73 28 69 29 2e 46 6f 6e |.Control|s(i).Fon|
|00003920| 74 4e 61 6d 65 20 3d 20 | 54 48 49 53 2e 56 61 6c |tName = |THIS.Val|
|00003930| 75 65 0d 0a 09 2a 09 45 | 4e 44 49 46 0d 0a 09 2a |ue...*.E|NDIF...*|
|00003940| 45 4e 44 46 4f 52 0d 0a | 09 2a 3d 3d 3d 3d 3d 3d |ENDFOR..|.*======|
|00003950| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003960| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003970| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003980| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 0d 0a 0d 0a |========|====....|
|00003990| 09 43 41 53 45 20 54 48 | 49 53 2e 50 61 72 65 6e |.CASE TH|IS.Paren|
|000039a0| 74 2e 6e 41 70 70 6c 69 | 65 73 54 6f 20 3d 20 33 |t.nAppli|esTo = 3|
|000039b0| 09 26 26 20 41 6c 6c 20 | 43 6f 6e 74 72 6f 6c 73 |.&& All |Controls|
|000039c0| 0d 0a 09 09 6f 46 6f 72 | 6d 2e 53 65 74 41 6c 6c |....oFor|m.SetAll|
|000039d0| 28 27 46 6f 6e 74 4e 61 | 6d 65 27 2c 20 54 68 69 |('FontNa|me', Thi|
|000039e0| 73 2e 56 61 6c 75 65 29 | 0d 0a 0d 0a 45 4e 44 43 |s.Value)|....ENDC|
|000039f0| 41 53 45 0d 0a 0d 0a 54 | 48 49 53 2e 50 61 72 65 |ASE....T|HIS.Pare|
|00003a00| 6e 74 2e 63 62 6f 53 69 | 7a 65 73 2e 46 69 6c 6c |nt.cboSi|zes.Fill|
|00003a10| 4c 69 73 74 28 54 48 49 | 53 2e 56 61 6c 75 65 29 |List(THI|S.Value)|
|00003a20| 0d 0a 54 48 49 53 2e 50 | 61 72 65 6e 74 2e 52 65 |..THIS.P|arent.Re|
|00003a30| 66 72 65 73 68 28 6f 43 | 6f 6e 74 72 6f 6c 29 0d |fresh(oC|ontrol).|
|00003a40| 0a 0d 0a 45 4e 44 50 52 | 4f 43 0d 0a 00 00 00 01 |...ENDPR|OC......|
|00003a50| 00 00 00 6a 46 6f 6e 74 | 4e 61 6d 65 20 3d 20 22 |...jFont|Name = "|
|00003a60| 4d 53 20 53 61 6e 73 20 | 53 65 72 69 66 22 0d 0a |MS Sans |Serif"..|
|00003a70| 46 6f 6e 74 53 69 7a 65 | 20 3d 20 38 0d 0a 48 65 |FontSize| = 8..He|
|00003a80| 69 67 68 74 20 3d 20 32 | 32 0d 0a 4c 65 66 74 20 |ight = 2|2..Left |
|00003a90| 3d 20 35 0d 0a 54 6f 70 | 20 3d 20 35 0d 0a 57 69 |= 5..Top| = 5..Wi|
|00003aa0| 64 74 68 20 3d 20 31 32 | 35 0d 0a 4e 61 6d 65 20 |dth = 12|5..Name |
|00003ab0| 3d 20 22 63 62 6f 46 6f | 6e 74 73 22 0d 0a 00 00 |= "cboFo|nts"....|
|00003ac0| 00 01 00 00 00 0b 5f 74 | 62 72 65 64 69 74 69 6e |......_t|breditin|
|00003ad0| 67 00 00 00 01 00 00 00 | 08 63 62 6f 46 6f 6e 74 |g.......|.cboFont|
|00003ae0| 73 00 00 00 01 00 00 00 | 08 63 6f 6d 62 6f 62 6f |s.......|.combobo|
|00003af0| 78 00 00 00 01 00 00 00 | 0b 5f 66 6f 72 6d 61 74 |x.......|._format|
|00003b00| 2e 76 63 78 00 00 00 01 | 00 00 00 0c 5f 63 62 6f |.vcx....|...._cbo|
|00003b10| 66 6f 6e 74 6e 61 6d 65 | 00 00 00 01 00 00 00 49 |fontname|.......I|
|00003b20| 6e 61 70 70 6c 69 65 73 | 74 6f 20 31 20 2d 20 61 |napplies|to 1 - a|
|00003b30| 70 70 6c 69 65 73 20 74 | 6f 20 63 75 72 72 65 6e |pplies t|o curren|
|00003b40| 74 20 63 6f 6e 74 72 6f | 6c 2e 20 33 20 2d 20 61 |t contro|l. 3 - a|
|00003b50| 70 70 6c 69 65 73 20 74 | 6f 20 61 6c 6c 20 63 6f |pplies t|o all co|
|00003b60| 6e 74 72 6f 6c 73 2e 0d | 0a 00 00 00 01 00 00 04 |ntrols..|........|
|00003b70| 69 fe f2 ff 20 02 01 00 | 00 00 50 04 00 00 50 04 |i... ...|..P...P.|
|00003b80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003b90| 00 00 00 00 00 00 00 00 | 9e 63 02 00 00 00 25 00 |........|.c....%.|
|00003ba0| 00 00 8b 03 00 00 00 00 | 00 00 f7 03 00 00 25 00 |........|......%.|
|00003bb0| 00 00 ad 03 00 00 00 00 | 00 00 00 00 00 00 fc 03 |........|........|
|00003bc0| 00 03 00 55 00 00 11 00 | 0e 00 54 f4 00 00 f7 01 |...U....|..T.....|
|00003bd0| 00 10 fc 2d fd fe 03 00 | 55 02 00 04 00 54 48 49 |...-....|U....THI|
|00003be0| 53 07 00 56 49 53 49 42 | 4c 45 63 02 07 00 af f7 |S..VISIB|LEc.....|
|00003bf0| 00 00 fe 07 00 ae f7 01 | 00 fe 0d 00 18 48 f9 05 |........|.....H..|
|00003c00| 1b 00 f9 05 5c 02 fe 14 | 00 0c fc f4 02 00 f7 03 |....\...|........|
|00003c10| 00 f8 01 02 10 fd f9 05 | 80 01 fe 26 00 25 fc 43 |........|...&.%.C|
|00003c20| d9 12 00 5f 53 43 52 45 | 45 4e 2e 41 63 74 69 76 |..._SCRE|EN.Activ|
|00003c30| 65 46 6f 72 6d 62 fb 01 | 00 4f 10 fd f9 05 64 00 |eFormb..|.O....d.|
|00003c40| fe 0f 00 54 f7 04 00 10 | fc e1 39 f7 05 00 fd fe |...T....|..9.....|
|00003c50| 08 00 1b f9 05 70 00 fe | 04 00 42 fe 04 00 1e fe |.....p..|..B.....|
|00003c60| 1a 00 84 f7 01 00 10 fc | f8 01 01 fd 28 fc f4 04 |........|....(...|
|00003c70| 00 f7 06 00 fd f9 05 7c | 01 fe 2b 00 25 fc 43 00 |.......||..+.%.C.|
|00003c80| f7 01 00 f4 04 00 e5 07 | 00 f7 08 00 d9 0f 00 54 |........|.......T|
|00003c90| 65 78 74 62 6f 78 20 45 | 64 69 74 62 6f 78 01 fd |extbox E|ditbox..|
|00003ca0| f9 05 78 01 fe 20 00 54 | f4 02 00 f4 09 00 f7 0a |..x.. .T|........|
|00003cb0| 00 10 fc 43 00 f5 0d f7 | 01 00 f4 04 00 e5 07 00 |...C....|........|
|00003cc0| f7 0b 00 fd fe 19 00 99 | fc 43 f4 02 00 f4 09 00 |........|.C......|
|00003cd0| f7 0a 00 f4 02 00 f4 0c | 00 f6 0d 00 fd fe 22 00 |........|......".|
|00003ce0| 54 f4 02 00 f4 0c 00 f7 | 0a 00 10 fc 43 43 00 f5 |T.......|....CC..|
|00003cf0| 0d f7 01 00 f4 04 00 e5 | 07 00 f7 0e 00 5a fd fe |........|.....Z..|
|00003d00| 20 00 54 f4 02 00 f4 0f | 00 f7 0a 00 10 fc 43 00 | .T.....|......C.|
|00003d10| f5 0d f7 01 00 f4 04 00 | e5 07 00 f7 10 00 fd fe |........|........|
|00003d20| 20 00 54 f4 02 00 f4 11 | 00 f7 0a 00 10 fc 43 00 | .T.....|......C.|
|00003d30| f5 0d f7 01 00 f4 04 00 | e5 07 00 f7 12 00 fd fe |........|........|
|00003d40| 20 00 54 f4 02 00 f4 13 | 00 f7 0a 00 10 fc 43 00 | .T.....|......C.|
|00003d50| f5 0d f7 01 00 f4 04 00 | e5 07 00 f7 14 00 fd fe |........|........|
|00003d60| 04 00 21 fe 04 00 1e fe | 04 00 85 fe 08 00 32 f9 |..!.....|......2.|
|00003d70| 05 5c 02 fe 1b 00 25 fc | 43 d9 07 00 6f 53 6f 75 |.\....%.|C...oSou|
|00003d80| 72 63 65 62 fb 01 00 4f | 0f fd f9 05 a7 01 fe 04 |rceb...O|........|
|00003d90| 00 42 fe 04 00 1e fe 24 | 00 25 fc 43 d9 10 00 6f |.B.....$|.%.C...o|
|00003da0| 53 6f 75 72 63 65 2e 46 | 6f 6e 74 4e 61 6d 65 62 |Source.F|ontNameb|
|00003db0| d9 01 00 55 0f fd f9 05 | 58 02 fe 16 00 54 f4 02 |...U....|X....T..|
|00003dc0| 00 f4 09 00 f7 0a 00 10 | fc f4 00 00 f7 0b 00 fd |........|........|
|00003dd0| fe 19 00 99 fc 43 f4 02 | 00 f4 09 00 f7 0a 00 f4 |.....C..|........|
|00003de0| 02 00 f4 0c 00 f6 0d 00 | fd fe 18 00 54 f4 02 00 |........|....T...|
|00003df0| f4 0c 00 f7 0a 00 10 fc | 43 f4 00 00 f7 0e 00 5a |........|C......Z|
|00003e00| fd fe 16 00 54 f4 02 00 | f4 0f 00 f7 0a 00 10 fc |....T...|........|
|00003e10| f4 00 00 f7 10 00 fd fe | 16 00 54 f4 02 00 f4 11 |........|..T.....|
|00003e20| 00 f7 0a 00 10 fc f4 00 | 00 f7 12 00 fd fe 16 00 |........|........|
|00003e30| 54 f4 02 00 f4 13 00 f7 | 0a 00 10 fc f4 00 00 f7 |T.......|........|
|00003e40| 14 00 fd fe 04 00 1e fe | 04 00 1c fe 03 00 55 15 |........|......U.|
|00003e50| 00 07 00 4f 53 4f 55 52 | 43 45 01 00 49 04 00 54 |...OSOUR|CE..I..T|
|00003e60| 48 49 53 0a 00 4e 41 50 | 50 4c 49 45 53 54 4f 05 |HIS..NAP|PLIESTO.|
|00003e70| 00 4f 46 4f 52 4d 0a 00 | 41 43 54 49 56 45 46 4f |.OFORM..|ACTIVEFO|
|00003e80| 52 4d 0c 00 43 4f 4e 54 | 52 4f 4c 43 4f 55 4e 54 |RM..CONT|ROLCOUNT|
|00003e90| 08 00 43 4f 4e 54 52 4f | 4c 53 09 00 42 41 53 45 |..CONTRO|LS..BASE|
|00003ea0| 43 4c 41 53 53 08 00 43 | 42 4f 46 4f 4e 54 53 05 |CLASS..C|BOFONTS.|
|00003eb0| 00 56 41 4c 55 45 08 00 | 46 4f 4e 54 4e 41 4d 45 |.VALUE..|FONTNAME|
|00003ec0| 08 00 43 42 4f 53 49 5a | 45 53 08 00 46 49 4c 4c |..CBOSIZ|ES..FILL|
|00003ed0| 4c 49 53 54 08 00 46 4f | 4e 54 53 49 5a 45 07 00 |LIST..FO|NTSIZE..|
|00003ee0| 43 48 4b 42 4f 4c 44 08 | 00 46 4f 4e 54 42 4f 4c |CHKBOLD.|.FONTBOL|
|00003ef0| 44 09 00 43 48 4b 49 54 | 41 4c 49 43 0a 00 46 4f |D..CHKIT|ALIC..FO|
|00003f00| 4e 54 49 54 41 4c 49 43 | 0c 00 43 48 4b 55 4e 44 |NTITALIC|..CHKUND|
|00003f10| 45 52 4c 49 4e 45 0d 00 | 46 4f 4e 54 55 4e 44 45 |ERLINE..|FONTUNDE|
|00003f20| 52 4c 49 4e 45 07 00 44 | 65 73 74 72 6f 79 2c 00 |RLINE..D|estroy,.|
|00003f30| 00 00 00 00 ff ff 07 00 | 52 65 66 72 65 73 68 50 |........|RefreshP|
|00003f40| 00 00 00 00 00 ff ff 31 | 00 e1 00 33 00 71 00 72 |.......1|...3.q.r|
|00003f50| 00 d2 00 41 01 61 02 f1 | 00 81 00 41 00 41 00 a1 |...A.a..|...A.A..|
|00003f60| 01 b1 02 01 02 91 01 21 | 02 01 02 01 02 01 02 41 |.......!|.......A|
|00003f70| 00 41 00 41 00 81 00 b1 | 01 41 00 41 00 41 02 61 |.A.A....|.A.A.A.a|
|00003f80| 01 91 01 81 01 61 01 61 | 01 61 01 41 00 41 00 31 |.....a.a|.a.A.A.1|
|00003f90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003fa0| 00 01 00 00 00 13 00 00 | 00 27 00 00 00 01 00 00 |........|.'......|
|00003fb0| 00 03 00 00 00 45 00 00 | 00 5b 04 00 00 05 00 00 |.....E..|.[......|
|00003fc0| 00 00 29 00 00 00 50 04 | 00 00 00 00 00 00 00 00 |..)...P.|........|
|00003fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 01 00 00 |........|........|
|00003fe0| 00 07 74 6f 6f 6c 62 61 | 72 00 00 00 01 00 00 00 |..toolba|r.......|
|00003ff0| 09 5f 62 61 73 65 2e 76 | 63 78 00 00 00 01 00 00 |._base.v|cx......|
|00004000| 00 0b 5f 66 6f 72 6d 61 | 74 2e 76 63 78 00 00 00 |.._forma|t.vcx...|
|00004010| 01 00 00 00 08 63 6f 6d | 62 6f 62 6f 78 00 00 00 |.....com|bobox...|
|00004020| 01 00 00 00 0c 43 62 6f | 66 6f 6e 74 6e 61 6d 65 |.....Cbo|fontname|
|00004030| 73 00 00 00 01 00 00 00 | 0c 5f 72 74 66 63 6f 6e |s.......|._rtfcon|
|00004040| 74 72 6f 6c 73 00 00 00 | 01 00 00 00 09 5f 62 61 |trols...|....._ba|
|00004050| 73 65 2e 76 63 78 00 00 | 00 01 00 00 00 08 63 6f |se.vcx..|......co|
|00004060| 6d 62 6f 62 6f 78 00 00 | 00 01 00 00 00 4c 46 6f |mbobox..|.....LFo|
|00004070| 6e 74 42 6f 6c 64 20 3d | 20 2e 46 2e 0d 0a 48 65 |ntBold =| .F...He|
|00004080| 69 67 68 74 20 3d 20 32 | 35 0d 0a 53 74 79 6c 65 |ight = 2|5..Style|
|00004090| 20 3d 20 32 0d 0a 57 69 | 64 74 68 20 3d 20 32 31 | = 2..Wi|dth = 21|
|000040a0| 37 0d 0a 4e 61 6d 65 20 | 3d 20 22 5f 63 62 6f 66 |7..Name |= "_cbof|
|000040b0| 6f 6e 74 6e 61 6d 65 22 | 0d 0a 00 00 00 01 00 00 |ontname"|........|
|000040c0| 00 bd 50 52 4f 43 45 44 | 55 52 45 20 49 6e 69 74 |..PROCED|URE Init|
|000040d0| 0d 0a 4c 4f 43 41 4c 20 | 61 46 6f 6e 74 4e 61 6d |..LOCAL |aFontNam|
|000040e0| 65 73 2c 69 0d 0a 44 49 | 4d 45 4e 53 49 4f 4e 20 |es,i..DI|MENSION |
|000040f0| 61 46 6f 6e 74 4e 61 6d | 65 73 5b 31 5d 0d 0a 3d |aFontNam|es[1]..=|
|00004100| 61 66 6f 6e 74 28 61 46 | 6f 6e 74 4e 61 6d 65 73 |afont(aF|ontNames|
|00004110| 29 0d 0a 46 4f 52 20 69 | 20 3d 20 31 20 54 4f 20 |)..FOR i| = 1 TO |
|00004120| 41 4c 45 4e 28 61 46 6f | 6e 74 4e 61 6d 65 73 29 |ALEN(aFo|ntNames)|
|00004130| 0d 0a 09 54 48 49 53 2e | 41 64 64 49 74 65 6d 28 |...THIS.|AddItem(|
|00004140| 61 46 6f 6e 74 4e 61 6d | 65 73 5b 6d 2e 69 5d 29 |aFontNam|es[m.i])|
|00004150| 0d 0a 45 4e 44 46 4f 52 | 0d 0a 54 48 49 53 2e 56 |..ENDFOR|..THIS.V|
|00004160| 61 6c 75 65 20 3d 20 54 | 48 49 53 2e 46 6f 6e 74 |alue = T|HIS.Font|
|00004170| 4e 61 6d 65 0d 0a 45 4e | 44 50 52 4f 43 0d 0a 00 |Name..EN|DPROC...|
|00004180| 00 00 01 00 00 01 52 fe | f2 ff 20 02 01 00 00 00 |......R.|.. .....|
|00004190| 39 01 00 00 39 01 00 00 | 00 00 00 00 00 00 00 00 |9...9...|........|
|000041a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 af ba |........|........|
|000041b0| 01 00 00 00 25 00 00 00 | d0 00 00 00 00 00 00 00 |....%...|........|
|000041c0| f0 00 00 00 09 00 00 00 | de 00 00 00 00 00 00 00 |........|........|
|000041d0| 00 00 00 00 fc 03 00 03 | 00 55 00 00 71 00 0b 00 |........|.U..q...|
|000041e0| ae f7 00 00 07 f7 01 00 | fe 0d 00 15 f6 00 00 fc |........|........|
|000041f0| f8 01 01 fd 16 fe 0e 00 | 86 fc 43 ea 19 f7 00 00 |........|..C.....|
|00004200| ea 28 fd fe 1a 00 84 f7 | 01 00 10 fc f8 01 01 fd |.(......|........|
|00004210| 28 fc 43 eb f7 00 00 cd | fd f9 05 57 00 fe 17 00 |(.C.....|...W....|
|00004220| 99 fc 43 43 00 f5 0d f7 | 01 00 f6 00 00 f4 02 00 |..CC....|........|
|00004230| f6 03 00 fd fe 04 00 85 | fe 13 00 54 f4 02 00 f7 |........|...T....|
|00004240| 04 00 10 fc f4 02 00 f7 | 05 00 fd fe 03 00 55 06 |........|......U.|
|00004250| 00 0a 00 41 46 4f 4e 54 | 4e 41 4d 45 53 01 00 49 |...AFONT|NAMES..I|
|00004260| 04 00 54 48 49 53 07 00 | 41 44 44 49 54 45 4d 05 |..THIS..|ADDITEM.|
|00004270| 00 56 41 4c 55 45 08 00 | 46 4f 4e 54 4e 41 4d 45 |.VALUE..|FONTNAME|
|00004280| 04 00 49 6e 69 74 2c 00 | 00 00 00 00 ff ff 31 00 |..Init,.|......1.|
|00004290| b1 00 d1 00 e1 00 a1 01 | 71 01 41 00 31 01 31 00 |........|q.A.1.1.|
|000042a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000042b0| 01 00 00 00 10 00 00 00 | b2 00 00 00 01 00 00 00 |........|........|
|000042c0| 00 29 00 00 00 39 01 00 | 00 00 00 00 00 00 00 00 |.)...9..|........|
|000042d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 00 00 00 |........|........|
|000042e0| 0c 5f 63 62 6f 66 6f 6e | 74 6e 61 6d 65 00 00 00 |._cbofon|tname...|
|000042f0| 01 00 00 00 09 5f 63 6f | 6d 62 6f 62 6f 78 00 00 |....._co|mbobox..|
|00004300| 00 01 00 00 00 01 31 00 | 00 00 01 00 00 00 05 43 |......1.|.......C|
|00004310| 6c 61 73 73 00 00 00 01 | 00 00 00 06 50 69 78 65 |lass....|....Pixe|
|00004320| 6c 73 00 00 00 01 00 00 | 00 0c 5f 63 62 6f 66 6f |ls......|.._cbofo|
|00004330| 6e 74 6e 61 6d 65 00 00 | 00 01 00 00 00 21 41 72 |ntname..|.....!Ar|
|00004340| 69 61 6c 2c 20 30 2c 20 | 39 2c 20 35 2c 20 31 35 |ial, 0, |9, 5, 15|
|00004350| 2c 20 31 32 2c 20 32 31 | 2c 20 33 2c 20 30 0a 00 |, 12, 21|, 3, 0..|
|00004360| 00 00 01 00 00 00 09 5f | 62 61 73 65 2e 76 63 78 |......._|base.vcx|
|00004370| 00 00 00 01 00 00 00 09 | 63 6f 6e 74 61 69 6e 65 |........|containe|
|00004380| 72 00 00 00 01 00 00 00 | 42 57 69 64 74 68 20 3d |r.......|BWidth =|
|00004390| 20 33 31 31 0d 0a 48 65 | 69 67 68 74 20 3d 20 33 | 311..He|ight = 3|
|000043a0| 32 0d 0a 42 6f 72 64 65 | 72 57 69 64 74 68 20 3d |2..Borde|rWidth =|
|000043b0| 20 30 0d 0a 4e 61 6d 65 | 20 3d 20 22 5f 72 74 66 | 0..Name| = "_rtf|
|000043c0| 63 6f 6e 74 72 6f 6c 73 | 22 0d 0a 00 00 00 01 00 |controls|".......|
|000043d0| 00 00 0c 5f 63 62 6f 66 | 6f 6e 74 6e 61 6d 65 00 |..._cbof|ontname.|
|000043e0| 00 00 01 00 00 00 21 41 | 72 69 61 6c 2c 20 30 2c |......!A|rial, 0,|
|000043f0| 20 39 2c 20 35 2c 20 31 | 35 2c 20 31 32 2c 20 32 | 9, 5, 1|5, 12, 2|
|00004400| 31 2c 20 33 2c 20 30 0a | 00 00 00 01 00 00 00 0c |1, 3, 0.|........|
|00004410| 5f 63 62 6f 66 6f 6e 74 | 73 69 7a 65 00 00 00 01 |_cbofont|size....|
|00004420| 00 00 00 06 50 69 78 65 | 6c 73 00 00 00 01 00 00 |....Pixe|ls......|
|00004430| 00 37 64 69 73 70 6c 61 | 79 73 20 74 68 65 20 66 |.7displa|ys the f|
|00004440| 6f 6e 74 20 73 69 7a 65 | 73 20 61 76 61 69 6c 61 |ont size|s availa|
|00004450| 62 6c 65 20 66 6f 72 20 | 61 20 70 61 72 74 69 63 |ble for |a partic|
|00004460| 75 6c 61 72 20 66 6f 6e | 74 00 00 00 01 00 00 00 |ular fon|t.......|
|00004470| 05 43 6c 61 73 73 00 00 | 00 01 00 00 00 01 31 00 |.Class..|......1.|
|00004480| 00 00 01 00 00 00 09 5f | 63 6f 6d 62 6f 62 6f 78 |......._|combobox|
|00004490| 00 00 00 01 00 00 00 0c | 5f 63 62 6f 66 6f 6e 74 |........|_cbofont|
|000044a0| 73 69 7a 65 00 00 00 01 | 00 00 00 98 6e 73 6d 61 |size....|....nsma|
|000044b0| 6c 6c 65 73 74 66 6f 6e | 74 20 46 6f 72 20 73 63 |llestfon|t For sc|
|000044c0| 61 6c 61 62 6c 65 20 66 | 6f 6e 74 73 2c 20 73 6d |alable f|onts, sm|
|000044d0| 61 6c 6c 65 73 74 20 61 | 6c 6c 6f 77 61 62 6c 65 |allest a|llowable|
|000044e0| 20 66 6f 6e 74 73 69 7a | 65 2e 0d 0a 6e 6c 61 72 | fontsiz|e...nlar|
|000044f0| 67 65 73 74 66 6f 6e 74 | 20 46 6f 72 20 73 63 61 |gestfont| For sca|
|00004500| 6c 61 62 6c 65 20 66 6f | 6e 74 73 2c 20 73 70 65 |lable fo|nts, spe|
|00004510| 63 69 66 69 65 73 20 74 | 68 65 20 6c 61 72 67 65 |cifies t|he large|
|00004520| 73 74 20 61 6c 6c 6f 77 | 61 62 6c 65 20 66 6f 6e |st allow|able fon|
|00004530| 74 73 69 7a 65 2e 0d 0a | 2a 66 69 6c 6c 6c 69 73 |tsize...|*filllis|
|00004540| 74 20 0d 0a 00 00 00 01 | 00 00 03 d8 fe f2 ff 20 |t ......|....... |
|00004550| 02 01 00 00 00 bf 03 00 | 00 bf 03 00 00 00 00 00 |........|........|
|00004560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004570| 00 00 00 ae 69 02 00 00 | 00 25 00 00 00 00 03 00 |....i...|.%......|
|00004580| 00 00 00 00 00 66 03 00 | 00 23 00 00 00 20 03 00 |.....f..|.#... ..|
|00004590| 00 00 00 00 00 00 00 00 | 00 fc 03 00 03 00 55 00 |........|......U.|
|000045a0| 00 fd 01 0b 00 af f7 00 | 00 07 f7 01 00 fe 23 00 |........|......#.|
|000045b0| ae f7 02 00 07 f7 03 00 | 07 f7 04 00 07 f7 05 00 |........|........|
|000045c0| 07 f7 06 00 07 f7 07 00 | 07 f7 08 00 07 f7 09 00 |........|........|
|000045d0| fe 0b 00 54 f7 07 00 10 | fc 2d fd fe 12 00 25 fc |...T....|.-....%.|
|000045e0| 43 f4 0a 00 f7 0b 00 a1 | fd f9 05 5b 00 fe 10 00 |C.......|...[....|
|000045f0| 54 f4 0a 00 f7 0b 00 10 | fc d9 00 00 fd fe 04 00 |T.......|........|
|00004600| 1e fe 10 00 54 f7 08 00 | 10 fc f4 0a 00 f7 0b 00 |....T...|........|
|00004610| fd fe 0a 00 99 f4 0a 00 | f7 0c 00 fe 0d 00 15 f6 |........|........|
|00004620| 02 00 fc f8 01 01 fd 16 | fe 11 00 86 fc 43 ea 19 |........|.....C..|
|00004630| f7 02 00 f7 00 00 ea 28 | fd fe 16 00 25 fc 43 f8 |.......(|....%.C.|
|00004640| 01 01 f6 02 00 f9 02 ff | ff 10 fd f9 05 d8 00 fe |........|........|
|00004650| 0b 00 54 f7 03 00 10 fc | 61 fd fe 10 00 54 f7 04 |..T.....|a....T..|
|00004660| 00 10 fc f4 0a 00 f7 0d | 00 fd fe 10 00 54 f7 05 |........|.....T..|
|00004670| 00 10 fc f4 0a 00 f7 0e | 00 fd fe 08 00 1b f9 05 |........|........|
|00004680| 08 01 fe 10 00 54 f7 04 | 00 10 fc 43 eb f7 02 00 |.....T..|...C....|
|00004690| cd fd fe 0d 00 54 f7 05 | 00 10 fc f8 01 01 fd fe |.....T..|........|
|000046a0| 0b 00 54 f7 03 00 10 fc | 2d fd fe 04 00 1e fe 1b |..T.....|-.......|
|000046b0| 00 84 f7 06 00 10 fc f5 | 0d f7 05 00 fd 28 fc f5 |........|.....(..|
|000046c0| 0d f7 04 00 fd f9 05 8a | 01 fe 2a 00 54 f7 09 00 |........|..*.T...|
|000046d0| 10 fc 43 f5 0d f7 03 00 | f2 0a 00 43 f5 0d f7 06 |..C.....|...C....|
|000046e0| 00 5f f3 0c 00 43 43 00 | f5 0d f7 06 00 f6 02 00 |._...CC.|........|
|000046f0| 5f 36 fd fe 13 00 99 fc | 43 00 f5 0d f7 09 00 f4 |_6......|C.......|
|00004700| 0a 00 f6 0f 00 fd fe 15 | 00 25 fc f5 0d f7 09 00 |........|.%......|
|00004710| f5 0d f7 08 00 14 fd f9 | 05 86 01 fe 0d 00 54 f5 |........|......T.|
|00004720| 0d f7 07 00 10 fc 61 fd | fe 04 00 1e fe 04 00 85 |......a.|........|
|00004730| fe 20 00 25 fc 43 f5 0d | f7 01 00 ea d9 d9 01 00 |. .%.C..|........|
|00004740| 4c 10 f0 06 00 f5 0d f7 | 01 00 09 fd f9 05 c5 01 |L.......|........|
|00004750| fe 17 00 54 f4 0a 00 f7 | 0b 00 10 fc 43 f8 01 01 |...T....|....C...|
|00004760| f4 0a 00 f6 10 00 fd fe | 08 00 1b f9 05 f6 01 fe |........|........|
|00004770| 29 00 54 f4 0a 00 f7 0b | 00 10 fc 43 f5 0d f7 07 |).T.....|...C....|
|00004780| 00 f2 08 00 f5 0d f7 08 | 00 f3 0a 00 43 f8 01 01 |........|....C...|
|00004790| f4 0a 00 f6 10 00 36 fd | fe 04 00 1e fe 03 00 55 |......6.|.......U|
|000047a0| 11 00 09 00 43 46 4f 4e | 54 4e 41 4d 45 0a 00 4c |....CFON|TNAME..L|
|000047b0| 41 55 54 4f 52 45 53 45 | 54 06 00 41 53 49 5a 45 |AUTORESE|T..ASIZE|
|000047c0| 53 09 00 4c 53 43 41 4c | 41 42 4c 45 04 00 4e 4c |S..LSCAL|ABLE..NL|
|000047d0| 45 4e 06 00 4e 53 54 41 | 52 54 01 00 49 0a 00 4c |EN..NSTA|RT..I..L|
|000047e0| 46 4f 55 4e 44 46 4f 4e | 54 0a 00 43 53 41 56 45 |FOUNDFON|T..CSAVE|
|000047f0| 56 41 4c 55 45 09 00 43 | 46 4f 4e 54 53 49 5a 45 |VALUE..C|FONTSIZE|
|00004800| 04 00 54 48 49 53 05 00 | 56 41 4c 55 45 05 00 43 |..THIS..|VALUE..C|
|00004810| 4c 45 41 52 0c 00 4e 4c | 41 52 47 45 53 54 46 4f |LEAR..NL|ARGESTFO|
|00004820| 4e 54 0d 00 4e 53 4d 41 | 4c 4c 45 53 54 46 4f 4e |NT..NSMA|LLESTFON|
|00004830| 54 07 00 41 44 44 49 54 | 45 4d 04 00 4c 49 53 54 |T..ADDIT|EM..LIST|
|00004840| 17 00 14 00 99 fc 43 f4 | 00 00 f7 02 00 61 f4 00 |......C.|.....a..|
|00004850| 00 f6 01 00 fd fe 03 00 | 55 03 00 04 00 54 48 49 |........|U....THI|
|00004860| 53 08 00 46 49 4c 4c 4c | 49 53 54 08 00 46 4f 4e |S..FILLL|IST..FON|
|00004870| 54 4e 41 4d 45 08 00 66 | 69 6c 6c 6c 69 73 74 2c |TNAME..f|illlist,|
|00004880| 00 00 00 00 00 ff ff 04 | 00 49 6e 69 74 cb 02 00 |........|.Init...|
|00004890| 00 00 00 ff ff 31 00 b1 | 00 32 02 b1 00 22 01 01 |.....1..|.2..."..|
|000048a0| 01 41 00 01 01 a2 00 d2 | 00 11 01 61 01 b1 00 01 |.A......|...a....|
|000048b0| 01 01 01 81 00 01 01 d1 | 00 b1 00 41 00 b2 01 a1 |........|...A....|
|000048c0| 02 31 01 51 01 d1 00 41 | 00 41 00 02 02 71 01 81 |.1.Q...A|.A...q..|
|000048d0| 00 92 02 41 00 33 00 41 | 01 32 00 00 00 00 00 00 |...A.3.A|.2......|
|000048e0| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 00 14 |........|........|
|000048f0| 00 00 00 46 03 00 00 01 | 00 00 00 21 00 00 00 61 |...F....|...!...a|
|00004900| 03 00 00 83 03 00 00 2a | 00 00 00 00 29 00 00 00 |.......*|....)...|
|00004910| bf 03 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004920| 00 00 00 00 00 00 00 01 | 00 00 03 8e 50 52 4f 43 |........|....PROC|
|00004930| 45 44 55 52 45 20 66 69 | 6c 6c 6c 69 73 74 0d 0a |EDURE fi|lllist..|
|00004940| 4c 50 41 52 41 4d 45 54 | 45 52 53 20 63 46 6f 6e |LPARAMET|ERS cFon|
|00004950| 74 4e 61 6d 65 2c 6c 41 | 75 74 6f 52 65 73 65 74 |tName,lA|utoReset|
|00004960| 0d 0a 0d 0a 4c 4f 43 41 | 4c 20 61 53 69 7a 65 73 |....LOCA|L aSizes|
|00004970| 2c 6c 53 63 61 6c 61 62 | 6c 65 2c 6e 4c 65 6e 2c |,lScalab|le,nLen,|
|00004980| 6e 53 74 61 72 74 2c 69 | 2c 6c 66 6f 75 6e 64 66 |nStart,i|,lfoundf|
|00004990| 6f 6e 74 2c 63 53 61 76 | 65 56 61 6c 75 65 2c 63 |ont,cSav|eValue,c|
|000049a0| 46 6f 6e 74 53 69 7a 65 | 20 0d 0a 6c 66 6f 75 6e |FontSize| ..lfoun|
|000049b0| 64 66 6f 6e 74 20 3d 20 | 2e 46 2e 0d 0a 0d 0a 49 |dfont = |.F.....I|
|000049c0| 46 20 45 4d 50 54 59 28 | 54 48 49 53 2e 56 61 6c |F EMPTY(|THIS.Val|
|000049d0| 75 65 29 0d 0a 09 54 48 | 49 53 2e 56 61 6c 75 65 |ue)...TH|IS.Value|
|000049e0| 20 20 3d 20 22 22 0d 0a | 45 4e 44 49 46 0d 0a 63 | = ""..|ENDIF..c|
|000049f0| 53 61 76 65 56 61 6c 75 | 65 20 3d 20 54 48 49 53 |SaveValu|e = THIS|
|00004a00| 2e 56 61 6c 75 65 0d 0a | 0d 0a 54 48 49 53 2e 43 |.Value..|..THIS.C|
|00004a10| 6c 65 61 72 0d 0a 0d 0a | 44 49 4d 45 4e 53 49 4f |lear....|DIMENSIO|
|00004a20| 4e 20 61 53 69 7a 65 73 | 5b 31 5d 0d 0a 3d 41 46 |N aSizes|[1]..=AF|
|00004a30| 4f 4e 54 28 61 53 69 7a | 65 73 2c 20 63 46 6f 6e |ONT(aSiz|es, cFon|
|00004a40| 74 6e 61 6d 65 29 0d 0a | 49 46 20 61 53 69 7a 65 |tname)..|IF aSize|
|00004a50| 73 5b 31 5d 20 3d 20 2d | 31 20 20 26 26 20 54 68 |s[1] = -|1 && Th|
|00004a60| 65 20 66 6f 6e 74 20 69 | 73 20 73 63 61 6c 61 62 |e font i|s scalab|
|00004a70| 6c 65 0d 0a 09 6c 53 63 | 61 6c 61 62 6c 65 20 3d |le...lSc|alable =|
|00004a80| 20 2e 54 2e 0d 0a 09 6e | 4c 65 6e 20 3d 20 54 48 | .T....n|Len = TH|
|00004a90| 49 53 2e 6e 4c 61 72 67 | 65 73 74 46 6f 6e 74 0d |IS.nLarg|estFont.|
|00004aa0| 0a 09 6e 53 74 61 72 74 | 20 3d 20 54 48 49 53 2e |..nStart| = THIS.|
|00004ab0| 6e 53 6d 61 6c 6c 65 73 | 74 46 6f 6e 74 0d 0a 45 |nSmalles|tFont..E|
|00004ac0| 4c 53 45 0d 0a 09 6e 4c | 65 6e 20 3d 20 41 4c 45 |LSE...nL|en = ALE|
|00004ad0| 4e 28 61 53 69 7a 65 73 | 29 0d 0a 09 6e 53 74 61 |N(aSizes|)...nSta|
|00004ae0| 72 74 20 3d 20 31 0d 0a | 09 6c 53 63 61 6c 61 62 |rt = 1..|.lScalab|
|00004af0| 6c 65 20 3d 20 2e 46 2e | 0d 0a 45 4e 44 49 46 0d |le = .F.|..ENDIF.|
|00004b00| 0a 0d 0a 46 4f 52 20 69 | 20 3d 20 6d 2e 6e 53 74 |...FOR i| = m.nSt|
|00004b10| 61 72 74 20 54 4f 20 6d | 2e 6e 4c 65 6e 0d 0a 09 |art TO m|.nLen...|
|00004b20| 63 46 6f 6e 74 53 69 7a | 65 20 3d 20 49 49 46 28 |cFontSiz|e = IIF(|
|00004b30| 6d 2e 6c 53 63 61 6c 61 | 62 6c 65 2c 54 52 41 4e |m.lScala|ble,TRAN|
|00004b40| 53 28 6d 2e 69 29 2c 54 | 52 41 4e 53 28 61 53 69 |S(m.i),T|RANS(aSi|
|00004b50| 7a 65 73 5b 6d 2e 69 5d | 29 29 0d 0a 09 54 48 49 |zes[m.i]|))...THI|
|00004b60| 53 2e 41 64 64 49 74 65 | 6d 28 6d 2e 63 46 6f 6e |S.AddIte|m(m.cFon|
|00004b70| 74 53 69 7a 65 29 0d 0a | 09 49 46 20 6d 2e 63 46 |tSize)..|.IF m.cF|
|00004b80| 6f 6e 74 53 69 7a 65 20 | 3d 3d 20 6d 2e 63 53 61 |ontSize |== m.cSa|
|00004b90| 76 65 56 61 6c 75 65 0d | 0a 09 09 6d 2e 6c 66 6f |veValue.|...m.lfo|
|00004ba0| 75 6e 64 66 6f 6e 74 20 | 3d 20 2e 54 2e 0d 0a 09 |undfont |= .T....|
|00004bb0| 45 4e 44 49 46 0d 0a 45 | 4e 44 46 4f 52 0d 0a 0d |ENDIF..E|NDFOR...|
|00004bc0| 0a 49 46 20 56 41 52 54 | 59 50 45 28 6d 2e 6c 41 |.IF VART|YPE(m.lA|
|00004bd0| 75 74 6f 52 65 73 65 74 | 29 3d 22 4c 22 20 41 4e |utoReset|)="L" AN|
|00004be0| 44 20 6d 2e 6c 41 75 74 | 6f 52 65 73 65 74 0d 0a |D m.lAut|oReset..|
|00004bf0| 09 54 48 49 53 2e 56 61 | 6c 75 65 20 3d 20 54 48 |.THIS.Va|lue = TH|
|00004c00| 49 53 2e 4c 69 73 74 5b | 31 5d 0d 0a 45 4c 53 45 |IS.List[|1]..ELSE|
|00004c10| 0d 0a 09 2a 20 43 68 65 | 63 6b 20 69 66 20 66 6f |...* Che|ck if fo|
|00004c20| 6e 74 20 61 6c 72 65 61 | 64 79 20 73 65 74 0d 0a |nt alrea|dy set..|
|00004c30| 09 54 48 49 53 2e 56 61 | 6c 75 65 20 3d 20 49 49 |.THIS.Va|lue = II|
|00004c40| 46 28 6d 2e 6c 46 6f 75 | 6e 64 46 6f 6e 74 2c 6d |F(m.lFou|ndFont,m|
|00004c50| 2e 63 53 61 76 65 56 61 | 6c 75 65 2c 54 48 49 53 |.cSaveVa|lue,THIS|
|00004c60| 2e 4c 69 73 74 5b 31 5d | 29 0d 0a 45 4e 44 49 46 |.List[1]|)..ENDIF|
|00004c70| 0d 0a 0d 0a 45 4e 44 50 | 52 4f 43 0d 0a 50 52 4f |....ENDP|ROC..PRO|
|00004c80| 43 45 44 55 52 45 20 49 | 6e 69 74 0d 0a 54 48 49 |CEDURE I|nit..THI|
|00004c90| 53 2e 66 69 6c 6c 6c 69 | 73 74 28 54 48 49 53 2e |S.fillli|st(THIS.|
|00004ca0| 46 6f 6e 74 4e 61 6d 65 | 2c 2e 54 2e 29 0d 0a 0d |FontName|,.T.)...|
|00004cb0| 0a 45 4e 44 50 52 4f 43 | 0d 0a 00 00 00 01 00 00 |.ENDPROC|........|
|00004cc0| 00 8b 46 6f 6e 74 42 6f | 6c 64 20 3d 20 2e 46 2e |..FontBo|ld = .F.|
|00004cd0| 0d 0a 48 65 69 67 68 74 | 20 3d 20 32 35 0d 0a 53 |..Height| = 25..S|
|00004ce0| 74 79 6c 65 20 3d 20 32 | 0d 0a 54 6f 6f 6c 54 69 |tyle = 2|..ToolTi|
|00004cf0| 70 54 65 78 74 20 3d 20 | 22 46 6f 6e 74 53 69 7a |pText = |"FontSiz|
|00004d00| 65 22 0d 0a 57 69 64 74 | 68 20 3d 20 34 34 0d 0a |e"..Widt|h = 44..|
|00004d10| 6e 73 6d 61 6c 6c 65 73 | 74 66 6f 6e 74 20 3d 20 |nsmalles|tfont = |
|00004d20| 38 0d 0a 6e 6c 61 72 67 | 65 73 74 66 6f 6e 74 20 |8..nlarg|estfont |
|00004d30| 3d 20 34 38 0d 0a 4e 61 | 6d 65 20 3d 20 22 5f 63 |= 48..Na|me = "_c|
|00004d40| 62 6f 66 6f 6e 74 73 69 | 7a 65 22 0d 0a 00 00 00 |bofontsi|ze".....|
|00004d50| 01 00 00 00 08 63 6f 6d | 62 6f 62 6f 78 00 00 00 |.....com|bobox...|
|00004d60| 01 00 00 00 09 5f 62 61 | 73 65 2e 76 63 78 00 00 |....._ba|se.vcx..|
|00004d70| 00 01 00 00 00 6e 41 72 | 69 61 6c 2c 20 30 2c 20 |.....nAr|ial, 0, |
|00004d80| 39 2c 20 35 2c 20 31 35 | 2c 20 31 32 2c 20 32 31 |9, 5, 15|, 12, 21|
|00004d90| 2c 20 33 2c 20 30 0a 43 | 6f 75 72 69 65 72 20 4e |, 3, 0.C|ourier N|
|00004da0| 65 77 2c 20 31 2c 20 39 | 2c 20 37 2c 20 31 36 2c |ew, 1, 9|, 7, 16,|
|00004db0| 20 31 32 2c 20 39 2c 20 | 34 2c 20 30 0a 43 6f 75 | 12, 9, |4, 0.Cou|
|00004dc0| 72 69 65 72 20 4e 65 77 | 2c 20 33 2c 20 39 2c 20 |rier New|, 3, 9, |
|00004dd0| 37 2c 20 31 36 2c 20 31 | 32 2c 20 31 31 2c 20 34 |7, 16, 1|2, 11, 4|
|00004de0| 2c 20 30 0a 00 00 00 01 | 00 00 00 0c 5f 72 74 66 |, 0.....|...._rtf|
|00004df0| 63 6f 6e 74 72 6f 6c 73 | 00 00 00 01 00 00 00 06 |controls|........|
|00004e00| 50 69 78 65 6c 73 00 00 | 00 01 00 00 00 05 43 6c |Pixels..|......Cl|
|00004e10| 61 73 73 00 00 00 01 00 | 00 00 01 36 00 00 00 01 |ass.....|...6....|
|00004e20| 00 00 00 0a 5f 63 6f 6e | 74 61 69 6e 65 72 00 00 |...._con|tainer..|
|00004e30| 00 01 00 00 00 0c 5f 72 | 74 66 63 6f 6e 74 72 6f |......_r|tfcontro|
|00004e40| 6c 73 00 00 00 01 00 00 | 00 7c 54 6f 70 20 3d 20 |ls......|.|Top = |
|00004e50| 34 0d 0a 4c 65 66 74 20 | 3d 20 32 38 33 0d 0a 48 |4..Left |= 283..H|
|00004e60| 65 69 67 68 74 20 3d 20 | 32 33 0d 0a 57 69 64 74 |eight = |23..Widt|
|00004e70| 68 20 3d 20 32 35 0d 0a | 43 61 70 74 69 6f 6e 20 |h = 25..|Caption |
|00004e80| 3d 20 22 43 22 0d 0a 54 | 6f 6f 6c 54 69 70 54 65 |= "C"..T|oolTipTe|
|00004e90| 78 74 20 3d 20 22 43 6f | 6c 6f 72 22 0d 0a 46 6f |xt = "Co|lor"..Fo|
|00004ea0| 72 65 43 6f 6c 6f 72 20 | 3d 20 32 35 35 2c 30 2c |reColor |= 255,0,|
|00004eb0| 30 0d 0a 4e 61 6d 65 20 | 3d 20 22 63 6d 64 43 6f |0..Name |= "cmdCo|
|00004ec0| 6c 6f 72 22 0d 0a 00 00 | 00 01 00 00 00 0c 5f 72 |lor"....|......_r|
|00004ed0| 74 66 63 6f 6e 74 72 6f | 6c 73 00 00 00 01 00 00 |tfcontro|ls......|
|00004ee0| 00 08 63 6d 64 43 6f 6c | 6f 72 00 00 00 01 00 00 |..cmdCol|or......|
|00004ef0| 00 0d 63 6f 6d 6d 61 6e | 64 62 75 74 74 6f 6e 00 |..comman|dbutton.|
|00004f00| 00 00 01 00 00 00 09 5f | 62 61 73 65 2e 76 63 78 |......._|base.vcx|
|00004f10| 00 00 00 01 00 00 00 0e | 5f 63 6f 6d 6d 61 6e 64 |........|_command|
|00004f20| 62 75 74 74 6f 6e 00 00 | 00 01 00 00 00 b3 54 6f |button..|......To|
|00004f30| 70 20 3d 20 34 0d 0a 4c | 65 66 74 20 3d 20 32 35 |p = 4..L|eft = 25|
|00004f40| 35 0d 0a 48 65 69 67 68 | 74 20 3d 20 32 33 0d 0a |5..Heigh|t = 23..|
|00004f50| 57 69 64 74 68 20 3d 20 | 32 35 0d 0a 46 6f 6e 74 |Width = |25..Font|
|00004f60| 42 6f 6c 64 20 3d 20 2e | 54 2e 0d 0a 46 6f 6e 74 |Bold = .|T...Font|
|00004f70| 49 74 61 6c 69 63 20 3d | 20 2e 54 2e 0d 0a 46 6f |Italic =| .T...Fo|
|00004f80| 6e 74 4e 61 6d 65 20 3d | 20 22 43 6f 75 72 69 65 |ntName =| "Courie|
|00004f90| 72 20 4e 65 77 22 0d 0a | 46 6f 6e 74 53 69 7a 65 |r New"..|FontSize|
|00004fa0| 20 3d 20 39 0d 0a 43 61 | 70 74 69 6f 6e 20 3d 20 | = 9..Ca|ption = |
|00004fb0| 22 49 22 0d 0a 54 6f 6f | 6c 54 69 70 54 65 78 74 |"I"..Too|lTipText|
|00004fc0| 20 3d 20 22 49 74 61 6c | 69 63 22 0d 0a 4e 61 6d | = "Ital|ic"..Nam|
|00004fd0| 65 20 3d 20 22 63 6d 64 | 49 74 61 6c 69 63 22 0d |e = "cmd|Italic".|
|00004fe0| 0a 00 00 00 01 00 00 00 | 0c 5f 72 74 66 63 6f 6e |........|._rtfcon|
|00004ff0| 74 72 6f 6c 73 00 00 00 | 01 00 00 00 09 63 6d 64 |trols...|.....cmd|
|00005000| 49 74 61 6c 69 63 00 00 | 00 01 00 00 00 0d 63 6f |Italic..|......co|
|00005010| 6d 6d 61 6e 64 62 75 74 | 74 6f 6e 00 00 00 01 00 |mmandbut|ton.....|
|00005020| 00 00 09 5f 62 61 73 65 | 2e 76 63 78 00 00 00 01 |..._base|.vcx....|
|00005030| 00 00 00 0e 5f 63 6f 6d | 6d 61 6e 64 62 75 74 74 |...._com|mandbutt|
|00005040| 6f 6e 00 00 00 01 00 00 | 00 8f 54 6f 70 20 3d 20 |on......|..Top = |
|00005050| 34 0d 0a 4c 65 66 74 20 | 3d 20 32 32 37 0d 0a 48 |4..Left |= 227..H|
|00005060| 65 69 67 68 74 20 3d 20 | 32 33 0d 0a 57 69 64 74 |eight = |23..Widt|
|00005070| 68 20 3d 20 32 35 0d 0a | 46 6f 6e 74 42 6f 6c 64 |h = 25..|FontBold|
|00005080| 20 3d 20 2e 54 2e 0d 0a | 46 6f 6e 74 4e 61 6d 65 | = .T...|FontName|
|00005090| 20 3d 20 22 43 6f 75 72 | 69 65 72 20 4e 65 77 22 | = "Cour|ier New"|
|000050a0| 0d 0a 43 61 70 74 69 6f | 6e 20 3d 20 22 42 22 0d |..Captio|n = "B".|
|000050b0| 0a 54 6f 6f 6c 54 69 70 | 54 65 78 74 20 3d 20 22 |.ToolTip|Text = "|
|000050c0| 42 6f 6c 64 22 0d 0a 4e | 61 6d 65 20 3d 20 22 63 |Bold"..N|ame = "c|
|000050d0| 6d 64 42 6f 6c 64 22 0d | 0a 00 00 00 01 00 00 00 |mdBold".|........|
|000050e0| 0c 5f 72 74 66 63 6f 6e | 74 72 6f 6c 73 00 00 00 |._rtfcon|trols...|
|000050f0| 01 00 00 00 07 63 6d 64 | 42 6f 6c 64 00 00 00 01 |.....cmd|Bold....|
|00005100| 00 00 00 0d 63 6f 6d 6d | 61 6e 64 62 75 74 74 6f |....comm|andbutto|
|00005110| 6e 00 00 00 01 00 00 00 | 09 5f 62 61 73 65 2e 76 |n.......|._base.v|
|00005120| 63 78 00 00 00 01 00 00 | 00 0e 5f 63 6f 6d 6d 61 |cx......|.._comma|
|00005130| 6e 64 62 75 74 74 6f 6e | 00 00 00 01 00 00 00 2c |ndbutton|.......,|
|00005140| 4c 65 66 74 20 3d 20 31 | 37 32 0d 0a 54 6f 70 20 |Left = 1|72..Top |
|00005150| 3d 20 34 0d 0a 4e 61 6d | 65 20 3d 20 22 43 62 6f |= 4..Nam|e = "Cbo|
|00005160| 66 6f 6e 74 73 69 7a 65 | 73 22 0d 0a 00 00 00 01 |fontsize|s"......|
|00005170| 00 00 00 0c 5f 72 74 66 | 63 6f 6e 74 72 6f 6c 73 |...._rtf|controls|
|00005180| 00 00 00 01 00 00 00 0c | 43 62 6f 66 6f 6e 74 73 |........|Cbofonts|
|00005190| 69 7a 65 73 00 00 00 01 | 00 00 00 08 63 6f 6d 62 |izes....|....comb|
|000051a0| 6f 62 6f 78 00 00 00 01 | 00 00 00 0b 5f 66 6f 72 |obox....|...._for|
|000051b0| 6d 61 74 2e 76 63 78 00 | 00 00 01 00 00 00 0c 5f |mat.vcx.|......._|
|000051c0| 63 62 6f 66 6f 6e 74 73 | 69 7a 65 00 00 00 01 00 |cbofonts|ize.....|
|000051d0| 00 00 fc fe f2 ff 20 02 | 01 00 00 00 e3 00 00 00 |...... .|........|
|000051e0| e3 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000051f0| 00 00 00 00 00 00 00 00 | 00 00 e8 a7 01 00 00 00 |........|........|
|00005200| 25 00 00 00 79 00 00 00 | 00 00 00 00 9a 00 00 00 |%...y...|........|
|00005210| 03 00 00 00 94 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005220| fc 03 00 03 00 55 00 00 | 1c 00 19 00 99 fc 43 f4 |.....U..|......C.|
|00005230| 00 00 f7 04 00 f4 00 00 | f4 01 00 f4 02 00 f6 03 |........|........|
|00005240| 00 fd fe 03 00 55 05 00 | 04 00 54 48 49 53 06 00 |.....U..|..THIS..|
|00005250| 50 41 52 45 4e 54 0c 00 | 43 42 4f 46 4f 4e 54 53 |PARENT..|CBOFONTS|
|00005260| 49 5a 45 53 08 00 46 49 | 4c 4c 4c 49 53 54 05 00 |IZES..FI|LLLIST..|
|00005270| 56 41 4c 55 45 11 00 49 | 6e 74 65 72 61 63 74 69 |VALUE..I|nteracti|
|00005280| 76 65 43 68 61 6e 67 65 | 2c 00 00 00 00 00 ff ff |veChange|,.......|
|00005290| 31 00 91 01 32 00 00 00 | 00 00 00 00 00 00 00 00 |1...2...|........|
|000052a0| 00 00 00 00 00 00 01 00 | 00 00 1d 00 00 00 4c 00 |........|......L.|
|000052b0| 00 00 01 00 00 00 00 29 | 00 00 00 e3 00 00 00 00 |.......)|........|
|000052c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000052d0| 00 00 01 00 00 00 57 50 | 52 4f 43 45 44 55 52 45 |......WP|ROCEDURE|
|000052e0| 20 49 6e 74 65 72 61 63 | 74 69 76 65 43 68 61 6e | Interac|tiveChan|
|000052f0| 67 65 0d 0a 54 48 49 53 | 2e 50 61 72 65 6e 74 2e |ge..THIS|.Parent.|
|00005300| 63 62 6f 46 6f 6e 74 53 | 69 7a 65 73 2e 46 69 6c |cboFontS|izes.Fil|
|00005310| 6c 4c 69 73 74 28 54 48 | 49 53 2e 56 61 6c 75 65 |lList(TH|IS.Value|
|00005320| 29 0d 0a 0d 0a 45 4e 44 | 50 52 4f 43 0d 0a 00 00 |)....END|PROC....|
|00005330| 00 01 00 00 00 44 48 65 | 69 67 68 74 20 3d 20 32 |.....DHe|ight = 2|
|00005340| 35 0d 0a 4c 65 66 74 20 | 3d 20 34 0d 0a 54 6f 70 |5..Left |= 4..Top|
|00005350| 20 3d 20 34 0d 0a 57 69 | 64 74 68 20 3d 20 31 35 | = 4..Wi|dth = 15|
|00005360| 37 0d 0a 4e 61 6d 65 20 | 3d 20 22 43 62 6f 66 6f |7..Name |= "Cbofo|
|00005370| 6e 74 6e 61 6d 65 73 22 | 0d 0a 00 00 00 01 00 00 |ntnames"|........|
|00005380| 04 66 50 52 4f 43 45 44 | 55 52 45 20 44 65 73 74 |.fPROCED|URE Dest|
|00005390| 72 6f 79 0d 0a 54 68 69 | 73 2e 56 69 73 69 62 6c |roy..Thi|s.Visibl|
|000053a0| 65 20 3d 20 2e 46 2e 0d | 0a 0d 0a 45 4e 44 50 52 |e = .F..|...ENDPR|
|000053b0| 4f 43 0d 0a 50 52 4f 43 | 45 44 55 52 45 20 52 65 |OC..PROC|EDURE Re|
|000053c0| 66 72 65 73 68 0d 0a 4c | 50 41 52 41 4d 45 54 45 |fresh..L|PARAMETE|
|000053d0| 52 53 20 6f 53 6f 75 72 | 63 65 0d 0a 0d 0a 4c 4f |RS oSour|ce....LO|
|000053e0| 43 41 4c 20 69 0d 0a 0d | 0a 44 4f 20 43 41 53 45 |CAL i...|.DO CASE|
|000053f0| 0d 0a 09 43 41 53 45 20 | 54 48 49 53 2e 6e 41 70 |...CASE |THIS.nAp|
|00005400| 70 6c 69 65 73 54 6f 20 | 3d 20 32 20 26 26 20 74 |pliesTo |= 2 && t|
|00005410| 65 78 74 20 61 6e 64 20 | 65 64 69 74 20 62 6f 78 |ext and |edit box|
|00005420| 65 73 0d 0a 09 09 49 46 | 20 54 59 50 45 28 22 5f |es....IF| TYPE("_|
|00005430| 53 43 52 45 45 4e 2e 41 | 63 74 69 76 65 46 6f 72 |SCREEN.A|ctiveFor|
|00005440| 6d 22 29 20 3d 20 27 4f | 27 0d 0a 09 09 09 6f 46 |m") = 'O|'.....oF|
|00005450| 6f 72 6d 20 3d 20 5f 53 | 43 52 45 45 4e 2e 41 63 |orm = _S|CREEN.Ac|
|00005460| 74 69 76 65 46 6f 72 6d | 0d 0a 09 09 45 4c 53 45 |tiveForm|....ELSE|
|00005470| 0d 0a 09 09 09 52 45 54 | 55 52 4e 0d 0a 09 09 45 |.....RET|URN....E|
|00005480| 4e 44 49 46 0d 0a 09 09 | 46 4f 52 20 69 20 3d 20 |NDIF....|FOR i = |
|00005490| 31 20 74 6f 20 6f 46 6f | 72 6d 2e 43 6f 6e 74 72 |1 to oFo|rm.Contr|
|000054a0| 6f 6c 43 6f 75 6e 74 0d | 0a 09 09 09 49 46 20 6f |olCount.|....IF o|
|000054b0| 46 6f 72 6d 2e 43 6f 6e | 74 72 6f 6c 73 28 69 29 |Form.Con|trols(i)|
|000054c0| 2e 42 61 73 65 43 6c 61 | 73 73 24 22 54 65 78 74 |.BaseCla|ss$"Text|
|000054d0| 62 6f 78 20 45 64 69 74 | 62 6f 78 22 0d 0a 09 09 |box Edit|box"....|
|000054e0| 09 09 54 48 49 53 2e 63 | 62 6f 46 6f 6e 74 73 2e |..THIS.c|boFonts.|
|000054f0| 56 61 6c 75 65 20 3d 20 | 6f 46 6f 72 6d 2e 43 6f |Value = |oForm.Co|
|00005500| 6e 74 72 6f 6c 73 28 6d | 2e 69 29 2e 46 6f 6e 74 |ntrols(m|.i).Font|
|00005510| 4e 61 6d 65 0d 0a 09 09 | 09 09 54 48 49 53 2e 63 |Name....|..THIS.c|
|00005520| 62 6f 53 69 7a 65 73 2e | 46 69 6c 6c 4c 69 73 74 |boSizes.|FillList|
|00005530| 28 54 48 49 53 2e 63 62 | 6f 46 6f 6e 74 73 2e 56 |(THIS.cb|oFonts.V|
|00005540| 61 6c 75 65 29 0d 0a 09 | 09 09 09 54 48 49 53 2e |alue)...|...THIS.|
|00005550| 63 62 6f 53 69 7a 65 73 | 2e 56 61 6c 75 65 20 3d |cboSizes|.Value =|
|00005560| 20 53 54 52 28 6f 46 6f | 72 6d 2e 43 6f 6e 74 72 | STR(oFo|rm.Contr|
|00005570| 6f 6c 73 28 6d 2e 69 29 | 2e 46 6f 6e 74 53 69 7a |ols(m.i)|.FontSiz|
|00005580| 65 29 0d 0a 09 09 09 09 | 54 48 49 53 2e 63 68 6b |e)......|THIS.chk|
|00005590| 42 6f 6c 64 2e 56 61 6c | 75 65 20 3d 20 6f 46 6f |Bold.Val|ue = oFo|
|000055a0| 72 6d 2e 43 6f 6e 74 72 | 6f 6c 73 28 6d 2e 69 29 |rm.Contr|ols(m.i)|
|000055b0| 2e 46 6f 6e 74 42 6f 6c | 64 0d 0a 09 09 09 09 54 |.FontBol|d......T|
|000055c0| 48 49 53 2e 63 68 6b 49 | 74 61 6c 69 63 2e 56 61 |HIS.chkI|talic.Va|
|000055d0| 6c 75 65 20 3d 20 6f 46 | 6f 72 6d 2e 43 6f 6e 74 |lue = oF|orm.Cont|
|000055e0| 72 6f 6c 73 28 6d 2e 69 | 29 2e 46 6f 6e 74 49 74 |rols(m.i|).FontIt|
|000055f0| 61 6c 69 63 0d 0a 09 09 | 09 09 54 48 49 53 2e 63 |alic....|..THIS.c|
|00005600| 68 6b 55 6e 64 65 72 6c | 69 6e 65 2e 56 61 6c 75 |hkUnderl|ine.Valu|
|00005610| 65 20 3d 20 6f 46 6f 72 | 6d 2e 43 6f 6e 74 72 6f |e = oFor|m.Contro|
|00005620| 6c 73 28 6d 2e 69 29 2e | 46 6f 6e 74 55 6e 64 65 |ls(m.i).|FontUnde|
|00005630| 72 6c 69 6e 65 0d 0a 09 | 09 09 09 45 58 49 54 0d |rline...|...EXIT.|
|00005640| 0a 09 09 09 45 4e 44 49 | 46 0d 0a 09 09 45 4e 44 |....ENDI|F....END|
|00005650| 46 4f 52 0d 0a 09 4f 54 | 48 45 52 57 49 53 45 0d |FOR...OT|HERWISE.|
|00005660| 0a 09 09 49 46 20 54 59 | 50 45 28 22 6f 53 6f 75 |...IF TY|PE("oSou|
|00005670| 72 63 65 22 29 20 21 3d | 20 27 4f 27 0d 0a 09 09 |rce") !=| 'O'....|
|00005680| 09 52 45 54 55 52 4e 0d | 0a 09 09 45 4e 44 49 46 |.RETURN.|...ENDIF|
|00005690| 0d 0a 09 09 49 46 20 54 | 59 50 45 28 22 6f 53 6f |....IF T|YPE("oSo|
|000056a0| 75 72 63 65 2e 46 6f 6e | 74 4e 61 6d 65 22 29 20 |urce.Fon|tName") |
|000056b0| 23 22 55 22 0d 0a 09 09 | 09 54 48 49 53 2e 63 62 |#"U"....|.THIS.cb|
|000056c0| 6f 46 6f 6e 74 73 2e 56 | 61 6c 75 65 20 3d 20 6f |oFonts.V|alue = o|
|000056d0| 53 6f 75 72 63 65 2e 46 | 6f 6e 74 4e 61 6d 65 0d |Source.F|ontName.|
|000056e0| 0a 09 09 09 54 48 49 53 | 2e 63 62 6f 53 69 7a 65 |....THIS|.cboSize|
|000056f0| 73 2e 46 69 6c 6c 4c 69 | 73 74 28 54 48 49 53 2e |s.FillLi|st(THIS.|
|00005700| 63 62 6f 46 6f 6e 74 73 | 2e 56 61 6c 75 65 29 0d |cboFonts|.Value).|
|00005710| 0a 09 09 09 54 48 49 53 | 2e 63 62 6f 53 69 7a 65 |....THIS|.cboSize|
|00005720| 73 2e 56 61 6c 75 65 20 | 3d 20 53 54 52 28 6f 53 |s.Value |= STR(oS|
|00005730| 6f 75 72 63 65 2e 46 6f | 6e 74 53 69 7a 65 29 0d |ource.Fo|ntSize).|
|00005740| 0a 09 09 09 54 48 49 53 | 2e 63 68 6b 42 6f 6c 64 |....THIS|.chkBold|
|00005750| 2e 56 61 6c 75 65 20 3d | 20 6f 53 6f 75 72 63 65 |.Value =| oSource|
|00005760| 2e 46 6f 6e 74 42 6f 6c | 64 0d 0a 09 09 09 54 48 |.FontBol|d.....TH|
|00005770| 49 53 2e 63 68 6b 49 74 | 61 6c 69 63 2e 56 61 6c |IS.chkIt|alic.Val|
|00005780| 75 65 20 3d 20 6f 53 6f | 75 72 63 65 2e 46 6f 6e |ue = oSo|urce.Fon|
|00005790| 74 49 74 61 6c 69 63 0d | 0a 09 09 09 54 48 49 53 |tItalic.|....THIS|
|000057a0| 2e 63 68 6b 55 6e 64 65 | 72 6c 69 6e 65 2e 56 61 |.chkUnde|rline.Va|
|000057b0| 6c 75 65 20 3d 20 6f 53 | 6f 75 72 63 65 2e 46 6f |lue = oS|ource.Fo|
|000057c0| 6e 74 55 6e 64 65 72 6c | 69 6e 65 0d 0a 09 09 45 |ntUnderl|ine....E|
|000057d0| 4e 44 49 46 0d 0a 45 4e | 44 43 41 53 45 0d 0a 45 |NDIF..EN|DCASE..E|
|000057e0| 4e 44 50 52 4f 43 0d 0a | 00 00 00 01 00 00 00 68 |NDPROC..|.......h|
|000057f0| 43 61 70 74 69 6f 6e 20 | 3d 20 22 45 64 69 74 69 |Caption |= "Editi|
|00005800| 6e 67 22 0d 0a 48 65 69 | 67 68 74 20 3d 20 33 31 |ng"..Hei|ght = 31|
|00005810| 0d 0a 4c 65 66 74 20 3d | 20 30 0d 0a 54 6f 70 20 |..Left =| 0..Top |
|00005820| 3d 20 30 0d 0a 57 69 64 | 74 68 20 3d 20 33 33 39 |= 0..Wid|th = 339|
|00005830| 0d 0a 6e 61 70 70 6c 69 | 65 73 74 6f 20 3d 20 31 |..nappli|esto = 1|
|00005840| 0d 0a 4e 61 6d 65 20 3d | 20 22 5f 74 62 72 65 64 |..Name =| "_tbred|
|00005850| 69 74 69 6e 67 22 0d 0a | |iting"..| |
+--------+-------------------------+-------------------------+--------+--------+