/ Revista CD Expert 32 / CD Expert nº 32.iso / Unreal T / utdemo338.exe / 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 | 42 4c 63 6c 61 73 73 20 |........|BLclass |
|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 70 61 | 6e 64 73 20 55 57 69 6e |xCW expa|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 69 6e | 74 20 4b 65 79 2c 20 66 |yDown(in|t Key, f|
|00000210| 6c 6f 61 74 20 58 2c 20 | 66 6c 6f 61 74 20 59 29 |loat X, |float Y)|
|00000220| 0d 0a 7b 0d 0a 09 6c 6f | 63 61 6c 20 55 57 69 6e |..{...lo|cal UWin|
|00000230| 64 6f 77 4d 65 73 73 61 | 67 65 42 6f 78 20 50 3b |dowMessa|geBox P;|
|00000240| 0d 0a 0d 0a 09 50 20 3d | 20 55 57 69 6e 64 6f 77 |.....P =| UWindow|
|00000250| 4d 65 73 73 61 67 65 42 | 6f 78 28 50 61 72 65 6e |MessageB|ox(Paren|
|00000260| 74 57 69 6e 64 6f 77 29 | 3b 0d 0a 0d 0a 09 69 66 |tWindow)|;.....if|
|00000270| 28 4b 65 79 20 3d 3d 20 | 47 65 74 50 6c 61 79 65 |(Key == |GetPlaye|
|00000280| 72 4f 77 6e 65 72 28 29 | 2e 45 49 6e 70 75 74 4b |rOwner()|.EInputK|
|00000290| 65 79 2e 49 4b 5f 45 6e | 74 65 72 20 26 26 20 45 |ey.IK_En|ter && E|
|000002a0| 6e 74 65 72 52 65 73 75 | 6c 74 20 21 3d 20 4d 52 |nterResu|lt != MR|
|000002b0| 5f 4e 6f 6e 65 29 0d 0a | 09 7b 0d 0a 09 09 50 20 |_None)..|.{....P |
|000002c0| 3d 20 55 57 69 6e 64 6f | 77 4d 65 73 73 61 67 65 |= UWindo|wMessage|
|000002d0| 42 6f 78 28 50 61 72 65 | 6e 74 57 69 6e 64 6f 77 |Box(Pare|ntWindow|
|000002e0| 29 3b 0d 0a 09 09 50 2e | 52 65 73 75 6c 74 20 3d |);....P.|Result =|
|000002f0| 20 45 6e 74 65 72 52 65 | 73 75 6c 74 3b 0d 0a 09 | EnterRe|sult;...|
|00000300| 09 50 2e 43 6c 6f 73 65 | 28 29 3b 0d 0a 09 7d 0d |.P.Close|();...}.|
|00000310| 0a 7d 0d 0a 0d 0a 66 75 | 6e 63 74 69 6f 6e 20 42 |.}....fu|nction B|
|00000320| 65 66 6f 72 65 50 61 69 | 6e 74 28 43 61 6e 76 61 |eforePai|nt(Canva|
|00000330| 73 20 43 2c 20 66 6c 6f | 61 74 20 58 2c 20 66 6c |s C, flo|at X, fl|
|00000340| 6f 61 74 20 59 29 0d 0a | 7b 0d 0a 09 53 75 70 65 |oat Y)..|{...Supe|
|00000350| 72 2e 42 65 66 6f 72 65 | 50 61 69 6e 74 28 43 2c |r.Before|Paint(C,|
|00000360| 20 58 2c 20 59 29 3b 0d | 0a 0d 0a 09 4d 65 73 73 | X, Y);.|....Mess|
|00000370| 61 67 65 41 72 65 61 2e | 53 65 74 53 69 7a 65 28 |ageArea.|SetSize(|
|00000380| 57 69 6e 57 69 64 74 68 | 2d 32 30 2c 20 57 69 6e |WinWidth|-20, Win|
|00000390| 48 65 69 67 68 74 2d 34 | 34 29 3b 0d 0a 0d 0a 09 |Height-4|4);.....|
|000003a0| 73 77 69 74 63 68 28 42 | 75 74 74 6f 6e 73 29 0d |switch(B|uttons).|
|000003b0| 0a 09 7b 0d 0a 09 63 61 | 73 65 20 4d 42 5f 59 65 |..{...ca|se MB_Ye|
|000003c0| 73 4e 6f 43 61 6e 63 65 | 6c 3a 0d 0a 09 09 43 61 |sNoCance|l:....Ca|
|000003d0| 6e 63 65 6c 42 75 74 74 | 6f 6e 2e 57 69 6e 4c 65 |ncelButt|on.WinLe|
|000003e0| 66 74 20 3d 20 57 69 6e | 57 69 64 74 68 20 2d 20 |ft = Win|Width - |
|000003f0| 35 32 3b 0d 0a 09 09 43 | 61 6e 63 65 6c 42 75 74 |52;....C|ancelBut|
|00000400| 74 6f 6e 2e 57 69 6e 54 | 6f 70 20 3d 20 57 69 6e |ton.WinT|op = Win|
|00000410| 48 65 69 67 68 74 20 2d | 20 32 30 3b 0d 0a 09 09 |Height -| 20;....|
|00000420| 4e 6f 42 75 74 74 6f 6e | 2e 57 69 6e 4c 65 66 74 |NoButton|.WinLeft|
|00000430| 20 3d 20 57 69 6e 57 69 | 64 74 68 20 2d 20 31 30 | = WinWi|dth - 10|
|00000440| 34 3b 0d 0a 09 09 4e 6f | 42 75 74 74 6f 6e 2e 57 |4;....No|Button.W|
|00000450| 69 6e 54 6f 70 20 3d 20 | 57 69 6e 48 65 69 67 68 |inTop = |WinHeigh|
|00000460| 74 20 2d 20 32 30 3b 0d | 0a 09 09 59 65 73 42 75 |t - 20;.|...YesBu|
|00000470| 74 74 6f 6e 2e 57 69 6e | 4c 65 66 74 20 3d 20 57 |tton.Win|Left = W|
|00000480| 69 6e 57 69 64 74 68 20 | 2d 20 31 35 36 3b 0d 0a |inWidth |- 156;..|
|00000490| 09 09 59 65 73 42 75 74 | 74 6f 6e 2e 57 69 6e 54 |..YesBut|ton.WinT|
|000004a0| 6f 70 20 3d 20 57 69 6e | 48 65 69 67 68 74 20 2d |op = Win|Height -|
|000004b0| 20 32 30 3b 0d 0a 09 09 | 62 72 65 61 6b 3b 0d 0a | 20;....|break;..|
|000004c0| 09 63 61 73 65 20 4d 42 | 5f 59 65 73 4e 6f 3a 0d |.case MB|_YesNo:.|
|000004d0| 0a 09 09 4e 6f 42 75 74 | 74 6f 6e 2e 57 69 6e 4c |...NoBut|ton.WinL|
|000004e0| 65 66 74 20 3d 20 57 69 | 6e 57 69 64 74 68 20 2d |eft = Wi|nWidth -|
|000004f0| 20 35 32 3b 0d 0a 09 09 | 4e 6f 42 75 74 74 6f 6e | 52;....|NoButton|
|00000500| 2e 57 69 6e 54 6f 70 20 | 3d 20 57 69 6e 48 65 69 |.WinTop |= WinHei|
|00000510| 67 68 74 20 2d 20 32 30 | 3b 0d 0a 09 09 59 65 73 |ght - 20|;....Yes|
|00000520| 42 75 74 74 6f 6e 2e 57 | 69 6e 4c 65 66 74 20 3d |Button.W|inLeft =|
|00000530| 20 57 69 6e 57 69 64 74 | 68 20 2d 20 31 30 34 3b | WinWidt|h - 104;|
|00000540| 0d 0a 09 09 59 65 73 42 | 75 74 74 6f 6e 2e 57 69 |....YesB|utton.Wi|
|00000550| 6e 54 6f 70 20 3d 20 57 | 69 6e 48 65 69 67 68 74 |nTop = W|inHeight|
|00000560| 20 2d 20 32 30 3b 0d 0a | 09 09 62 72 65 61 6b 3b | - 20;..|..break;|
|00000570| 0d 0a 09 63 61 73 65 20 | 4d 42 5f 4f 4b 43 61 6e |...case |MB_OKCan|
|00000580| 63 65 6c 3a 0d 0a 09 09 | 43 61 6e 63 65 6c 42 75 |cel:....|CancelBu|
|00000590| 74 74 6f 6e 2e 57 69 6e | 4c 65 66 74 20 3d 20 57 |tton.Win|Left = W|
|000005a0| 69 6e 57 69 64 74 68 20 | 2d 20 35 32 3b 0d 0a 09 |inWidth |- 52;...|
|000005b0| 09 43 61 6e 63 65 6c 42 | 75 74 74 6f 6e 2e 57 69 |.CancelB|utton.Wi|
|000005c0| 6e 54 6f 70 20 3d 20 57 | 69 6e 48 65 69 67 68 74 |nTop = W|inHeight|
|000005d0| 20 2d 20 32 30 3b 0d 0a | 09 09 4f 4b 42 75 74 74 | - 20;..|..OKButt|
|000005e0| 6f 6e 2e 57 69 6e 4c 65 | 66 74 20 3d 20 57 69 6e |on.WinLe|ft = Win|
|000005f0| 57 69 64 74 68 20 2d 20 | 31 30 34 3b 0d 0a 09 09 |Width - |104;....|
|00000600| 4f 4b 42 75 74 74 6f 6e | 2e 57 69 6e 54 6f 70 20 |OKButton|.WinTop |
|00000610| 3d 20 57 69 6e 48 65 69 | 67 68 74 20 2d 20 32 30 |= WinHei|ght - 20|
|00000620| 3b 0d 0a 09 09 62 72 65 | 61 6b 3b 0d 0a 09 63 61 |;....bre|ak;...ca|
|00000630| 73 65 20 4d 42 5f 4f 4b | 3a 0d 0a 09 09 4f 4b 42 |se MB_OK|:....OKB|
|00000640| 75 74 74 6f 6e 2e 57 69 | 6e 4c 65 66 74 20 3d 20 |utton.Wi|nLeft = |
|00000650| 57 69 6e 57 69 64 74 68 | 20 2d 20 35 32 3b 0d 0a |WinWidth| - 52;..|
|00000660| 09 09 4f 4b 42 75 74 74 | 6f 6e 2e 57 69 6e 54 6f |..OKButt|on.WinTo|
|00000670| 70 20 3d 20 57 69 6e 48 | 65 69 67 68 74 20 2d 20 |p = WinH|eight - |
|00000680| 32 30 3b 0d 0a 09 09 62 | 72 65 61 6b 3b 0d 0a 09 |20;....b|reak;...|
|00000690| 7d 0d 0a 7d 0d 0a 0d 0a | 66 75 6e 63 74 69 6f 6e |}..}....|function|
|000006a0| 20 52 65 73 69 7a 65 64 | 28 29 0d 0a 7b 0d 0a 09 | Resized|()..{...|
|000006b0| 53 75 70 65 72 2e 52 65 | 73 69 7a 65 64 28 29 3b |Super.Re|sized();|
|000006c0| 0d 0a 09 4d 65 73 73 61 | 67 65 41 72 65 61 2e 53 |...Messa|geArea.S|
|000006d0| 65 74 53 69 7a 65 28 57 | 69 6e 57 69 64 74 68 2d |etSize(W|inWidth-|
|000006e0| 32 30 2c 20 57 69 6e 48 | 65 69 67 68 74 2d 34 34 |20, WinH|eight-44|
|000006f0| 29 3b 0d 0a 7d 0d 0a 0d | 0a 66 75 6e 63 74 69 6f |);..}...|.functio|
|00000700| 6e 20 66 6c 6f 61 74 20 | 47 65 74 48 65 69 67 68 |n float |GetHeigh|
|00000710| 74 28 43 61 6e 76 61 73 | 20 43 29 0d 0a 7b 0d 0a |t(Canvas| C)..{..|
|00000720| 09 72 65 74 75 72 6e 20 | 34 34 20 2b 20 4d 65 73 |.return |44 + Mes|
|00000730| 73 61 67 65 41 72 65 61 | 2e 47 65 74 48 65 69 67 |sageArea|.GetHeig|
|00000740| 68 74 28 43 29 3b 0d 0a | 7d 0d 0a 0d 0a 66 75 6e |ht(C);..|}....fun|
|00000750| 63 74 69 6f 6e 20 50 61 | 69 6e 74 28 43 61 6e 76 |ction Pa|int(Canv|
|00000760| 61 73 20 43 2c 20 66 6c | 6f 61 74 20 58 2c 20 66 |as C, fl|oat X, f|
|00000770| 6c 6f 61 74 20 59 29 0d | 0a 7b 0d 0a 09 6c 6f 63 |loat Y).|.{...loc|
|00000780| 61 6c 20 54 65 78 74 75 | 72 65 20 54 3b 0d 0a 09 |al Textu|re T;...|
|00000790| 53 75 70 65 72 2e 50 61 | 69 6e 74 28 43 2c 20 58 |Super.Pa|int(C, X|
|000007a0| 2c 20 59 29 3b 0d 0a 09 | 54 20 3d 20 47 65 74 4c |, Y);...|T = GetL|
|000007b0| 6f 6f 6b 41 6e 64 46 65 | 65 6c 54 65 78 74 75 72 |ookAndFe|elTextur|
|000007c0| 65 28 29 3b 0d 0a 09 44 | 72 61 77 55 70 42 65 76 |e();...D|rawUpBev|
|000007d0| 65 6c 28 20 43 2c 20 30 | 2c 20 57 69 6e 48 65 69 |el( C, 0|, WinHei|
|000007e0| 67 68 74 2d 32 34 2c 20 | 57 69 6e 57 69 64 74 68 |ght-24, |WinWidth|
|000007f0| 2c 20 32 34 2c 20 54 29 | 3b 0d 0a 7d 0d 0a 0d 0a |, 24, T)|;..}....|
|00000800| 66 75 6e 63 74 69 6f 6e | 20 53 65 74 75 70 4d 65 |function| SetupMe|
|00000810| 73 73 61 67 65 42 6f 78 | 43 6c 69 65 6e 74 28 73 |ssageBox|Client(s|
|00000820| 74 72 69 6e 67 20 49 6e | 4d 65 73 73 61 67 65 2c |tring In|Message,|
|00000830| 20 4d 65 73 73 61 67 65 | 42 6f 78 42 75 74 74 6f | Message|BoxButto|
|00000840| 6e 73 20 49 6e 42 75 74 | 74 6f 6e 73 2c 20 4d 65 |ns InBut|tons, Me|
|00000850| 73 73 61 67 65 42 6f 78 | 52 65 73 75 6c 74 20 49 |ssageBox|Result I|
|00000860| 6e 45 6e 74 65 72 52 65 | 73 75 6c 74 29 0d 0a 7b |nEnterRe|sult)..{|
|00000870| 0d 0a 09 4d 65 73 73 61 | 67 65 41 72 65 61 2e 4d |...Messa|geArea.M|
|00000880| 65 73 73 61 67 65 20 3d | 20 49 6e 4d 65 73 73 61 |essage =| InMessa|
|00000890| 67 65 3b 0d 0a 09 42 75 | 74 74 6f 6e 73 20 3d 20 |ge;...Bu|ttons = |
|000008a0| 49 6e 42 75 74 74 6f 6e | 73 3b 0d 0a 09 45 6e 74 |InButton|s;...Ent|
|000008b0| 65 72 52 65 73 75 6c 74 | 20 3d 20 49 6e 45 6e 74 |erResult| = InEnt|
|000008c0| 65 72 52 65 73 75 6c 74 | 3b 0d 0a 0d 0a 09 2f 2f |erResult|;.....//|
|000008d0| 20 43 72 65 61 74 65 20 | 62 75 74 74 6f 6e 73 0d | Create |buttons.|
|000008e0| 0a 09 73 77 69 74 63 68 | 28 42 75 74 74 6f 6e 73 |..switch|(Buttons|
|000008f0| 29 0d 0a 09 7b 0d 0a 09 | 63 61 73 65 20 4d 42 5f |)...{...|case MB_|
|00000900| 59 65 73 4e 6f 43 61 6e | 63 65 6c 3a 0d 0a 09 09 |YesNoCan|cel:....|
|00000910| 43 61 6e 63 65 6c 42 75 | 74 74 6f 6e 20 3d 20 55 |CancelBu|tton = U|
|00000920| 57 69 6e 64 6f 77 53 6d | 61 6c 6c 42 75 74 74 6f |WindowSm|allButto|
|00000930| 6e 28 43 72 65 61 74 65 | 43 6f 6e 74 72 6f 6c 28 |n(Create|Control(|
|00000940| 63 6c 61 73 73 27 55 57 | 69 6e 64 6f 77 53 6d 61 |class'UW|indowSma|
|00000950| 6c 6c 42 75 74 74 6f 6e | 27 2c 20 57 69 6e 57 69 |llButton|', WinWi|
|00000960| 64 74 68 20 2d 20 35 32 | 2c 20 57 69 6e 48 65 69 |dth - 52|, WinHei|
|00000970| 67 68 74 20 2d 20 32 30 | 2c 20 34 38 2c 20 31 36 |ght - 20|, 48, 16|
|00000980| 29 29 3b 0d 0a 09 09 43 | 61 6e 63 65 6c 42 75 74 |));....C|ancelBut|
|00000990| 74 6f 6e 2e 53 65 74 54 | 65 78 74 28 43 61 6e 63 |ton.SetT|ext(Canc|
|000009a0| 65 6c 54 65 78 74 29 3b | 0d 0a 09 09 69 66 28 45 |elText);|....if(E|
|000009b0| 6e 74 65 72 52 65 73 75 | 6c 74 20 3d 3d 20 4d 52 |nterResu|lt == MR|
|000009c0| 5f 43 61 6e 63 65 6c 29 | 0d 0a 09 09 09 43 61 6e |_Cancel)|.....Can|
|000009d0| 63 65 6c 42 75 74 74 6f | 6e 2e 53 65 74 46 6f 6e |celButto|n.SetFon|
|000009e0| 74 28 46 5f 42 6f 6c 64 | 29 3b 0d 0a 09 09 65 6c |t(F_Bold|);....el|
|000009f0| 73 65 0d 0a 09 09 09 43 | 61 6e 63 65 6c 42 75 74 |se.....C|ancelBut|
|00000a00| 74 6f 6e 2e 53 65 74 46 | 6f 6e 74 28 46 5f 4e 6f |ton.SetF|ont(F_No|
|00000a10| 72 6d 61 6c 29 3b 0d 0a | 09 09 4e 6f 42 75 74 74 |rmal);..|..NoButt|
|00000a20| 6f 6e 20 3d 20 55 57 69 | 6e 64 6f 77 53 6d 61 6c |on = UWi|ndowSmal|
|00000a30| 6c 42 75 74 74 6f 6e 28 | 43 72 65 61 74 65 43 6f |lButton(|CreateCo|
|00000a40| 6e 74 72 6f 6c 28 63 6c | 61 73 73 27 55 57 69 6e |ntrol(cl|ass'UWin|
|00000a50| 64 6f 77 53 6d 61 6c 6c | 42 75 74 74 6f 6e 27 2c |dowSmall|Button',|
|00000a60| 20 57 69 6e 57 69 64 74 | 68 20 2d 20 31 30 34 2c | WinWidt|h - 104,|
|00000a70| 20 57 69 6e 48 65 69 67 | 68 74 20 2d 20 32 30 2c | WinHeig|ht - 20,|
|00000a80| 20 34 38 2c 20 31 36 29 | 29 3b 0d 0a 09 09 4e 6f | 48, 16)|);....No|
|00000a90| 42 75 74 74 6f 6e 2e 53 | 65 74 54 65 78 74 28 4e |Button.S|etText(N|
|00000aa0| 6f 54 65 78 74 29 3b 0d | 0a 09 09 69 66 28 45 6e |oText);.|...if(En|
|00000ab0| 74 65 72 52 65 73 75 6c | 74 20 3d 3d 20 4d 52 5f |terResul|t == MR_|
|00000ac0| 4e 6f 29 0d 0a 09 09 09 | 4e 6f 42 75 74 74 6f 6e |No).....|NoButton|
|00000ad0| 2e 53 65 74 46 6f 6e 74 | 28 46 5f 42 6f 6c 64 29 |.SetFont|(F_Bold)|
|00000ae0| 3b 0d 0a 09 09 65 6c 73 | 65 0d 0a 09 09 09 4e 6f |;....els|e.....No|
|00000af0| 42 75 74 74 6f 6e 2e 53 | 65 74 46 6f 6e 74 28 46 |Button.S|etFont(F|
|00000b00| 5f 4e 6f 72 6d 61 6c 29 | 3b 0d 0a 09 09 59 65 73 |_Normal)|;....Yes|
|00000b10| 42 75 74 74 6f 6e 20 3d | 20 55 57 69 6e 64 6f 77 |Button =| UWindow|
|00000b20| 53 6d 61 6c 6c 42 75 74 | 74 6f 6e 28 43 72 65 61 |SmallBut|ton(Crea|
|00000b30| 74 65 43 6f 6e 74 72 6f | 6c 28 63 6c 61 73 73 27 |teContro|l(class'|
|00000b40| 55 57 69 6e 64 6f 77 53 | 6d 61 6c 6c 42 75 74 74 |UWindowS|mallButt|
|00000b50| 6f 6e 27 2c 20 57 69 6e | 57 69 64 74 68 20 2d 20 |on', Win|Width - |
|00000b60| 31 35 36 2c 20 57 69 6e | 48 65 69 67 68 74 20 2d |156, Win|Height -|
|00000b70| 20 32 30 2c 20 34 38 2c | 20 31 36 29 29 3b 0d 0a | 20, 48,| 16));..|
|00000b80| 09 09 59 65 73 42 75 74 | 74 6f 6e 2e 53 65 74 54 |..YesBut|ton.SetT|
|00000b90| 65 78 74 28 59 65 73 54 | 65 78 74 29 3b 0d 0a 09 |ext(YesT|ext);...|
|00000ba0| 09 69 66 28 45 6e 74 65 | 72 52 65 73 75 6c 74 20 |.if(Ente|rResult |
|00000bb0| 3d 3d 20 4d 52 5f 59 65 | 73 29 0d 0a 09 09 09 59 |== MR_Ye|s).....Y|
|00000bc0| 65 73 42 75 74 74 6f 6e | 2e 53 65 74 46 6f 6e 74 |esButton|.SetFont|
|00000bd0| 28 46 5f 42 6f 6c 64 29 | 3b 0d 0a 09 09 65 6c 73 |(F_Bold)|;....els|
|00000be0| 65 0d 0a 09 09 09 59 65 | 73 42 75 74 74 6f 6e 2e |e.....Ye|sButton.|
|00000bf0| 53 65 74 46 6f 6e 74 28 | 46 5f 4e 6f 72 6d 61 6c |SetFont(|F_Normal|
|00000c00| 29 3b 0d 0a 09 09 62 72 | 65 61 6b 3b 0d 0a 09 63 |);....br|eak;...c|
|00000c10| 61 73 65 20 4d 42 5f 59 | 65 73 4e 6f 3a 0d 0a 09 |ase MB_Y|esNo:...|
|00000c20| 09 4e 6f 42 75 74 74 6f | 6e 20 3d 20 55 57 69 6e |.NoButto|n = UWin|
|00000c30| 64 6f 77 53 6d 61 6c 6c | 42 75 74 74 6f 6e 28 43 |dowSmall|Button(C|
|00000c40| 72 65 61 74 65 43 6f 6e | 74 72 6f 6c 28 63 6c 61 |reateCon|trol(cla|
|00000c50| 73 73 27 55 57 69 6e 64 | 6f 77 53 6d 61 6c 6c 42 |ss'UWind|owSmallB|
|00000c60| 75 74 74 6f 6e 27 2c 20 | 57 69 6e 57 69 64 74 68 |utton', |WinWidth|
|00000c70| 20 2d 20 35 32 2c 20 57 | 69 6e 48 65 69 67 68 74 | - 52, W|inHeight|
|00000c80| 20 2d 20 32 30 2c 20 34 | 38 2c 20 31 36 29 29 3b | - 20, 4|8, 16));|
|00000c90| 0d 0a 09 09 4e 6f 42 75 | 74 74 6f 6e 2e 53 65 74 |....NoBu|tton.Set|
|00000ca0| 54 65 78 74 28 4e 6f 54 | 65 78 74 29 3b 0d 0a 09 |Text(NoT|ext);...|
|00000cb0| 09 69 66 28 45 6e 74 65 | 72 52 65 73 75 6c 74 20 |.if(Ente|rResult |
|00000cc0| 3d 3d 20 4d 52 5f 4e 6f | 29 0d 0a 09 09 09 4e 6f |== MR_No|).....No|
|00000cd0| 42 75 74 74 6f 6e 2e 53 | 65 74 46 6f 6e 74 28 46 |Button.S|etFont(F|
|00000ce0| 5f 42 6f 6c 64 29 3b 0d | 0a 09 09 65 6c 73 65 0d |_Bold);.|...else.|
|00000cf0| 0a 09 09 09 4e 6f 42 75 | 74 74 6f 6e 2e 53 65 74 |....NoBu|tton.Set|
|00000d00| 46 6f 6e 74 28 46 5f 4e | 6f 72 6d 61 6c 29 3b 0d |Font(F_N|ormal);.|
|00000d10| 0a 09 09 59 65 73 42 75 | 74 74 6f 6e 20 3d 20 55 |...YesBu|tton = U|
|00000d20| 57 69 6e 64 6f 77 53 6d | 61 6c 6c 42 75 74 74 6f |WindowSm|allButto|
|00000d30| 6e 28 43 72 65 61 74 65 | 43 6f 6e 74 72 6f 6c 28 |n(Create|Control(|
|00000d40| 63 6c 61 73 73 27 55 57 | 69 6e 64 6f 77 53 6d 61 |class'UW|indowSma|
|00000d50| 6c 6c 42 75 74 74 6f 6e | 27 2c 20 57 69 6e 57 69 |llButton|', WinWi|
|00000d60| 64 74 68 20 2d 20 31 30 | 34 2c 20 57 69 6e 48 65 |dth - 10|4, WinHe|
|00000d70| 69 67 68 74 20 2d 20 32 | 30 2c 20 34 38 2c 20 31 |ight - 2|0, 48, 1|
|00000d80| 36 29 29 3b 0d 0a 09 09 | 59 65 73 42 75 74 74 6f |6));....|YesButto|
|00000d90| 6e 2e 53 65 74 54 65 78 | 74 28 59 65 73 54 65 78 |n.SetTex|t(YesTex|
|00000da0| 74 29 3b 0d 0a 09 09 69 | 66 28 45 6e 74 65 72 52 |t);....i|f(EnterR|
|00000db0| 65 73 75 6c 74 20 3d 3d | 20 4d 52 5f 59 65 73 29 |esult ==| MR_Yes)|
|00000dc0| 0d 0a 09 09 09 59 65 73 | 42 75 74 74 6f 6e 2e 53 |.....Yes|Button.S|
|00000dd0| 65 74 46 6f 6e 74 28 46 | 5f 42 6f 6c 64 29 3b 0d |etFont(F|_Bold);.|
|00000de0| 0a 09 09 65 6c 73 65 0d | 0a 09 09 09 59 65 73 42 |...else.|....YesB|
|00000df0| 75 74 74 6f 6e 2e 53 65 | 74 46 6f 6e 74 28 46 5f |utton.Se|tFont(F_|
|00000e00| 4e 6f 72 6d 61 6c 29 3b | 0d 0a 09 09 62 72 65 61 |Normal);|....brea|
|00000e10| 6b 3b 0d 0a 09 63 61 73 | 65 20 4d 42 5f 4f 4b 43 |k;...cas|e MB_OKC|
|00000e20| 61 6e 63 65 6c 3a 0d 0a | 09 09 43 61 6e 63 65 6c |ancel:..|..Cancel|
|00000e30| 42 75 74 74 6f 6e 20 3d | 20 55 57 69 6e 64 6f 77 |Button =| UWindow|
|00000e40| 53 6d 61 6c 6c 42 75 74 | 74 6f 6e 28 43 72 65 61 |SmallBut|ton(Crea|
|00000e50| 74 65 43 6f 6e 74 72 6f | 6c 28 63 6c 61 73 73 27 |teContro|l(class'|
|00000e60| 55 57 69 6e 64 6f 77 53 | 6d 61 6c 6c 42 75 74 74 |UWindowS|mallButt|
|00000e70| 6f 6e 27 2c 20 57 69 6e | 57 69 64 74 68 20 2d 20 |on', Win|Width - |
|00000e80| 35 32 2c 20 57 69 6e 48 | 65 69 67 68 74 20 2d 20 |52, WinH|eight - |
|00000e90| 32 30 2c 20 34 38 2c 20 | 31 36 29 29 3b 0d 0a 09 |20, 48, |16));...|
|00000ea0| 09 43 61 6e 63 65 6c 42 | 75 74 74 6f 6e 2e 53 65 |.CancelB|utton.Se|
|00000eb0| 74 54 65 78 74 28 43 61 | 6e 63 65 6c 54 65 78 74 |tText(Ca|ncelText|
|00000ec0| 29 3b 0d 0a 09 09 69 66 | 28 45 6e 74 65 72 52 65 |);....if|(EnterRe|
|00000ed0| 73 75 6c 74 20 3d 3d 20 | 4d 52 5f 43 61 6e 63 65 |sult == |MR_Cance|
|00000ee0| 6c 29 0d 0a 09 09 09 43 | 61 6e 63 65 6c 42 75 74 |l).....C|ancelBut|
|00000ef0| 74 6f 6e 2e 53 65 74 46 | 6f 6e 74 28 46 5f 42 6f |ton.SetF|ont(F_Bo|
|00000f00| 6c 64 29 3b 0d 0a 09 09 | 65 6c 73 65 0d 0a 09 09 |ld);....|else....|
|00000f10| 09 43 61 6e 63 65 6c 42 | 75 74 74 6f 6e 2e 53 65 |.CancelB|utton.Se|
|00000f20| 74 46 6f 6e 74 28 46 5f | 4e 6f 72 6d 61 6c 29 3b |tFont(F_|Normal);|
|00000f30| 0d 0a 09 09 4f 4b 42 75 | 74 74 6f 6e 20 3d 20 55 |....OKBu|tton = U|
|00000f40| 57 69 6e 64 6f 77 53 6d | 61 6c 6c 42 75 74 74 6f |WindowSm|allButto|
|00000f50| 6e 28 43 72 65 61 74 65 | 43 6f 6e 74 72 6f 6c 28 |n(Create|Control(|
|00000f60| 63 6c 61 73 73 27 55 57 | 69 6e 64 6f 77 53 6d 61 |class'UW|indowSma|
|00000f70| 6c 6c 42 75 74 74 6f 6e | 27 2c 20 57 69 6e 57 69 |llButton|', WinWi|
|00000f80| 64 74 68 20 2d 20 31 30 | 34 2c 20 57 69 6e 48 65 |dth - 10|4, WinHe|
|00000f90| 69 67 68 74 20 2d 20 32 | 30 2c 20 34 38 2c 20 31 |ight - 2|0, 48, 1|
|00000fa0| 36 29 29 3b 0d 0a 09 09 | 4f 4b 42 75 74 74 6f 6e |6));....|OKButton|
|00000fb0| 2e 53 65 74 54 65 78 74 | 28 4f 4b 54 65 78 74 29 |.SetText|(OKText)|
|00000fc0| 3b 0d 0a 09 09 69 66 28 | 45 6e 74 65 72 52 65 73 |;....if(|EnterRes|
|00000fd0| 75 6c 74 20 3d 3d 20 4d | 52 5f 4f 4b 29 0d 0a 09 |ult == M|R_OK)...|
|00000fe0| 09 09 4f 4b 42 75 74 74 | 6f 6e 2e 53 65 74 46 6f |..OKButt|on.SetFo|
|00000ff0| 6e 74 28 46 5f 42 6f 6c | 64 29 3b 0d 0a 09 09 65 |nt(F_Bol|d);....e|
|00001000| 6c 73 65 0d 0a 09 09 09 | 4f 4b 42 75 74 74 6f 6e |lse.....|OKButton|
|00001010| 2e 53 65 74 46 6f 6e 74 | 28 46 5f 4e 6f 72 6d 61 |.SetFont|(F_Norma|
|00001020| 6c 29 3b 0d 0a 09 09 62 | 72 65 61 6b 3b 0d 0a 09 |l);....b|reak;...|
|00001030| 63 61 73 65 20 4d 42 5f | 4f 4b 3a 0d 0a 09 09 4f |case MB_|OK:....O|
|00001040| 4b 42 75 74 74 6f 6e 20 | 3d 20 55 57 69 6e 64 6f |KButton |= UWindo|
|00001050| 77 53 6d 61 6c 6c 42 75 | 74 74 6f 6e 28 43 72 65 |wSmallBu|tton(Cre|
|00001060| 61 74 65 43 6f 6e 74 72 | 6f 6c 28 63 6c 61 73 73 |ateContr|ol(class|
|00001070| 27 55 57 69 6e 64 6f 77 | 53 6d 61 6c 6c 42 75 74 |'UWindow|SmallBut|
|00001080| 74 6f 6e 27 2c 20 57 69 | 6e 57 69 64 74 68 20 2d |ton', Wi|nWidth -|
|00001090| 20 35 32 2c 20 57 69 6e | 48 65 69 67 68 74 20 2d | 52, Win|Height -|
|000010a0| 20 32 30 2c 20 34 38 2c | 20 31 36 29 29 3b 0d 0a | 20, 48,| 16));..|
|000010b0| 09 09 4f 4b 42 75 74 74 | 6f 6e 2e 53 65 74 54 65 |..OKButt|on.SetTe|
|000010c0| 78 74 28 4f 4b 54 65 78 | 74 29 3b 0d 0a 09 09 69 |xt(OKTex|t);....i|
|000010d0| 66 28 45 6e 74 65 72 52 | 65 73 75 6c 74 20 3d 3d |f(EnterR|esult ==|
|000010e0| 20 4d 52 5f 4f 4b 29 0d | 0a 09 09 09 4f 4b 42 75 | MR_OK).|....OKBu|
|000010f0| 74 74 6f 6e 2e 53 65 74 | 46 6f 6e 74 28 46 5f 42 |tton.Set|Font(F_B|
|00001100| 6f 6c 64 29 3b 0d 0a 09 | 09 65 6c 73 65 0d 0a 09 |old);...|.else...|
|00001110| 09 09 4f 4b 42 75 74 74 | 6f 6e 2e 53 65 74 46 6f |..OKButt|on.SetFo|
|00001120| 6e 74 28 46 5f 4e 6f 72 | 6d 61 6c 29 3b 0d 0a 09 |nt(F_Nor|mal);...|
|00001130| 09 62 72 65 61 6b 3b 0d | 0a 09 7d 0d 0a 7d 0d 0a |.break;.|..}..}..|
|00001140| 0d 0a 66 75 6e 63 74 69 | 6f 6e 20 4e 6f 74 69 66 |..functi|on Notif|
|00001150| 79 28 55 57 69 6e 64 6f | 77 44 69 61 6c 6f 67 43 |y(UWindo|wDialogC|
|00001160| 6f 6e 74 72 6f 6c 20 43 | 2c 20 62 79 74 65 20 45 |ontrol C|, byte E|
|00001170| 29 0d 0a 7b 0d 0a 09 6c | 6f 63 61 6c 20 55 57 69 |)..{...l|ocal UWi|
|00001180| 6e 64 6f 77 4d 65 73 73 | 61 67 65 42 6f 78 20 50 |ndowMess|ageBox P|
|00001190| 3b 0d 0a 0d 0a 09 50 20 | 3d 20 55 57 69 6e 64 6f |;.....P |= UWindo|
|000011a0| 77 4d 65 73 73 61 67 65 | 42 6f 78 28 50 61 72 65 |wMessage|Box(Pare|
|000011b0| 6e 74 57 69 6e 64 6f 77 | 29 3b 0d 0a 0d 0a 09 69 |ntWindow|);.....i|
|000011c0| 66 28 45 20 3d 3d 20 44 | 45 5f 43 6c 69 63 6b 29 |f(E == D|E_Click)|
|000011d0| 0d 0a 09 7b 0d 0a 09 09 | 73 77 69 74 63 68 28 43 |...{....|switch(C|
|000011e0| 29 0d 0a 09 09 7b 0d 0a | 09 09 63 61 73 65 20 59 |)....{..|..case Y|
|000011f0| 65 73 42 75 74 74 6f 6e | 3a 0d 0a 09 09 09 50 2e |esButton|:.....P.|
|00001200| 52 65 73 75 6c 74 20 3d | 20 4d 52 5f 59 65 73 3b |Result =| MR_Yes;|
|00001210| 0d 0a 09 09 09 50 2e 43 | 6c 6f 73 65 28 29 3b 09 |.....P.C|lose();.|
|00001220| 09 09 0d 0a 09 09 09 62 | 72 65 61 6b 3b 0d 0a 09 |.......b|reak;...|
|00001230| 09 63 61 73 65 20 4e 6f | 42 75 74 74 6f 6e 3a 0d |.case No|Button:.|
|00001240| 0a 09 09 09 50 2e 52 65 | 73 75 6c 74 20 3d 20 4d |....P.Re|sult = M|
|00001250| 52 5f 4e 6f 3b 0d 0a 09 | 09 09 50 2e 43 6c 6f 73 |R_No;...|..P.Clos|
|00001260| 65 28 29 3b 0d 0a 09 09 | 09 62 72 65 61 6b 3b 0d |e();....|.break;.|
|00001270| 0a 09 09 63 61 73 65 20 | 4f 4b 42 75 74 74 6f 6e |...case |OKButton|
|00001280| 3a 0d 0a 09 09 09 50 2e | 52 65 73 75 6c 74 20 3d |:.....P.|Result =|
|00001290| 20 4d 52 5f 4f 4b 3b 0d | 0a 09 09 09 50 2e 43 6c | MR_OK;.|....P.Cl|
|000012a0| 6f 73 65 28 29 3b 0d 0a | 09 09 09 62 72 65 61 6b |ose();..|...break|
|000012b0| 3b 0d 0a 09 09 63 61 73 | 65 20 43 61 6e 63 65 6c |;....cas|e Cancel|
|000012c0| 42 75 74 74 6f 6e 3a 0d | 0a 09 09 09 50 2e 52 65 |Button:.|....P.Re|
|000012d0| 73 75 6c 74 20 3d 20 4d | 52 5f 43 61 6e 63 65 6c |sult = M|R_Cancel|
|000012e0| 3b 0d 0a 09 09 09 50 2e | 43 6c 6f 73 65 28 29 3b |;.....P.|Close();|
|000012f0| 0d 0a 09 09 09 62 72 65 | 61 6b 3b 0d 0a 09 09 7d |.....bre|ak;....}|
|00001300| 0d 0a 09 7d 0d 0a 7d 0d | 0a 0d 0a 00             |...}..}.|....    |
+--------+-------------------------+-------------------------+--------+--------+