home *** CD-ROM | disk | FTP | other *** search
/ Game Level Design / GLDesign.bin / Software / UnrealEngine2Runtime / UE2Runtime-22262001_Demo.exe / GUI / Classes / MyTestPanelB.uc < prev    next >
Text File  |  2003-06-30  |  2KB  |  107 lines
  1. // ====================================================================
  2. // (C) 2002, Epic Games
  3. // ====================================================================
  4.  
  5. class MyTestPanelB extends GUITabPanel;
  6.  
  7. var Automated moComboBox ComboTest;
  8. var Automated GUILabel lbListBoxTest;
  9. var Automated GUIListBox ListBoxTest;
  10. var Automated GUILabel lbScrollTextBox;
  11. var Automated GUIScrollTextBox ScrollTextBoxTest;
  12.  
  13. function InitComponent(GUIController MyController, GUIComponent MyOwner)
  14. {
  15.     local int i,c;
  16.     local string t;
  17.  
  18.     Super.Initcomponent(MyController, MyOwner);
  19.  
  20.     c = rand(30)+5;
  21.     for (i=0;i<c;i++)
  22.         ComboTest.AddItem("Test "$Rand(100));
  23.  
  24.  
  25.     c = rand(75)+25;
  26.     for (i=0;i<c;i++)
  27.         ListBoxTest.List.Add("Testing "$Rand(100));
  28.  
  29.     ListBoxTest.SetFriendlyLabel(lbListBoxTest);
  30.  
  31.  
  32.     c = rand(75)+25;
  33.     for (i=0;i<c;i++)
  34.     {
  35.         if (t!="")
  36.             t = T $"|";
  37.  
  38.         t = t$"All Work & No Play Makes Me Sad";
  39.     }
  40.  
  41.     ScrollTextBoxTest.SetContent(t);
  42.     ScrollTextBoxTest.SetFriendlyLabel(lbScrollTextBox);
  43.  
  44. }
  45. defaultproperties
  46. {
  47.     Begin Object class=moComboBox Name=caOne
  48.         WinWidth=0.500000
  49.         WinHeight=0.060000
  50.         WinLeft=0.031250
  51.         WinTop=0.079339
  52.         Caption="moComboBox Test"
  53.         CaptionWidth=0.5
  54.         ComponentJustification=TXTA_Left
  55.         TabOrder=0
  56.         Hint="This is a combo box"
  57.     End Object
  58.  
  59.     Begin Object class=GUILabel Name=laTwo
  60.         WinWidth=0.156250
  61.         WinHeight=0.050000
  62.         WinLeft=0.031250
  63.         WinTop=0.200000
  64.         Caption="ListBox Test"
  65.     End Object
  66.  
  67.     Begin Object class=GUIListBox Name=caTwo
  68.         WinWidth=0.445313
  69.         WinHeight=0.706250
  70.         WinLeft=0.031250
  71.         WinTop=0.251653
  72.         TabOrder=1
  73.         bVisibleWhenEmpty=true
  74.     End Object
  75.  
  76.     Begin Object class=GUILabel Name=laThree
  77.         WinWidth=0.257813
  78.         WinHeight=0.050000
  79.         WinLeft=0.515625
  80.         WinTop=0.200000
  81.         Caption="Scrolling Text Test"
  82.     End Object
  83.  
  84.     Begin Object class=GUIScrollTextBox Name=caThree
  85.         WinWidth=0.445313
  86.         WinHeight=0.706250
  87.         WinLeft=0.515625
  88.         WinTop=0.251653
  89.         TabOrder=2
  90.         bVisibleWhenEmpty=true
  91.            CharDelay=0.05
  92.     End Object
  93.  
  94.  
  95.     ComboTest=caOne
  96.     lbListBoxTest=laTwo
  97.     ListBoxTest=caTwo
  98.     lbScrollTextBox=laThree
  99.     ScrollTextBoxTest=caThree
  100.  
  101.     Background=Material'GUIContent.EpicLogo'
  102.  
  103.     WinWidth=1.000000
  104.     WinHeight=0.807813
  105.     WinLeft=0.000000
  106.     WinTop=55.980499
  107. }