home *** CD-ROM | disk | FTP | other *** search
/ Game Level Design / GLDesign.bin / Software / UnrealEngine2Runtime / UE2Runtime-22262001_Demo.exe / GUI / Classes / GUIVertScrollZone.uc < prev    next >
Text File  |  2003-06-30  |  1KB  |  53 lines

  1. // ====================================================================
  2. //  Class:  GUI.GUIVertScrollZone
  3. //
  4. //  The VertScrollZone is the background zone for a vertical scrollbar.
  5. //  When the user clicks on the zone, it caculates it's percentage.
  6. //
  7. //  Written by Joe Wilcox
  8. //  (c) 2002, Epic Games, Inc.  All Rights Reserved
  9. // ====================================================================
  10.  
  11. class GUIVertScrollZone extends GUIComponent
  12.     Native;
  13.  
  14. cpptext
  15. {
  16.         void Draw(UCanvas* Canvas);
  17. }
  18.  
  19. function InitComponent(GUIController MyController, GUIComponent MyOwner)
  20. {
  21.     Super.InitComponent(MyController, MyOwner);
  22.  
  23.     OnClick = InternalOnClick;
  24. }
  25.  
  26. function bool InternalOnClick(GUIComponent Sender)
  27. {
  28.     local float perc;
  29.  
  30.     if (!IsInBounds())
  31.         return false;
  32.  
  33.     perc = ( Controller.MouseY - ActualTop() ) / ActualHeight();
  34.     OnScrollZoneClick(perc);
  35.  
  36.     return true;
  37.  
  38. }
  39.  
  40.  
  41. delegate OnScrollZoneClick(float Delta)        // Should be overridden
  42. {
  43. }
  44.  
  45. defaultproperties
  46. {
  47.     StyleName="ScrollZone"
  48.     bNeverFocus=true
  49.     bAcceptsInput=true
  50.     bCaptureMouse=true
  51.     bRepeatClick=true
  52.     RenderWeight=0.25
  53. }