// // CPT operator / SondeerGame // This source file is (c) by Deltares. // - October 2014 // //============================================================================= // Date Id Modification // // wsl - 12-12-2008 Shows an ugly map of the area //============================================================================= class MenuLevelMap extends GeoGUIPage; var automated GeoImage PaperBackground; var automated GeoImage Map; var automated GeoButton OKButton; function InitComponent(GUIController MyController, GUIComponent MyOwner) { Super.InitComponent(MyController, MyOwner); /// Set image depending on scenario: Map.Image = Material(DynamicLoadObject("Sondeermeester.Sondeertekeningen.tekeninglevel" $ GeoPC.GetScenarioNumber(), class'Material')); } function bool ButtonClick(GUIComponent Sender) { if(Sender == OKButton) { Controller.CloseMenu(); } return true; } //============================================================================= // Date Id Modification //============================================================================= defaultproperties { Begin Object Class=GeoImage name=TPaperBackground WinWidth=0.46 WinLeft=0.25 WinTop=0.2 WinHeight=0.6 ImageStyle=ISTY_Scaled Image=Material'GeoGUIContent.Stretchable.paper' End Object Begin Object class=GeoButton Name=TCloseButton IniOption="TCloseButton" WinWidth=0.1 WinLeft=0.43 WinTop=0.715 OnClick=ButtonClick End Object Begin Object Class=GeoImage name=TMap WinLeft=0.32 WinTop=0.28 WinWidth=0.32 WinHeight=0.4 ImageStyle=ISTY_Scaled RenderWeight=1.1 Image=Material'Sondeermeester.Sondeertekeningen.tekeninglevel1' End Object PaperBackground = TPaperBackground OKButton = TCloseButton Map = TMap AllowSelect = true bAllowedAsLast=true bDisconnectOnOpen=false bPersistent=false }