1  /*
     2   Copyright aswing.org, see the LICENCE.txt.
     3  */
     4   
     5  import org.aswing.ASColor;
     6  import org.aswing.border.Border;
     7  import org.aswing.Component;
     8  import org.aswing.geom.Rectangle;
     9  import org.aswing.graphices.Graphics;
    10  import org.aswing.graphices.SolidBrush;
    11  import org.aswing.Insets;
    12  import org.aswing.plaf.UIResource;
    13  import org.aswing.UIDefaults;
    14  import org.aswing.UIManager;
    15  
    16  /**
    17   * @author iiley
    18   */
    19  class org.aswing.plaf.winxp.border.TextBorder implements Border, UIResource {
    20  	
    21  	
    22    
    23      private var highlight:ASColor;
    24     
    25  	
    26  	public function TextBorder(shadow:ASColor, darkShadow:ASColor, light:ASColor, highlight:ASColor){
    27  		var table:UIDefaults = UIManager.getLookAndFeelDefaults();
    28  		
    29  		
    30  		this.highlight = highlight;
    31  		
    32  	}
    33  	
    34  	/**
    35  	 * paint the ButtonBorder content.
    36  	 */
    37      public function paintBorder(c:Component, g:Graphics, r:Rectangle):Void{
    38  			
    39  		    var x1:Number = r.x;
    40  			var y1:Number = r.y;
    41  			var x2:Number = x1 + r.width;
    42  			var y2:Number = y1 + r.height;
    43  		
    44  			g.fillRectangle(new SolidBrush(highlight), x1,y1,x2,y2);
    45  			
    46      }
    47  	
    48  	public function getBorderInsets(c:Component, bounds:Rectangle):Insets{
    49      	return new Insets(1, 1, 1, 1);
    50      }
    51      
    52      public function uninstallBorder(c:Component):Void{
    53      }
    54  	
    55  }
    56
as2api