/ The Games Machine 2 (DVD) / XENIADVD2.iso / Demo / Devastation / data1.cab / App_Executables / System / UWindow.u / UWindowWindow_UWindowMessageBoxCW_ScriptText.TextBuffer

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 45 4c 63 6c 61 73 73 20 |........|ELclass |
|00000010| 55 57 69 6e 64 6f 77 4d | 65 73 73 61 67 65 42 6f |UWindowM|essageBo|
|00000020| 78 43 57 20 65 78 74 65 | 6e 64 73 20 55 57 69 6e |xCW exte|nds UWin|
|00000030| 64 6f 77 44 69 61 6c 6f | 67 43 6c 69 65 6e 74 57 |dowDialo|gClientW|
|00000040| 69 6e 64 6f 77 3b 0d 0a | 0d 0a 76 61 72 20 4d 65 |indow;..|..var Me|
|00000050| 73 73 61 67 65 42 6f 78 | 42 75 74 74 6f 6e 73 20 |ssageBox|Buttons |
|00000060| 42 75 74 74 6f 6e 73 3b | 0d 0a 0d 0a 76 61 72 20 |Buttons;|....var |
|00000070| 4d 65 73 73 61 67 65 42 | 6f 78 52 65 73 75 6c 74 |MessageB|oxResult|
|00000080| 20 45 6e 74 65 72 52 65 | 73 75 6c 74 3b 0d 0a 76 | EnterRe|sult;..v|
|00000090| 61 72 20 55 57 69 6e 64 | 6f 77 53 6d 61 6c 6c 42 |ar UWind|owSmallB|
|000000a0| 75 74 74 6f 6e 20 59 65 | 73 42 75 74 74 6f 6e 2c |utton Ye|sButton,|
|000000b0| 20 4e 6f 42 75 74 74 6f | 6e 2c 20 4f 4b 42 75 74 | NoButto|n, OKBut|
|000000c0| 74 6f 6e 2c 20 43 61 6e | 63 65 6c 42 75 74 74 6f |ton, Can|celButto|
|000000d0| 6e 3b 0d 0a 76 61 72 20 | 6c 6f 63 61 6c 69 7a 65 |n;..var |localize|
|000000e0| 64 20 73 74 72 69 6e 67 | 20 59 65 73 54 65 78 74 |d string| YesText|
|000000f0| 2c 20 4e 6f 54 65 78 74 | 2c 20 4f 4b 54 65 78 74 |, NoText|, OKText|
|00000100| 2c 20 43 61 6e 63 65 6c | 54 65 78 74 3b 0d 0a 76 |, Cancel|Text;..v|
|00000110| 61 72 20 55 57 69 6e 64 | 6f 77 4d 65 73 73 61 67 |ar UWind|owMessag|
|00000120| 65 42 6f 78 41 72 65 61 | 20 4d 65 73 73 61 67 65 |eBoxArea| Message|
|00000130| 41 72 65 61 3b 0d 0a 0d | 0a 66 75 6e 63 74 69 6f |Area;...|.functio|
|00000140| 6e 20 43 72 65 61 74 65 | 64 28 29 0d 0a 7b 0d 0a |n Create|d()..{..|
|00000150| 09 53 75 70 65 72 2e 43 | 72 65 61 74 65 64 28 29 |.Super.C|reated()|
|00000160| 3b 0d 0a 09 53 65 74 41 | 63 63 65 70 74 73 46 6f |;...SetA|cceptsFo|
|00000170| 63 75 73 28 29 3b 0d 0a | 0d 0a 09 4d 65 73 73 61 |cus();..|...Messa|
|00000180| 67 65 41 72 65 61 20 3d | 20 55 57 69 6e 64 6f 77 |geArea =| UWindow|
|00000190| 4d 65 73 73 61 67 65 42 | 6f 78 41 72 65 61 28 43 |MessageB|oxArea(C|
|000001a0| 72 65 61 74 65 57 69 6e | 64 6f 77 28 63 6c 61 73 |reateWin|dow(clas|
|000001b0| 73 27 55 57 69 6e 64 6f | 77 4d 65 73 73 61 67 65 |s'UWindo|wMessage|
|000001c0| 42 6f 78 41 72 65 61 27 | 2c 20 31 30 2c 20 31 30 |BoxArea'|, 10, 10|
|000001d0| 2c 20 57 69 6e 57 69 64 | 74 68 2d 32 30 2c 20 57 |, WinWid|th-20, W|
|000001e0| 69 6e 48 65 69 67 68 74 | 2d 34 34 29 29 3b 0d 0a |inHeight|-44));..|
|000001f0| 7d 0d 0a 0d 0a 66 75 6e | 63 74 69 6f 6e 20 4b 65 |}....fun|ction Ke|
|00000200| 79 44 6f 77 6e 28 45 49 | 6e 70 75 74 4b 65 79 20 |yDown(EI|nputKey |
|00000210| 4b 65 79 2c 20 66 6c 6f | 61 74 20 58 2c 20 66 6c |Key, flo|at X, fl|
|00000220| 6f 61 74 20 59 29 0d 0a | 7b 0d 0a 09 6c 6f 63 61 |oat Y)..|{...loca|
|00000230| 6c 20 55 57 69 6e 64 6f | 77 4d 65 73 73 61 67 65 |l UWindo|wMessage|
|00000240| 42 6f 78 20 50 3b 0d 0a | 0d 0a 09 50 20 3d 20 55 |Box P;..|...P = U|
|00000250| 57 69 6e 64 6f 77 4d 65 | 73 73 61 67 65 42 6f 78 |WindowMe|ssageBox|
|00000260| 28 50 61 72 65 6e 74 57 | 69 6e 64 6f 77 29 3b 0d |(ParentW|indow);.|
|00000270| 0a 0d 0a 09 69 66 28 4b | 65 79 20 3d 3d 20 47 65 |....if(K|ey == Ge|
|00000280| 74 50 6c 61 79 65 72 4f | 77 6e 65 72 28 29 2e 45 |tPlayerO|wner().E|
|00000290| 49 6e 70 75 74 4b 65 79 | 2e 49 4b 5f 45 6e 74 65 |InputKey|.IK_Ente|
|000002a0| 72 20 26 26 20 45 6e 74 | 65 72 52 65 73 75 6c 74 |r && Ent|erResult|
|000002b0| 20 21 3d 20 4d 52 5f 4e | 6f 6e 65 29 0d 0a 09 7b | != MR_N|one)...{|
|000002c0| 0d 0a 09 09 50 20 3d 20 | 55 57 69 6e 64 6f 77 4d |....P = |UWindowM|
|000002d0| 65 73 73 61 67 65 42 6f | 78 28 50 61 72 65 6e 74 |essageBo|x(Parent|
|000002e0| 57 69 6e 64 6f 77 29 3b | 0d 0a 09 09 50 2e 52 65 |Window);|....P.Re|
|000002f0| 73 75 6c 74 20 3d 20 45 | 6e 74 65 72 52 65 73 75 |sult = E|nterResu|
|00000300| 6c 74 3b 0d 0a 09 09 50 | 2e 43 6c 6f 73 65 28 29 |lt;....P|.Close()|
|00000310| 3b 0d 0a 09 7d 0d 0a 7d | 0d 0a 0d 0a 66 75 6e 63 |;...}..}|....func|
|00000320| 74 69 6f 6e 20 42 65 66 | 6f 72 65 50 61 69 6e 74 |tion Bef|orePaint|
|00000330| 28 43 61 6e 76 61 73 20 | 43 2c 20 66 6c 6f 61 74 |(Canvas |C, float|
|00000340| 20 58 2c 20 66 6c 6f 61 | 74 20 59 29 0d 0a 7b 0d | X, floa|t Y)..{.|
|00000350| 0a 09 53 75 70 65 72 2e | 42 65 66 6f 72 65 50 61 |..Super.|BeforePa|
|00000360| 69 6e 74 28 43 2c 20 58 | 2c 20 59 29 3b 0d 0a 0d |int(C, X|, Y);...|
|00000370| 0a 09 4d 65 73 73 61 67 | 65 41 72 65 61 2e 53 65 |..Messag|eArea.Se|
|00000380| 74 53 69 7a 65 28 57 69 | 6e 57 69 64 74 68 2d 32 |tSize(Wi|nWidth-2|
|00000390| 30 2c 20 57 69 6e 48 65 | 69 67 68 74 2d 34 34 29 |0, WinHe|ight-44)|
|000003a0| 3b 0d 0a 0d 0a 09 73 77 | 69 74 63 68 28 42 75 74 |;.....sw|itch(But|
|000003b0| 74 6f 6e 73 29 0d 0a 09 | 7b 0d 0a 09 63 61 73 65 |tons)...|{...case|
|000003c0| 20 4d 42 5f 59 65 73 4e | 6f 43 61 6e 63 65 6c 3a | MB_YesN|oCancel:|
|000003d0| 0d 0a 09 09 43 61 6e 63 | 65 6c 42 75 74 74 6f 6e |....Canc|elButton|
|000003e0| 2e 57 69 6e 4c 65 66 74 | 20 3d 20 57 69 6e 57 69 |.WinLeft| = WinWi|
|000003f0| 64 74 68 20 2d 20 35 32 | 3b 0d 0a 09 09 43 61 6e |dth - 52|;....Can|
|00000400| 63 65 6c 42 75 74 74 6f | 6e 2e 57 69 6e 54 6f 70 |celButto|n.WinTop|
|00000410| 20 3d 20 57 69 6e 48 65 | 69 67 68 74 20 2d 20 32 | = WinHe|ight - 2|
|00000420| 30 3b 0d 0a 09 09 4e 6f | 42 75 74 74 6f 6e 2e 57 |0;....No|Button.W|
|00000430| 69 6e 4c 65 66 74 20 3d | 20 57 69 6e 57 69 64 74 |inLeft =| WinWidt|
|00000440| 68 20 2d 20 31 30 34 3b | 0d 0a 09 09 4e 6f 42 75 |h - 104;|....NoBu|
|00000450| 74 74 6f 6e 2e 57 69 6e | 54 6f 70 20 3d 20 57 69 |tton.Win|Top = Wi|
|00000460| 6e 48 65 69 67 68 74 20 | 2d 20 32 30 3b 0d 0a 09 |nHeight |- 20;...|
|00000470| 09 59 65 73 42 75 74 74 | 6f 6e 2e 57 69 6e 4c 65 |.YesButt|on.WinLe|
|00000480| 66 74 20 3d 20 57 69 6e | 57 69 64 74 68 20 2d 20 |ft = Win|Width - |
|00000490| 31 35 36 3b 0d 0a 09 09 | 59 65 73 42 75 74 74 6f |156;....|YesButto|
|000004a0| 6e 2e 57 69 6e 54 6f 70 | 20 3d 20 57 69 6e 48 65 |n.WinTop| = WinHe|
|000004b0| 69 67 68 74 20 2d 20 32 | 30 3b 0d 0a 09 09 62 72 |ight - 2|0;....br|
|000004c0| 65 61 6b 3b 0d 0a 09 63 | 61 73 65 20 4d 42 5f 59 |eak;...c|ase MB_Y|
|000004d0| 65 73 4e 6f 3a 0d 0a 09 | 09 4e 6f 42 75 74 74 6f |esNo:...|.NoButto|
|000004e0| 6e 2e 57 69 6e 4c 65 66 | 74 20 3d 20 57 69 6e 57 |n.WinLef|t = WinW|
|000004f0| 69 64 74 68 20 2d 20 35 | 32 3b 0d 0a 09 09 4e 6f |idth - 5|2;....No|
|00000500| 42 75 74 74 6f 6e 2e 57 | 69 6e 54 6f 70 20 3d 20 |Button.W|inTop = |
|00000510| 57 69 6e 48 65 69 67 68 | 74 20 2d 20 32 30 3b 0d |WinHeigh|t - 20;.|
|00000520| 0a 09 09 59 65 73 42 75 | 74 74 6f 6e 2e 57 69 6e |...YesBu|tton.Win|
|00000530| 4c 65 66 74 20 3d 20 57 | 69 6e 57 69 64 74 68 20 |Left = W|inWidth |
|00000540| 2d 20 31 30 34 3b 0d 0a | 09 09 59 65 73 42 75 74 |- 104;..|..YesBut|
|00000550| 74 6f 6e 2e 57 69 6e 54 | 6f 70 20 3d 20 57 69 6e |ton.WinT|op = Win|
|00000560| 48 65 69 67 68 74 20 2d | 20 32 30 3b 0d 0a 09 09 |Height -| 20;....|
|00000570| 62 72 65 61 6b 3b 0d 0a | 09 63 61 73 65 20 4d 42 |break;..|.case MB|
|00000580| 5f 4f 4b 43 61 6e 63 65 | 6c 3a 0d 0a 09 09 43 61 |_OKCance|l:....Ca|
|00000590| 6e 63 65 6c 42 75 74 74 | 6f 6e 2e 57 69 6e 4c 65 |ncelButt|on.WinLe|
|000005a0| 66 74 20 3d 20 57 69 6e | 57 69 64 74 68 20 2d 20 |ft = Win|Width - |
|000005b0| 35 32 3b 0d 0a 09 09 43 | 61 6e 63 65 6c 42 75 74 |52;....C|ancelBut|
|000005c0| 74 6f 6e 2e 57 69 6e 54 | 6f 70 20 3d 20 57 69 6e |ton.WinT|op = Win|
|000005d0| 48 65 69 67 68 74 20 2d | 20 32 30 3b 0d 0a 09 09 |Height -| 20;....|
|000005e0| 4f 4b 42 75 74 74 6f 6e | 2e 57 69 6e 4c 65 66 74 |OKButton|.WinLeft|
|000005f0| 20 3d 20 57 69 6e 57 69 | 64 74 68 20 2d 20 31 30 | = WinWi|dth - 10|
|00000600| 34 3b 0d 0a 09 09 4f 4b | 42 75 74 74 6f 6e 2e 57 |4;....OK|Button.W|
|00000610| 69 6e 54 6f 70 20 3d 20 | 57 69 6e 48 65 69 67 68 |inTop = |WinHeigh|
|00000620| 74 20 2d 20 32 30 3b 0d | 0a 09 09 62 72 65 61 6b |t - 20;.|...break|
|00000630| 3b 0d 0a 09 63 61 73 65 | 20 4d 42 5f 4f 4b 3a 0d |;...case| MB_OK:.|
|00000640| 0a 09 09 4f 4b 42 75 74 | 74 6f 6e 2e 57 69 6e 4c |...OKBut|ton.WinL|
|00000650| 65 66 74 20 3d 20 57 69 | 6e 57 69 64 74 68 20 2d |eft = Wi|nWidth -|
|00000660| 20 35 32 3b 0d 0a 09 09 | 4f 4b 42 75 74 74 6f 6e | 52;....|OKButton|
|00000670| 2e 57 69 6e 54 6f 70 20 | 3d 20 57 69 6e 48 65 69 |.WinTop |= WinHei|
|00000680| 67 68 74 20 2d 20 32 30 | 3b 0d 0a 09 09 62 72 65 |ght - 20|;....bre|
|00000690| 61 6b 3b 0d 0a 09 7d 0d | 0a 7d 0d 0a 0d 0a 66 75 |ak;...}.|.}....fu|
|000006a0| 6e 63 74 69 6f 6e 20 52 | 65 73 69 7a 65 64 28 29 |nction R|esized()|
|000006b0| 0d 0a 7b 0d 0a 09 53 75 | 70 65 72 2e 52 65 73 69 |..{...Su|per.Resi|
|000006c0| 7a 65 64 28 29 3b 0d 0a | 09 4d 65 73 73 61 67 65 |zed();..|.Message|
|000006d0| 41 72 65 61 2e 53 65 74 | 53 69 7a 65 28 57 69 6e |Area.Set|Size(Win|
|000006e0| 57 69 64 74 68 2d 32 30 | 2c 20 57 69 6e 48 65 69 |Width-20|, WinHei|
|000006f0| 67 68 74 2d 34 34 29 3b | 0d 0a 7d 0d 0a 0d 0a 66 |ght-44);|..}....f|
|00000700| 75 6e 63 74 69 6f 6e 20 | 66 6c 6f 61 74 20 47 65 |unction |float Ge|
|00000710| 74 48 65 69 67 68 74 28 | 43 61 6e 76 61 73 20 43 |tHeight(|Canvas C|
|00000720| 29 0d 0a 7b 0d 0a 09 72 | 65 74 75 72 6e 20 34 34 |)..{...r|eturn 44|
|00000730| 20 2b 20 4d 65 73 73 61 | 67 65 41 72 65 61 2e 47 | + Messa|geArea.G|
|00000740| 65 74 48 65 69 67 68 74 | 28 43 29 3b 0d 0a 7d 0d |etHeight|(C);..}.|
|00000750| 0a 0d 0a 66 75 6e 63 74 | 69 6f 6e 20 50 61 69 6e |...funct|ion Pain|
|00000760| 74 28 43 61 6e 76 61 73 | 20 43 2c 20 66 6c 6f 61 |t(Canvas| C, floa|
|00000770| 74 20 58 2c 20 66 6c 6f | 61 74 20 59 29 0d 0a 7b |t X, flo|at Y)..{|
|00000780| 0d 0a 09 6c 6f 63 61 6c | 20 54 65 78 74 75 72 65 |...local| Texture|
|00000790| 20 54 3b 0d 0a 09 53 75 | 70 65 72 2e 50 61 69 6e | T;...Su|per.Pain|
|000007a0| 74 28 43 2c 20 58 2c 20 | 59 29 3b 0d 0a 09 54 20 |t(C, X, |Y);...T |
|000007b0| 3d 20 47 65 74 4c 6f 6f | 6b 41 6e 64 46 65 65 6c |= GetLoo|kAndFeel|
|000007c0| 54 65 78 74 75 72 65 28 | 29 3b 0d 0a 09 44 72 61 |Texture(|);...Dra|
|000007d0| 77 55 70 42 65 76 65 6c | 28 20 43 2c 20 30 2c 20 |wUpBevel|( C, 0, |
|000007e0| 57 69 6e 48 65 69 67 68 | 74 2d 32 34 2c 20 57 69 |WinHeigh|t-24, Wi|
|000007f0| 6e 57 69 64 74 68 2c 20 | 32 34 2c 20 54 29 3b 0d |nWidth, |24, T);.|
|00000800| 0a 7d 0d 0a 0d 0a 66 75 | 6e 63 74 69 6f 6e 20 53 |.}....fu|nction S|
|00000810| 65 74 75 70 4d 65 73 73 | 61 67 65 42 6f 78 43 6c |etupMess|ageBoxCl|
|00000820| 69 65 6e 74 28 73 74 72 | 69 6e 67 20 49 6e 4d 65 |ient(str|ing InMe|
|00000830| 73 73 61 67 65 2c 20 4d | 65 73 73 61 67 65 42 6f |ssage, M|essageBo|
|00000840| 78 42 75 74 74 6f 6e 73 | 20 49 6e 42 75 74 74 6f |xButtons| InButto|
|00000850| 6e 73 2c 20 4d 65 73 73 | 61 67 65 42 6f 78 52 65 |ns, Mess|ageBoxRe|
|00000860| 73 75 6c 74 20 49 6e 45 | 6e 74 65 72 52 65 73 75 |sult InE|nterResu|
|00000870| 6c 74 29 0d 0a 7b 0d 0a | 09 4d 65 73 73 61 67 65 |lt)..{..|.Message|
|00000880| 41 72 65 61 2e 4d 65 73 | 73 61 67 65 20 3d 20 49 |Area.Mes|sage = I|
|00000890| 6e 4d 65 73 73 61 67 65 | 3b 0d 0a 09 42 75 74 74 |nMessage|;...Butt|
|000008a0| 6f 6e 73 20 3d 20 49 6e | 42 75 74 74 6f 6e 73 3b |ons = In|Buttons;|
|000008b0| 0d 0a 09 45 6e 74 65 72 | 52 65 73 75 6c 74 20 3d |...Enter|Result =|
|000008c0| 20 49 6e 45 6e 74 65 72 | 52 65 73 75 6c 74 3b 0d | InEnter|Result;.|
|000008d0| 0a 0d 0a 09 2f 2f 20 43 | 72 65 61 74 65 20 62 75 |....// C|reate bu|
|000008e0| 74 74 6f 6e 73 0d 0a 09 | 73 77 69 74 63 68 28 42 |ttons...|switch(B|
|000008f0| 75 74 74 6f 6e 73 29 0d | 0a 09 7b 0d 0a 09 63 61 |uttons).|..{...ca|
|00000900| 73 65 20 4d 42 5f 59 65 | 73 4e 6f 43 61 6e 63 65 |se MB_Ye|sNoCance|
|00000910| 6c 3a 0d 0a 09 09 43 61 | 6e 63 65 6c 42 75 74 74 |l:....Ca|ncelButt|
|00000920| 6f 6e 20 3d 20 55 57 69 | 6e 64 6f 77 53 6d 61 6c |on = UWi|ndowSmal|
|00000930| 6c 42 75 74 74 6f 6e 28 | 43 72 65 61 74 65 43 6f |lButton(|CreateCo|
|00000940| 6e 74 72 6f 6c 28 63 6c | 61 73 73 27 55 57 69 6e |ntrol(cl|ass'UWin|
|00000950| 64 6f 77 53 6d 61 6c 6c | 42 75 74 74 6f 6e 27 2c |dowSmall|Button',|
|00000960| 20 57 69 6e 57 69 64 74 | 68 20 2d 20 35 32 2c 20 | WinWidt|h - 52, |
|00000970| 57 69 6e 48 65 69 67 68 | 74 20 2d 20 32 30 2c 20 |WinHeigh|t - 20, |
|00000980| 34 38 2c 20 31 36 29 29 | 3b 0d 0a 09 09 43 61 6e |48, 16))|;....Can|
|00000990| 63 65 6c 42 75 74 74 6f | 6e 2e 53 65 74 54 65 78 |celButto|n.SetTex|
|000009a0| 74 28 43 61 6e 63 65 6c | 54 65 78 74 29 3b 0d 0a |t(Cancel|Text);..|
|000009b0| 09 09 69 66 28 45 6e 74 | 65 72 52 65 73 75 6c 74 |..if(Ent|erResult|
|000009c0| 20 3d 3d 20 4d 52 5f 43 | 61 6e 63 65 6c 29 0d 0a | == MR_C|ancel)..|
|000009d0| 09 09 09 43 61 6e 63 65 | 6c 42 75 74 74 6f 6e 2e |...Cance|lButton.|
|000009e0| 53 65 74 46 6f 6e 74 28 | 46 5f 42 6f 6c 64 29 3b |SetFont(|F_Bold);|
|000009f0| 0d 0a 09 09 65 6c 73 65 | 0d 0a 09 09 09 43 61 6e |....else|.....Can|
|00000a00| 63 65 6c 42 75 74 74 6f | 6e 2e 53 65 74 46 6f 6e |celButto|n.SetFon|
|00000a10| 74 28 46 5f 4e 6f 72 6d | 61 6c 29 3b 0d 0a 09 09 |t(F_Norm|al);....|
|00000a20| 4e 6f 42 75 74 74 6f 6e | 20 3d 20 55 57 69 6e 64 |NoButton| = UWind|
|00000a30| 6f 77 53 6d 61 6c 6c 42 | 75 74 74 6f 6e 28 43 72 |owSmallB|utton(Cr|
|00000a40| 65 61 74 65 43 6f 6e 74 | 72 6f 6c 28 63 6c 61 73 |eateCont|rol(clas|
|00000a50| 73 27 55 57 69 6e 64 6f | 77 53 6d 61 6c 6c 42 75 |s'UWindo|wSmallBu|
|00000a60| 74 74 6f 6e 27 2c 20 57 | 69 6e 57 69 64 74 68 20 |tton', W|inWidth |
|00000a70| 2d 20 31 30 34 2c 20 57 | 69 6e 48 65 69 67 68 74 |- 104, W|inHeight|
|00000a80| 20 2d 20 32 30 2c 20 34 | 38 2c 20 31 36 29 29 3b | - 20, 4|8, 16));|
|00000a90| 0d 0a 09 09 4e 6f 42 75 | 74 74 6f 6e 2e 53 65 74 |....NoBu|tton.Set|
|00000aa0| 54 65 78 74 28 4e 6f 54 | 65 78 74 29 3b 0d 0a 09 |Text(NoT|ext);...|
|00000ab0| 09 69 66 28 45 6e 74 65 | 72 52 65 73 75 6c 74 20 |.if(Ente|rResult |
|00000ac0| 3d 3d 20 4d 52 5f 4e 6f | 29 0d 0a 09 09 09 4e 6f |== MR_No|).....No|
|00000ad0| 42 75 74 74 6f 6e 2e 53 | 65 74 46 6f 6e 74 28 46 |Button.S|etFont(F|
|00000ae0| 5f 42 6f 6c 64 29 3b 0d | 0a 09 09 65 6c 73 65 0d |_Bold);.|...else.|
|00000af0| 0a 09 09 09 4e 6f 42 75 | 74 74 6f 6e 2e 53 65 74 |....NoBu|tton.Set|
|00000b00| 46 6f 6e 74 28 46 5f 4e | 6f 72 6d 61 6c 29 3b 0d |Font(F_N|ormal);.|
|00000b10| 0a 09 09 59 65 73 42 75 | 74 74 6f 6e 20 3d 20 55 |...YesBu|tton = U|
|00000b20| 57 69 6e 64 6f 77 53 6d | 61 6c 6c 42 75 74 74 6f |WindowSm|allButto|
|00000b30| 6e 28 43 72 65 61 74 65 | 43 6f 6e 74 72 6f 6c 28 |n(Create|Control(|
|00000b40| 63 6c 61 73 73 27 55 57 | 69 6e 64 6f 77 53 6d 61 |class'UW|indowSma|
|00000b50| 6c 6c 42 75 74 74 6f 6e | 27 2c 20 57 69 6e 57 69 |llButton|', WinWi|
|00000b60| 64 74 68 20 2d 20 31 35 | 36 2c 20 57 69 6e 48 65 |dth - 15|6, WinHe|
|00000b70| 69 67 68 74 20 2d 20 32 | 30 2c 20 34 38 2c 20 31 |ight - 2|0, 48, 1|
|00000b80| 36 29 29 3b 0d 0a 09 09 | 59 65 73 42 75 74 74 6f |6));....|YesButto|
|00000b90| 6e 2e 53 65 74 54 65 78 | 74 28 59 65 73 54 65 78 |n.SetTex|t(YesTex|
|00000ba0| 74 29 3b 0d 0a 09 09 69 | 66 28 45 6e 74 65 72 52 |t);....i|f(EnterR|
|00000bb0| 65 73 75 6c 74 20 3d 3d | 20 4d 52 5f 59 65 73 29 |esult ==| MR_Yes)|
|00000bc0| 0d 0a 09 09 09 59 65 73 | 42 75 74 74 6f 6e 2e 53 |.....Yes|Button.S|
|00000bd0| 65 74 46 6f 6e 74 28 46 | 5f 42 6f 6c 64 29 3b 0d |etFont(F|_Bold);.|
|00000be0| 0a 09 09 65 6c 73 65 0d | 0a 09 09 09 59 65 73 42 |...else.|....YesB|
|00000bf0| 75 74 74 6f 6e 2e 53 65 | 74 46 6f 6e 74 28 46 5f |utton.Se|tFont(F_|
|00000c00| 4e 6f 72 6d 61 6c 29 3b | 0d 0a 09 09 62 72 65 61 |Normal);|....brea|
|00000c10| 6b 3b 0d 0a 09 63 61 73 | 65 20 4d 42 5f 59 65 73 |k;...cas|e MB_Yes|
|00000c20| 4e 6f 3a 0d 0a 09 09 4e | 6f 42 75 74 74 6f 6e 20 |No:....N|oButton |
|00000c30| 3d 20 55 57 69 6e 64 6f | 77 53 6d 61 6c 6c 42 75 |= UWindo|wSmallBu|
|00000c40| 74 74 6f 6e 28 43 72 65 | 61 74 65 43 6f 6e 74 72 |tton(Cre|ateContr|
|00000c50| 6f 6c 28 63 6c 61 73 73 | 27 55 57 69 6e 64 6f 77 |ol(class|'UWindow|
|00000c60| 53 6d 61 6c 6c 42 75 74 | 74 6f 6e 27 2c 20 57 69 |SmallBut|ton', Wi|
|00000c70| 6e 57 69 64 74 68 20 2d | 20 35 32 2c 20 57 69 6e |nWidth -| 52, Win|
|00000c80| 48 65 69 67 68 74 20 2d | 20 32 30 2c 20 34 38 2c |Height -| 20, 48,|
|00000c90| 20 31 36 29 29 3b 0d 0a | 09 09 4e 6f 42 75 74 74 | 16));..|..NoButt|
|00000ca0| 6f 6e 2e 53 65 74 54 65 | 78 74 28 4e 6f 54 65 78 |on.SetTe|xt(NoTex|
|00000cb0| 74 29 3b 0d 0a 09 09 69 | 66 28 45 6e 74 65 72 52 |t);....i|f(EnterR|
|00000cc0| 65 73 75 6c 74 20 3d 3d | 20 4d 52 5f 4e 6f 29 0d |esult ==| MR_No).|
|00000cd0| 0a 09 09 09 4e 6f 42 75 | 74 74 6f 6e 2e 53 65 74 |....NoBu|tton.Set|
|00000ce0| 46 6f 6e 74 28 46 5f 42 | 6f 6c 64 29 3b 0d 0a 09 |Font(F_B|old);...|
|00000cf0| 09 65 6c 73 65 0d 0a 09 | 09 09 4e 6f 42 75 74 74 |.else...|..NoButt|
|00000d00| 6f 6e 2e 53 65 74 46 6f | 6e 74 28 46 5f 4e 6f 72 |on.SetFo|nt(F_Nor|
|00000d10| 6d 61 6c 29 3b 0d 0a 09 | 09 59 65 73 42 75 74 74 |mal);...|.YesButt|
|00000d20| 6f 6e 20 3d 20 55 57 69 | 6e 64 6f 77 53 6d 61 6c |on = UWi|ndowSmal|
|00000d30| 6c 42 75 74 74 6f 6e 28 | 43 72 65 61 74 65 43 6f |lButton(|CreateCo|
|00000d40| 6e 74 72 6f 6c 28 63 6c | 61 73 73 27 55 57 69 6e |ntrol(cl|ass'UWin|
|00000d50| 64 6f 77 53 6d 61 6c 6c | 42 75 74 74 6f 6e 27 2c |dowSmall|Button',|
|00000d60| 20 57 69 6e 57 69 64 74 | 68 20 2d 20 31 30 34 2c | WinWidt|h - 104,|
|00000d70| 20 57 69 6e 48 65 69 67 | 68 74 20 2d 20 32 30 2c | WinHeig|ht - 20,|
|00000d80| 20 34 38 2c 20 31 36 29 | 29 3b 0d 0a 09 09 59 65 | 48, 16)|);....Ye|
|00000d90| 73 42 75 74 74 6f 6e 2e | 53 65 74 54 65 78 74 28 |sButton.|SetText(|
|00000da0| 59 65 73 54 65 78 74 29 | 3b 0d 0a 09 09 69 66 28 |YesText)|;....if(|
|00000db0| 45 6e 74 65 72 52 65 73 | 75 6c 74 20 3d 3d 20 4d |EnterRes|ult == M|
|00000dc0| 52 5f 59 65 73 29 0d 0a | 09 09 09 59 65 73 42 75 |R_Yes)..|...YesBu|
|00000dd0| 74 74 6f 6e 2e 53 65 74 | 46 6f 6e 74 28 46 5f 42 |tton.Set|Font(F_B|
|00000de0| 6f 6c 64 29 3b 0d 0a 09 | 09 65 6c 73 65 0d 0a 09 |old);...|.else...|
|00000df0| 09 09 59 65 73 42 75 74 | 74 6f 6e 2e 53 65 74 46 |..YesBut|ton.SetF|
|00000e00| 6f 6e 74 28 46 5f 4e 6f | 72 6d 61 6c 29 3b 0d 0a |ont(F_No|rmal);..|
|00000e10| 09 09 62 72 65 61 6b 3b | 0d 0a 09 63 61 73 65 20 |..break;|...case |
|00000e20| 4d 42 5f 4f 4b 43 61 6e | 63 65 6c 3a 0d 0a 09 09 |MB_OKCan|cel:....|
|00000e30| 43 61 6e 63 65 6c 42 75 | 74 74 6f 6e 20 3d 20 55 |CancelBu|tton = U|
|00000e40| 57 69 6e 64 6f 77 53 6d | 61 6c 6c 42 75 74 74 6f |WindowSm|allButto|
|00000e50| 6e 28 43 72 65 61 74 65 | 43 6f 6e 74 72 6f 6c 28 |n(Create|Control(|
|00000e60| 63 6c 61 73 73 27 55 57 | 69 6e 64 6f 77 53 6d 61 |class'UW|indowSma|
|00000e70| 6c 6c 42 75 74 74 6f 6e | 27 2c 20 57 69 6e 57 69 |llButton|', WinWi|
|00000e80| 64 74 68 20 2d 20 35 32 | 2c 20 57 69 6e 48 65 69 |dth - 52|, WinHei|
|00000e90| 67 68 74 20 2d 20 32 30 | 2c 20 34 38 2c 20 31 36 |ght - 20|, 48, 16|
|00000ea0| 29 29 3b 0d 0a 09 09 43 | 61 6e 63 65 6c 42 75 74 |));....C|ancelBut|
|00000eb0| 74 6f 6e 2e 53 65 74 54 | 65 78 74 28 43 61 6e 63 |ton.SetT|ext(Canc|
|00000ec0| 65 6c 54 65 78 74 29 3b | 0d 0a 09 09 69 66 28 45 |elText);|....if(E|
|00000ed0| 6e 74 65 72 52 65 73 75 | 6c 74 20 3d 3d 20 4d 52 |nterResu|lt == MR|
|00000ee0| 5f 43 61 6e 63 65 6c 29 | 0d 0a 09 09 09 43 61 6e |_Cancel)|.....Can|
|00000ef0| 63 65 6c 42 75 74 74 6f | 6e 2e 53 65 74 46 6f 6e |celButto|n.SetFon|
|00000f00| 74 28 46 5f 42 6f 6c 64 | 29 3b 0d 0a 09 09 65 6c |t(F_Bold|);....el|
|00000f10| 73 65 0d 0a 09 09 09 43 | 61 6e 63 65 6c 42 75 74 |se.....C|ancelBut|
|00000f20| 74 6f 6e 2e 53 65 74 46 | 6f 6e 74 28 46 5f 4e 6f |ton.SetF|ont(F_No|
|00000f30| 72 6d 61 6c 29 3b 0d 0a | 09 09 4f 4b 42 75 74 74 |rmal);..|..OKButt|
|00000f40| 6f 6e 20 3d 20 55 57 69 | 6e 64 6f 77 53 6d 61 6c |on = UWi|ndowSmal|
|00000f50| 6c 42 75 74 74 6f 6e 28 | 43 72 65 61 74 65 43 6f |lButton(|CreateCo|
|00000f60| 6e 74 72 6f 6c 28 63 6c | 61 73 73 27 55 57 69 6e |ntrol(cl|ass'UWin|
|00000f70| 64 6f 77 53 6d 61 6c 6c | 42 75 74 74 6f 6e 27 2c |dowSmall|Button',|
|00000f80| 20 57 69 6e 57 69 64 74 | 68 20 2d 20 31 30 34 2c | WinWidt|h - 104,|
|00000f90| 20 57 69 6e 48 65 69 67 | 68 74 20 2d 20 32 30 2c | WinHeig|ht - 20,|
|00000fa0| 20 34 38 2c 20 31 36 29 | 29 3b 0d 0a 09 09 4f 4b | 48, 16)|);....OK|
|00000fb0| 42 75 74 74 6f 6e 2e 53 | 65 74 54 65 78 74 28 4f |Button.S|etText(O|
|00000fc0| 4b 54 65 78 74 29 3b 0d | 0a 09 09 69 66 28 45 6e |KText);.|...if(En|
|00000fd0| 74 65 72 52 65 73 75 6c | 74 20 3d 3d 20 4d 52 5f |terResul|t == MR_|
|00000fe0| 4f 4b 29 0d 0a 09 09 09 | 4f 4b 42 75 74 74 6f 6e |OK).....|OKButton|
|00000ff0| 2e 53 65 74 46 6f 6e 74 | 28 46 5f 42 6f 6c 64 29 |.SetFont|(F_Bold)|
|00001000| 3b 0d 0a 09 09 65 6c 73 | 65 0d 0a 09 09 09 4f 4b |;....els|e.....OK|
|00001010| 42 75 74 74 6f 6e 2e 53 | 65 74 46 6f 6e 74 28 46 |Button.S|etFont(F|
|00001020| 5f 4e 6f 72 6d 61 6c 29 | 3b 0d 0a 09 09 62 72 65 |_Normal)|;....bre|
|00001030| 61 6b 3b 0d 0a 09 63 61 | 73 65 20 4d 42 5f 4f 4b |ak;...ca|se MB_OK|
|00001040| 3a 0d 0a 09 09 4f 4b 42 | 75 74 74 6f 6e 20 3d 20 |:....OKB|utton = |
|00001050| 55 57 69 6e 64 6f 77 53 | 6d 61 6c 6c 42 75 74 74 |UWindowS|mallButt|
|00001060| 6f 6e 28 43 72 65 61 74 | 65 43 6f 6e 74 72 6f 6c |on(Creat|eControl|
|00001070| 28 63 6c 61 73 73 27 55 | 57 69 6e 64 6f 77 53 6d |(class'U|WindowSm|
|00001080| 61 6c 6c 42 75 74 74 6f | 6e 27 2c 20 57 69 6e 57 |allButto|n', WinW|
|00001090| 69 64 74 68 20 2d 20 35 | 32 2c 20 57 69 6e 48 65 |idth - 5|2, WinHe|
|000010a0| 69 67 68 74 20 2d 20 32 | 30 2c 20 34 38 2c 20 31 |ight - 2|0, 48, 1|
|000010b0| 36 29 29 3b 0d 0a 09 09 | 4f 4b 42 75 74 74 6f 6e |6));....|OKButton|
|000010c0| 2e 53 65 74 54 65 78 74 | 28 4f 4b 54 65 78 74 29 |.SetText|(OKText)|
|000010d0| 3b 0d 0a 09 09 69 66 28 | 45 6e 74 65 72 52 65 73 |;....if(|EnterRes|
|000010e0| 75 6c 74 20 3d 3d 20 4d | 52 5f 4f 4b 29 0d 0a 09 |ult == M|R_OK)...|
|000010f0| 09 09 4f 4b 42 75 74 74 | 6f 6e 2e 53 65 74 46 6f |..OKButt|on.SetFo|
|00001100| 6e 74 28 46 5f 42 6f 6c | 64 29 3b 0d 0a 09 09 65 |nt(F_Bol|d);....e|
|00001110| 6c 73 65 0d 0a 09 09 09 | 4f 4b 42 75 74 74 6f 6e |lse.....|OKButton|
|00001120| 2e 53 65 74 46 6f 6e 74 | 28 46 5f 4e 6f 72 6d 61 |.SetFont|(F_Norma|
|00001130| 6c 29 3b 0d 0a 09 09 62 | 72 65 61 6b 3b 0d 0a 09 |l);....b|reak;...|
|00001140| 7d 0d 0a 7d 0d 0a 0d 0a | 66 75 6e 63 74 69 6f 6e |}..}....|function|
|00001150| 20 4e 6f 74 69 66 79 28 | 55 57 69 6e 64 6f 77 44 | Notify(|UWindowD|
|00001160| 69 61 6c 6f 67 43 6f 6e | 74 72 6f 6c 20 43 2c 20 |ialogCon|trol C, |
|00001170| 62 79 74 65 20 45 29 0d | 0a 7b 0d 0a 09 6c 6f 63 |byte E).|.{...loc|
|00001180| 61 6c 20 55 57 69 6e 64 | 6f 77 4d 65 73 73 61 67 |al UWind|owMessag|
|00001190| 65 42 6f 78 20 50 3b 0d | 0a 0d 0a 09 50 20 3d 20 |eBox P;.|....P = |
|000011a0| 55 57 69 6e 64 6f 77 4d | 65 73 73 61 67 65 42 6f |UWindowM|essageBo|
|000011b0| 78 28 50 61 72 65 6e 74 | 57 69 6e 64 6f 77 29 3b |x(Parent|Window);|
|000011c0| 0d 0a 0d 0a 09 69 66 28 | 45 20 3d 3d 20 44 45 5f |.....if(|E == DE_|
|000011d0| 43 6c 69 63 6b 29 0d 0a | 09 7b 0d 0a 09 09 73 77 |Click)..|.{....sw|
|000011e0| 69 74 63 68 28 43 29 0d | 0a 09 09 7b 0d 0a 09 09 |itch(C).|...{....|
|000011f0| 63 61 73 65 20 59 65 73 | 42 75 74 74 6f 6e 3a 0d |case Yes|Button:.|
|00001200| 0a 09 09 09 50 2e 52 65 | 73 75 6c 74 20 3d 20 4d |....P.Re|sult = M|
|00001210| 52 5f 59 65 73 3b 0d 0a | 09 09 09 50 2e 43 6c 6f |R_Yes;..|...P.Clo|
|00001220| 73 65 28 29 3b 0d 0a 09 | 09 09 62 72 65 61 6b 3b |se();...|..break;|
|00001230| 0d 0a 09 09 63 61 73 65 | 20 4e 6f 42 75 74 74 6f |....case| NoButto|
|00001240| 6e 3a 0d 0a 09 09 09 50 | 2e 52 65 73 75 6c 74 20 |n:.....P|.Result |
|00001250| 3d 20 4d 52 5f 4e 6f 3b | 0d 0a 09 09 09 50 2e 43 |= MR_No;|.....P.C|
|00001260| 6c 6f 73 65 28 29 3b 0d | 0a 09 09 09 62 72 65 61 |lose();.|....brea|
|00001270| 6b 3b 0d 0a 09 09 63 61 | 73 65 20 4f 4b 42 75 74 |k;....ca|se OKBut|
|00001280| 74 6f 6e 3a 0d 0a 09 09 | 09 50 2e 52 65 73 75 6c |ton:....|.P.Resul|
|00001290| 74 20 3d 20 4d 52 5f 4f | 4b 3b 0d 0a 09 09 09 50 |t = MR_O|K;.....P|
|000012a0| 2e 43 6c 6f 73 65 28 29 | 3b 0d 0a 09 09 09 62 72 |.Close()|;.....br|
|000012b0| 65 61 6b 3b 0d 0a 09 09 | 63 61 73 65 20 43 61 6e |eak;....|case Can|
|000012c0| 63 65 6c 42 75 74 74 6f | 6e 3a 0d 0a 09 09 09 50 |celButto|n:.....P|
|000012d0| 2e 52 65 73 75 6c 74 20 | 3d 20 4d 52 5f 43 61 6e |.Result |= MR_Can|
|000012e0| 63 65 6c 3b 0d 0a 09 09 | 09 50 2e 43 6c 6f 73 65 |cel;....|.P.Close|
|000012f0| 28 29 3b 0d 0a 09 09 09 | 62 72 65 61 6b 3b 0d 0a |();.....|break;..|
|00001300| 09 09 7d 0d 0a 09 7d 0d | 0a 7d 0d 0a 0d 0a 00    |..}...}.|.}..... |
+--------+-------------------------+-------------------------+--------+--------+