home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1999-09-27 | 4.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.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 6c 40 63 6c 61 73 73 20 |........|l@class |
|00000010| 55 57 69 6e 64 6f 77 43 | 6f 6d 62 6f 43 6f 6e 74 |UWindowC|omboCont|
|00000020| 72 6f 6c 20 65 78 74 65 | 6e 64 73 20 55 57 69 6e |rol exte|nds UWin|
|00000030| 64 6f 77 44 69 61 6c 6f | 67 43 6f 6e 74 72 6f 6c |dowDialo|gControl|
|00000040| 3b 0d 0a 0d 0a 76 61 72 | 09 66 6c 6f 61 74 09 09 |;....var|.float..|
|00000050| 09 09 45 64 69 74 42 6f | 78 57 69 64 74 68 3b 0d |..EditBo|xWidth;.|
|00000060| 0a 76 61 72 20 66 6c 6f | 61 74 09 09 09 09 45 64 |.var flo|at....Ed|
|00000070| 69 74 41 72 65 61 44 72 | 61 77 58 2c 20 45 64 69 |itAreaDr|awX, Edi|
|00000080| 74 41 72 65 61 44 72 61 | 77 59 3b 0d 0a 0d 0a 76 |tAreaDra|wY;....v|
|00000090| 61 72 20 55 57 69 6e 64 | 6f 77 45 64 69 74 42 6f |ar UWind|owEditBo|
|000000a0| 78 09 09 45 64 69 74 42 | 6f 78 3b 0d 0a 76 61 72 |x..EditB|ox;..var|
|000000b0| 20 55 57 69 6e 64 6f 77 | 43 6f 6d 62 6f 42 75 74 | UWindow|ComboBut|
|000000c0| 74 6f 6e 09 42 75 74 74 | 6f 6e 3b 0d 0a 76 61 72 |ton.Butt|on;..var|
|000000d0| 20 55 57 69 6e 64 6f 77 | 43 6f 6d 62 6f 4c 65 66 | UWindow|ComboLef|
|000000e0| 74 42 75 74 74 6f 6e 20 | 4c 65 66 74 42 75 74 74 |tButton |LeftButt|
|000000f0| 6f 6e 3b 0d 0a 76 61 72 | 20 55 57 69 6e 64 6f 77 |on;..var| UWindow|
|00000100| 43 6f 6d 62 6f 52 69 67 | 68 74 42 75 74 74 6f 6e |ComboRig|htButton|
|00000110| 20 52 69 67 68 74 42 75 | 74 74 6f 6e 3b 0d 0a 0d | RightBu|tton;...|
|00000120| 0a 76 61 72 20 63 6c 61 | 73 73 3c 55 57 69 6e 64 |.var cla|ss<UWind|
|00000130| 6f 77 43 6f 6d 62 6f 4c | 69 73 74 3e 09 4c 69 73 |owComboL|ist>.Lis|
|00000140| 74 43 6c 61 73 73 3b 0d | 0a 76 61 72 20 55 57 69 |tClass;.|.var UWi|
|00000150| 6e 64 6f 77 43 6f 6d 62 | 6f 4c 69 73 74 09 4c 69 |ndowComb|oList.Li|
|00000160| 73 74 3b 0d 0a 0d 0a 76 | 61 72 20 62 6f 6f 6c 09 |st;....v|ar bool.|
|00000170| 09 09 09 62 4c 69 73 74 | 56 69 73 69 62 6c 65 3b |...bList|Visible;|
|00000180| 0d 0a 76 61 72 20 62 6f | 6f 6c 09 09 09 09 62 43 |..var bo|ol....bC|
|00000190| 61 6e 45 64 69 74 3b 0d | 0a 76 61 72 20 62 6f 6f |anEdit;.|.var boo|
|000001a0| 6c 09 09 09 09 62 42 75 | 74 74 6f 6e 73 3b 0d 0a |l....bBu|ttons;..|
|000001b0| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 43 72 65 61 74 |..functi|on Creat|
|000001c0| 65 64 28 29 0d 0a 7b 0d | 0a 09 53 75 70 65 72 2e |ed()..{.|..Super.|
|000001d0| 43 72 65 61 74 65 64 28 | 29 3b 0d 0a 09 0d 0a 09 |Created(|);......|
|000001e0| 45 64 69 74 42 6f 78 20 | 3d 20 55 57 69 6e 64 6f |EditBox |= UWindo|
|000001f0| 77 45 64 69 74 42 6f 78 | 28 43 72 65 61 74 65 57 |wEditBox|(CreateW|
|00000200| 69 6e 64 6f 77 28 63 6c | 61 73 73 27 55 57 69 6e |indow(cl|ass'UWin|
|00000210| 64 6f 77 45 64 69 74 42 | 6f 78 27 2c 20 30 2c 20 |dowEditB|ox', 0, |
|00000220| 30 2c 20 57 69 6e 57 69 | 64 74 68 2d 31 32 2c 20 |0, WinWi|dth-12, |
|00000230| 57 69 6e 48 65 69 67 68 | 74 29 29 3b 20 0d 0a 09 |WinHeigh|t)); ...|
|00000240| 45 64 69 74 42 6f 78 2e | 4e 6f 74 69 66 79 4f 77 |EditBox.|NotifyOw|
|00000250| 6e 65 72 20 3d 20 53 65 | 6c 66 3b 0d 0a 09 45 64 |ner = Se|lf;...Ed|
|00000260| 69 74 42 6f 78 57 69 64 | 74 68 20 3d 20 57 69 6e |itBoxWid|th = Win|
|00000270| 57 69 64 74 68 20 2f 20 | 32 3b 0d 0a 09 45 64 69 |Width / |2;...Edi|
|00000280| 74 42 6f 78 2e 62 54 72 | 61 6e 73 69 65 6e 74 20 |tBox.bTr|ansient |
|00000290| 3d 20 54 72 75 65 3b 0d | 0a 0d 0a 09 42 75 74 74 |= True;.|....Butt|
|000002a0| 6f 6e 20 3d 20 55 57 69 | 6e 64 6f 77 43 6f 6d 62 |on = UWi|ndowComb|
|000002b0| 6f 42 75 74 74 6f 6e 28 | 43 72 65 61 74 65 57 69 |oButton(|CreateWi|
|000002c0| 6e 64 6f 77 28 63 6c 61 | 73 73 27 55 57 69 6e 64 |ndow(cla|ss'UWind|
|000002d0| 6f 77 43 6f 6d 62 6f 42 | 75 74 74 6f 6e 27 2c 20 |owComboB|utton', |
|000002e0| 57 69 6e 57 69 64 74 68 | 2d 31 32 2c 20 30 2c 20 |WinWidth|-12, 0, |
|000002f0| 31 32 2c 20 31 30 29 29 | 3b 20 0d 0a 09 42 75 74 |12, 10))|; ...But|
|00000300| 74 6f 6e 2e 4f 77 6e 65 | 72 20 3d 20 53 65 6c 66 |ton.Owne|r = Self|
|00000310| 3b 0d 0a 09 0d 0a 09 4c | 69 73 74 20 3d 20 55 57 |;......L|ist = UW|
|00000320| 69 6e 64 6f 77 43 6f 6d | 62 6f 4c 69 73 74 28 52 |indowCom|boList(R|
|00000330| 6f 6f 74 2e 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |oot.Crea|teWindow|
|00000340| 28 4c 69 73 74 43 6c 61 | 73 73 2c 20 30 2c 20 30 |(ListCla|ss, 0, 0|
|00000350| 2c 20 31 30 30 2c 20 31 | 30 30 29 29 3b 20 0d 0a |, 100, 1|00)); ..|
|00000360| 09 4c 69 73 74 2e 4c 6f | 6f 6b 41 6e 64 46 65 65 |.List.Lo|okAndFee|
|00000370| 6c 20 3d 20 4c 6f 6f 6b | 41 6e 64 46 65 65 6c 3b |l = Look|AndFeel;|
|00000380| 0d 0a 09 4c 69 73 74 2e | 4f 77 6e 65 72 20 3d 20 |...List.|Owner = |
|00000390| 53 65 6c 66 3b 0d 0a 09 | 4c 69 73 74 2e 53 65 74 |Self;...|List.Set|
|000003a0| 75 70 28 29 3b 0d 0a 09 | 0d 0a 09 4c 69 73 74 2e |up();...|...List.|
|000003b0| 48 69 64 65 57 69 6e 64 | 6f 77 28 29 3b 0d 0a 09 |HideWind|ow();...|
|000003c0| 62 4c 69 73 74 56 69 73 | 69 62 6c 65 20 3d 20 46 |bListVis|ible = F|
|000003d0| 61 6c 73 65 3b 0d 0a 0d | 0a 09 53 65 74 45 64 69 |alse;...|..SetEdi|
|000003e0| 74 54 65 78 74 43 6f 6c | 6f 72 28 4c 6f 6f 6b 41 |tTextCol|or(LookA|
|000003f0| 6e 64 46 65 65 6c 2e 45 | 64 69 74 42 6f 78 54 65 |ndFeel.E|ditBoxTe|
|00000400| 78 74 43 6f 6c 6f 72 29 | 3b 0d 0a 7d 0d 0a 0d 0a |xtColor)|;..}....|
|00000410| 66 75 6e 63 74 69 6f 6e | 20 53 65 74 42 75 74 74 |function| SetButt|
|00000420| 6f 6e 73 28 62 6f 6f 6c | 20 62 49 6e 42 75 74 74 |ons(bool| bInButt|
|00000430| 6f 6e 73 29 0d 0a 7b 0d | 0a 09 62 42 75 74 74 6f |ons)..{.|..bButto|
|00000440| 6e 73 20 3d 20 62 49 6e | 42 75 74 74 6f 6e 73 3b |ns = bIn|Buttons;|
|00000450| 0d 0a 09 69 66 28 62 49 | 6e 42 75 74 74 6f 6e 73 |...if(bI|nButtons|
|00000460| 29 0d 0a 09 7b 0d 0a 09 | 09 4c 65 66 74 42 75 74 |)...{...|.LeftBut|
|00000470| 74 6f 6e 20 3d 20 55 57 | 69 6e 64 6f 77 43 6f 6d |ton = UW|indowCom|
|00000480| 62 6f 4c 65 66 74 42 75 | 74 74 6f 6e 28 43 72 65 |boLeftBu|tton(Cre|
|00000490| 61 74 65 57 69 6e 64 6f | 77 28 63 6c 61 73 73 27 |ateWindo|w(class'|
|000004a0| 55 57 69 6e 64 6f 77 43 | 6f 6d 62 6f 4c 65 66 74 |UWindowC|omboLeft|
|000004b0| 42 75 74 74 6f 6e 27 2c | 20 57 69 6e 57 69 64 74 |Button',| WinWidt|
|000004c0| 68 2d 31 32 2c 20 30 2c | 20 31 32 2c 20 31 30 29 |h-12, 0,| 12, 10)|
|000004d0| 29 3b 0d 0a 09 09 52 69 | 67 68 74 42 75 74 74 6f |);....Ri|ghtButto|
|000004e0| 6e 20 3d 20 55 57 69 6e | 64 6f 77 43 6f 6d 62 6f |n = UWin|dowCombo|
|000004f0| 52 69 67 68 74 42 75 74 | 74 6f 6e 28 43 72 65 61 |RightBut|ton(Crea|
|00000500| 74 65 57 69 6e 64 6f 77 | 28 63 6c 61 73 73 27 55 |teWindow|(class'U|
|00000510| 57 69 6e 64 6f 77 43 6f | 6d 62 6f 52 69 67 68 74 |WindowCo|mboRight|
|00000520| 42 75 74 74 6f 6e 27 2c | 20 57 69 6e 57 69 64 74 |Button',| WinWidt|
|00000530| 68 2d 31 32 2c 20 30 2c | 20 31 32 2c 20 31 30 29 |h-12, 0,| 12, 10)|
|00000540| 29 3b 0d 0a 09 7d 0d 0a | 09 65 6c 73 65 0d 0a 09 |);...}..|.else...|
|00000550| 7b 0d 0a 09 09 4c 65 66 | 74 42 75 74 74 6f 6e 20 |{....Lef|tButton |
|00000560| 3d 20 4e 6f 6e 65 3b 0d | 0a 09 09 52 69 67 68 74 |= None;.|...Right|
|00000570| 42 75 74 74 6f 6e 20 3d | 20 4e 6f 6e 65 3b 0d 0a |Button =| None;..|
|00000580| 09 7d 0d 0a 7d 0d 0a 0d | 0a 66 75 6e 63 74 69 6f |.}..}...|.functio|
|00000590| 6e 20 4e 6f 74 69 66 79 | 28 62 79 74 65 20 45 29 |n Notify|(byte E)|
|000005a0| 0d 0a 7b 0d 0a 09 53 75 | 70 65 72 2e 4e 6f 74 69 |..{...Su|per.Noti|
|000005b0| 66 79 28 45 29 3b 0d 0a | 0d 0a 09 69 66 28 45 20 |fy(E);..|...if(E |
|000005c0| 3d 3d 20 44 45 5f 4c 4d | 6f 75 73 65 44 6f 77 6e |== DE_LM|ouseDown|
|000005d0| 29 0d 0a 09 7b 0d 0a 09 | 09 69 66 28 21 62 4c 69 |)...{...|.if(!bLi|
|000005e0| 73 74 56 69 73 69 62 6c | 65 29 0d 0a 09 09 7b 0d |stVisibl|e)....{.|
|000005f0| 0a 09 09 09 69 66 28 21 | 62 43 61 6e 45 64 69 74 |....if(!|bCanEdit|
|00000600| 29 0d 0a 09 09 09 7b 0d | 0a 09 09 09 09 44 72 6f |).....{.|.....Dro|
|00000610| 70 44 6f 77 6e 28 29 3b | 0d 0a 09 09 09 09 52 6f |pDown();|......Ro|
|00000620| 6f 74 2e 43 61 70 74 75 | 72 65 4d 6f 75 73 65 28 |ot.Captu|reMouse(|
|00000630| 4c 69 73 74 29 3b 0d 0a | 09 09 09 7d 0d 0a 09 09 |List);..|...}....|
|00000640| 7d 0d 0a 09 09 65 6c 73 | 65 0d 0a 09 09 09 43 6c |}....els|e.....Cl|
|00000650| 6f 73 65 55 70 28 29 3b | 0d 0a 09 7d 0d 0a 7d 0d |oseUp();|...}..}.|
|00000660| 0a 0d 0a 66 75 6e 63 74 | 69 6f 6e 20 69 6e 74 20 |...funct|ion int |
|00000670| 46 69 6e 64 49 74 65 6d | 49 6e 64 65 78 28 73 74 |FindItem|Index(st|
|00000680| 72 69 6e 67 20 56 2c 20 | 6f 70 74 69 6f 6e 61 6c |ring V, |optional|
|00000690| 20 62 6f 6f 6c 20 62 49 | 67 6e 6f 72 65 43 61 73 | bool bI|gnoreCas|
|000006a0| 65 29 0d 0a 7b 0d 0a 09 | 72 65 74 75 72 6e 20 4c |e)..{...|return L|
|000006b0| 69 73 74 2e 46 69 6e 64 | 49 74 65 6d 49 6e 64 65 |ist.Find|ItemInde|
|000006c0| 78 28 56 2c 20 62 49 67 | 6e 6f 72 65 43 61 73 65 |x(V, bIg|noreCase|
|000006d0| 29 3b 0d 0a 7d 0d 0a 0d | 0a 66 75 6e 63 74 69 6f |);..}...|.functio|
|000006e0| 6e 20 52 65 6d 6f 76 65 | 49 74 65 6d 28 69 6e 74 |n Remove|Item(int|
|000006f0| 20 49 6e 64 65 78 29 0d | 0a 7b 0d 0a 09 4c 69 73 | Index).|.{...Lis|
|00000700| 74 2e 52 65 6d 6f 76 65 | 49 74 65 6d 28 49 6e 64 |t.Remove|Item(Ind|
|00000710| 65 78 29 3b 0d 0a 7d 0d | 0a 0d 0a 66 75 6e 63 74 |ex);..}.|...funct|
|00000720| 69 6f 6e 20 69 6e 74 20 | 46 69 6e 64 49 74 65 6d |ion int |FindItem|
|00000730| 49 6e 64 65 78 32 28 73 | 74 72 69 6e 67 20 56 32 |Index2(s|tring V2|
|00000740| 2c 20 6f 70 74 69 6f 6e | 61 6c 20 62 6f 6f 6c 20 |, option|al bool |
|00000750| 62 49 67 6e 6f 72 65 43 | 61 73 65 29 0d 0a 7b 0d |bIgnoreC|ase)..{.|
|00000760| 0a 09 72 65 74 75 72 6e | 20 4c 69 73 74 2e 46 69 |..return| List.Fi|
|00000770| 6e 64 49 74 65 6d 49 6e | 64 65 78 32 28 56 32 2c |ndItemIn|dex2(V2,|
|00000780| 20 62 49 67 6e 6f 72 65 | 43 61 73 65 29 3b 0d 0a | bIgnore|Case);..|
|00000790| 7d 0d 0a 0d 0a 66 75 6e | 63 74 69 6f 6e 20 43 6c |}....fun|ction Cl|
|000007a0| 6f 73 65 28 6f 70 74 69 | 6f 6e 61 6c 20 62 6f 6f |ose(opti|onal boo|
|000007b0| 6c 20 62 42 79 50 61 72 | 65 6e 74 29 0d 0a 7b 0d |l bByPar|ent)..{.|
|000007c0| 0a 09 69 66 28 62 42 79 | 50 61 72 65 6e 74 20 26 |..if(bBy|Parent &|
|000007d0| 26 20 62 4c 69 73 74 56 | 69 73 69 62 6c 65 29 0d |& bListV|isible).|
|000007e0| 0a 09 09 43 6c 6f 73 65 | 55 70 28 29 3b 0d 0a 0d |...Close|Up();...|
|000007f0| 0a 09 53 75 70 65 72 2e | 43 6c 6f 73 65 28 62 42 |..Super.|Close(bB|
|00000800| 79 50 61 72 65 6e 74 29 | 3b 0d 0a 7d 0d 0a 0d 0a |yParent)|;..}....|
|00000810| 66 75 6e 63 74 69 6f 6e | 20 53 65 74 4e 75 6d 65 |function| SetNume|
|00000820| 72 69 63 4f 6e 6c 79 28 | 62 6f 6f 6c 20 62 4e 75 |ricOnly(|bool bNu|
|00000830| 6d 65 72 69 63 4f 6e 6c | 79 29 0d 0a 7b 0d 0a 09 |mericOnl|y)..{...|
|00000840| 45 64 69 74 42 6f 78 2e | 62 4e 75 6d 65 72 69 63 |EditBox.|bNumeric|
|00000850| 4f 6e 6c 79 20 3d 20 62 | 4e 75 6d 65 72 69 63 4f |Only = b|NumericO|
|00000860| 6e 6c 79 3b 0d 0a 7d 0d | 0a 0d 0a 66 75 6e 63 74 |nly;..}.|...funct|
|00000870| 69 6f 6e 20 53 65 74 4e | 75 6d 65 72 69 63 46 6c |ion SetN|umericFl|
|00000880| 6f 61 74 28 62 6f 6f 6c | 20 62 4e 75 6d 65 72 69 |oat(bool| bNumeri|
|00000890| 63 46 6c 6f 61 74 29 0d | 0a 7b 0d 0a 09 45 64 69 |cFloat).|.{...Edi|
|000008a0| 74 42 6f 78 2e 62 4e 75 | 6d 65 72 69 63 46 6c 6f |tBox.bNu|mericFlo|
|000008b0| 61 74 20 3d 20 62 4e 75 | 6d 65 72 69 63 46 6c 6f |at = bNu|mericFlo|
|000008c0| 61 74 3b 0d 0a 7d 0d 0a | 0d 0a 66 75 6e 63 74 69 |at;..}..|..functi|
|000008d0| 6f 6e 20 53 65 74 46 6f | 6e 74 28 69 6e 74 20 4e |on SetFo|nt(int N|
|000008e0| 65 77 46 6f 6e 74 29 0d | 0a 7b 0d 0a 09 53 75 70 |ewFont).|.{...Sup|
|000008f0| 65 72 2e 53 65 74 46 6f | 6e 74 28 4e 65 77 46 6f |er.SetFo|nt(NewFo|
|00000900| 6e 74 29 3b 0d 0a 09 45 | 64 69 74 42 6f 78 2e 53 |nt);...E|ditBox.S|
|00000910| 65 74 46 6f 6e 74 28 4e | 65 77 46 6f 6e 74 29 3b |etFont(N|ewFont);|
|00000920| 0d 0a 7d 0d 0a 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |..}....f|unction |
|00000930| 53 65 74 45 64 69 74 54 | 65 78 74 43 6f 6c 6f 72 |SetEditT|extColor|
|00000940| 28 43 6f 6c 6f 72 20 4e | 65 77 43 6f 6c 6f 72 29 |(Color N|ewColor)|
|00000950| 0d 0a 7b 0d 0a 09 45 64 | 69 74 42 6f 78 2e 53 65 |..{...Ed|itBox.Se|
|00000960| 74 54 65 78 74 43 6f 6c | 6f 72 28 4e 65 77 43 6f |tTextCol|or(NewCo|
|00000970| 6c 6f 72 29 3b 0d 0a 7d | 0d 0a 0d 0a 66 75 6e 63 |lor);..}|....func|
|00000980| 74 69 6f 6e 20 53 65 74 | 45 64 69 74 61 62 6c 65 |tion Set|Editable|
|00000990| 28 62 6f 6f 6c 20 62 4e | 65 77 43 61 6e 45 64 69 |(bool bN|ewCanEdi|
|000009a0| 74 29 0d 0a 7b 0d 0a 09 | 62 43 61 6e 45 64 69 74 |t)..{...|bCanEdit|
|000009b0| 20 3d 20 62 4e 65 77 43 | 61 6e 45 64 69 74 3b 0d | = bNewC|anEdit;.|
|000009c0| 0a 09 45 64 69 74 42 6f | 78 2e 53 65 74 45 64 69 |..EditBo|x.SetEdi|
|000009d0| 74 61 62 6c 65 28 62 43 | 61 6e 45 64 69 74 29 3b |table(bC|anEdit);|
|000009e0| 0d 0a 7d 0d 0a 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |..}....f|unction |
|000009f0| 69 6e 74 20 47 65 74 53 | 65 6c 65 63 74 65 64 49 |int GetS|electedI|
|00000a00| 6e 64 65 78 28 29 0d 0a | 7b 0d 0a 09 72 65 74 75 |ndex()..|{...retu|
|00000a10| 72 6e 20 4c 69 73 74 2e | 46 69 6e 64 49 74 65 6d |rn List.|FindItem|
|00000a20| 49 6e 64 65 78 28 47 65 | 74 56 61 6c 75 65 28 29 |Index(Ge|tValue()|
|00000a30| 29 3b 0d 0a 7d 0d 0a 0d | 0a 66 75 6e 63 74 69 6f |);..}...|.functio|
|00000a40| 6e 20 53 65 74 53 65 6c | 65 63 74 65 64 49 6e 64 |n SetSel|ectedInd|
|00000a50| 65 78 28 69 6e 74 20 49 | 6e 64 65 78 29 0d 0a 7b |ex(int I|ndex)..{|
|00000a60| 0d 0a 09 53 65 74 56 61 | 6c 75 65 28 4c 69 73 74 |...SetVa|lue(List|
|00000a70| 2e 47 65 74 49 74 65 6d | 56 61 6c 75 65 28 49 6e |.GetItem|Value(In|
|00000a80| 64 65 78 29 2c 20 4c 69 | 73 74 2e 47 65 74 49 74 |dex), Li|st.GetIt|
|00000a90| 65 6d 56 61 6c 75 65 32 | 28 49 6e 64 65 78 29 29 |emValue2|(Index))|
|00000aa0| 3b 0d 0a 7d 0d 0a 0d 0a | 66 75 6e 63 74 69 6f 6e |;..}....|function|
|00000ab0| 20 73 74 72 69 6e 67 20 | 47 65 74 56 61 6c 75 65 | string |GetValue|
|00000ac0| 28 29 0d 0a 7b 0d 0a 09 | 72 65 74 75 72 6e 20 45 |()..{...|return E|
|00000ad0| 64 69 74 42 6f 78 2e 47 | 65 74 56 61 6c 75 65 28 |ditBox.G|etValue(|
|00000ae0| 29 3b 0d 0a 7d 0d 0a 0d | 0a 66 75 6e 63 74 69 6f |);..}...|.functio|
|00000af0| 6e 20 73 74 72 69 6e 67 | 20 47 65 74 56 61 6c 75 |n string| GetValu|
|00000b00| 65 32 28 29 0d 0a 7b 0d | 0a 09 72 65 74 75 72 6e |e2()..{.|..return|
|00000b10| 20 45 64 69 74 42 6f 78 | 2e 47 65 74 56 61 6c 75 | EditBox|.GetValu|
|00000b20| 65 32 28 29 3b 0d 0a 7d | 0d 0a 0d 0a 66 75 6e 63 |e2();..}|....func|
|00000b30| 74 69 6f 6e 20 53 65 74 | 56 61 6c 75 65 28 73 74 |tion Set|Value(st|
|00000b40| 72 69 6e 67 20 4e 65 77 | 56 61 6c 75 65 2c 20 6f |ring New|Value, o|
|00000b50| 70 74 69 6f 6e 61 6c 20 | 73 74 72 69 6e 67 20 4e |ptional |string N|
|00000b60| 65 77 56 61 6c 75 65 32 | 29 0d 0a 7b 0d 0a 09 45 |ewValue2|)..{...E|
|00000b70| 64 69 74 42 6f 78 2e 53 | 65 74 56 61 6c 75 65 28 |ditBox.S|etValue(|
|00000b80| 4e 65 77 56 61 6c 75 65 | 2c 20 4e 65 77 56 61 6c |NewValue|, NewVal|
|00000b90| 75 65 32 29 3b 0d 0a 7d | 0d 0a 0d 0a 66 75 6e 63 |ue2);..}|....func|
|00000ba0| 74 69 6f 6e 20 53 65 74 | 4d 61 78 4c 65 6e 67 74 |tion Set|MaxLengt|
|00000bb0| 68 28 69 6e 74 20 4d 61 | 78 4c 65 6e 67 74 68 29 |h(int Ma|xLength)|
|00000bc0| 0d 0a 7b 0d 0a 09 45 64 | 69 74 42 6f 78 2e 4d 61 |..{...Ed|itBox.Ma|
|00000bd0| 78 4c 65 6e 67 74 68 20 | 3d 20 4d 61 78 4c 65 6e |xLength |= MaxLen|
|00000be0| 67 74 68 3b 0d 0a 7d 0d | 0a 0d 0a 66 75 6e 63 74 |gth;..}.|...funct|
|00000bf0| 69 6f 6e 20 50 61 69 6e | 74 28 43 61 6e 76 61 73 |ion Pain|t(Canvas|
|00000c00| 20 43 2c 20 66 6c 6f 61 | 74 20 58 2c 20 66 6c 6f | C, floa|t X, flo|
|00000c10| 61 74 20 59 29 0d 0a 7b | 0d 0a 09 4c 6f 6f 6b 41 |at Y)..{|...LookA|
|00000c20| 6e 64 46 65 65 6c 2e 43 | 6f 6d 62 6f 5f 44 72 61 |ndFeel.C|ombo_Dra|
|00000c30| 77 28 53 65 6c 66 2c 20 | 43 29 3b 0d 0a 09 53 75 |w(Self, |C);...Su|
|00000c40| 70 65 72 2e 50 61 69 6e | 74 28 43 2c 20 58 2c 20 |per.Pain|t(C, X, |
|00000c50| 59 29 3b 0d 0a 7d 0d 0a | 0d 0a 66 75 6e 63 74 69 |Y);..}..|..functi|
|00000c60| 6f 6e 20 41 64 64 49 74 | 65 6d 28 73 74 72 69 6e |on AddIt|em(strin|
|00000c70| 67 20 53 2c 20 6f 70 74 | 69 6f 6e 61 6c 20 73 74 |g S, opt|ional st|
|00000c80| 72 69 6e 67 20 53 32 2c | 20 6f 70 74 69 6f 6e 61 |ring S2,| optiona|
|00000c90| 6c 20 69 6e 74 20 53 6f | 72 74 57 65 69 67 68 74 |l int So|rtWeight|
|00000ca0| 29 0d 0a 7b 0d 0a 09 4c | 69 73 74 2e 41 64 64 49 |)..{...L|ist.AddI|
|00000cb0| 74 65 6d 28 53 2c 20 53 | 32 2c 20 53 6f 72 74 57 |tem(S, S|2, SortW|
|00000cc0| 65 69 67 68 74 29 3b 0d | 0a 7d 0d 0a 0d 0a 66 75 |eight);.|.}....fu|
|00000cd0| 6e 63 74 69 6f 6e 20 49 | 6e 73 65 72 74 49 74 65 |nction I|nsertIte|
|00000ce0| 6d 28 73 74 72 69 6e 67 | 20 53 2c 20 6f 70 74 69 |m(string| S, opti|
|00000cf0| 6f 6e 61 6c 20 73 74 72 | 69 6e 67 20 53 32 2c 20 |onal str|ing S2, |
|00000d00| 6f 70 74 69 6f 6e 61 6c | 20 69 6e 74 20 53 6f 72 |optional| int Sor|
|00000d10| 74 57 65 69 67 68 74 29 | 0d 0a 7b 0d 0a 09 4c 69 |tWeight)|..{...Li|
|00000d20| 73 74 2e 49 6e 73 65 72 | 74 49 74 65 6d 28 53 2c |st.Inser|tItem(S,|
|00000d30| 20 53 32 2c 20 53 6f 72 | 74 57 65 69 67 68 74 29 | S2, Sor|tWeight)|
|00000d40| 3b 0d 0a 7d 0d 0a 0d 0a | 66 75 6e 63 74 69 6f 6e |;..}....|function|
|00000d50| 20 42 65 66 6f 72 65 50 | 61 69 6e 74 28 43 61 6e | BeforeP|aint(Can|
|00000d60| 76 61 73 20 43 2c 20 66 | 6c 6f 61 74 20 58 2c 20 |vas C, f|loat X, |
|00000d70| 66 6c 6f 61 74 20 59 29 | 0d 0a 7b 0d 0a 09 53 75 |float Y)|..{...Su|
|00000d80| 70 65 72 2e 42 65 66 6f | 72 65 50 61 69 6e 74 28 |per.Befo|rePaint(|
|00000d90| 43 2c 20 58 2c 20 59 29 | 3b 0d 0a 09 4c 6f 6f 6b |C, X, Y)|;...Look|
|00000da0| 41 6e 64 46 65 65 6c 2e | 43 6f 6d 62 6f 5f 53 65 |AndFeel.|Combo_Se|
|00000db0| 74 75 70 53 69 7a 65 73 | 28 53 65 6c 66 2c 20 43 |tupSizes|(Self, C|
|00000dc0| 29 3b 0d 0a 09 4c 69 73 | 74 2e 62 4c 65 61 76 65 |);...Lis|t.bLeave|
|00000dd0| 4f 6e 73 63 72 65 65 6e | 20 3d 20 62 4c 69 73 74 |Onscreen| = bList|
|00000de0| 56 69 73 69 62 6c 65 20 | 26 26 20 62 4c 65 61 76 |Visible |&& bLeav|
|00000df0| 65 4f 6e 73 63 72 65 65 | 6e 3b 0d 0a 7d 0d 0a 0d |eOnscree|n;..}...|
|00000e00| 0a 66 75 6e 63 74 69 6f | 6e 20 43 6c 6f 73 65 55 |.functio|n CloseU|
|00000e10| 70 28 29 0d 0a 7b 0d 0a | 09 62 4c 69 73 74 56 69 |p()..{..|.bListVi|
|00000e20| 73 69 62 6c 65 20 3d 20 | 46 61 6c 73 65 3b 0d 0a |sible = |False;..|
|00000e30| 09 45 64 69 74 42 6f 78 | 2e 53 65 74 45 64 69 74 |.EditBox|.SetEdit|
|00000e40| 61 62 6c 65 28 62 43 61 | 6e 45 64 69 74 29 3b 0d |able(bCa|nEdit);.|
|00000e50| 0a 09 45 64 69 74 42 6f | 78 2e 53 65 6c 65 63 74 |..EditBo|x.Select|
|00000e60| 41 6c 6c 28 29 3b 0d 0a | 09 4c 69 73 74 2e 48 69 |All();..|.List.Hi|
|00000e70| 64 65 57 69 6e 64 6f 77 | 28 29 3b 0d 0a 7d 0d 0a |deWindow|();..}..|
|00000e80| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 44 72 6f 70 44 |..functi|on DropD|
|00000e90| 6f 77 6e 28 29 0d 0a 7b | 0d 0a 09 62 4c 69 73 74 |own()..{|...bList|
|00000ea0| 56 69 73 69 62 6c 65 20 | 3d 20 54 72 75 65 3b 0d |Visible |= True;.|
|00000eb0| 0a 09 45 64 69 74 42 6f | 78 2e 53 65 74 45 64 69 |..EditBo|x.SetEdi|
|00000ec0| 74 61 62 6c 65 28 46 61 | 6c 73 65 29 3b 0d 0a 09 |table(Fa|lse);...|
|00000ed0| 4c 69 73 74 2e 53 68 6f | 77 57 69 6e 64 6f 77 28 |List.Sho|wWindow(|
|00000ee0| 29 3b 0d 0a 7d 0d 0a 0d | 0a 66 75 6e 63 74 69 6f |);..}...|.functio|
|00000ef0| 6e 20 53 6f 72 74 28 29 | 0d 0a 7b 0d 0a 09 4c 69 |n Sort()|..{...Li|
|00000f00| 73 74 2e 53 6f 72 74 28 | 29 3b 0d 0a 7d 0d 0a 0d |st.Sort(|);..}...|
|00000f10| 0a 66 75 6e 63 74 69 6f | 6e 20 43 6c 65 61 72 56 |.functio|n ClearV|
|00000f20| 61 6c 75 65 28 29 0d 0a | 7b 0d 0a 09 45 64 69 74 |alue()..|{...Edit|
|00000f30| 42 6f 78 2e 43 6c 65 61 | 72 28 29 3b 0d 0a 7d 0d |Box.Clea|r();..}.|
|00000f40| 0a 0d 0a 66 75 6e 63 74 | 69 6f 6e 20 43 6c 65 61 |...funct|ion Clea|
|00000f50| 72 28 29 0d 0a 7b 0d 0a | 09 4c 69 73 74 2e 43 6c |r()..{..|.List.Cl|
|00000f60| 65 61 72 28 29 3b 0d 0a | 09 45 64 69 74 42 6f 78 |ear();..|.EditBox|
|00000f70| 2e 43 6c 65 61 72 28 29 | 3b 0d 0a 7d 0d 0a 0d 0a |.Clear()|;..}....|
|00000f80| 66 75 6e 63 74 69 6f 6e | 20 46 6f 63 75 73 4f 74 |function| FocusOt|
|00000f90| 68 65 72 57 69 6e 64 6f | 77 28 55 57 69 6e 64 6f |herWindo|w(UWindo|
|00000fa0| 77 57 69 6e 64 6f 77 20 | 57 29 0d 0a 7b 0d 0a 09 |wWindow |W)..{...|
|00000fb0| 53 75 70 65 72 2e 46 6f | 63 75 73 4f 74 68 65 72 |Super.Fo|cusOther|
|00000fc0| 57 69 6e 64 6f 77 28 57 | 29 3b 0d 0a 0d 0a 09 69 |Window(W|);.....i|
|00000fd0| 66 28 62 4c 69 73 74 56 | 69 73 69 62 6c 65 20 26 |f(bListV|isible &|
|00000fe0| 26 20 57 2e 50 61 72 65 | 6e 74 57 69 6e 64 6f 77 |& W.Pare|ntWindow|
|00000ff0| 20 21 3d 20 53 65 6c 66 | 20 26 26 20 57 20 21 3d | != Self| && W !=|
|00001000| 20 4c 69 73 74 20 26 26 | 20 57 2e 50 61 72 65 6e | List &&| W.Paren|
|00001010| 74 57 69 6e 64 6f 77 20 | 21 3d 20 4c 69 73 74 29 |tWindow |!= List)|
|00001020| 0d 0a 09 09 43 6c 6f 73 | 65 55 70 28 29 3b 0d 0a |....Clos|eUp();..|
|00001030| 7d 0d 0a 0d 0a 00 | |}..... | |
+--------+-------------------------+-------------------------+--------+--------+
