1 -- Created on: 2004-06-24
3 -- Copyright (c) 2004-2014 OPEN CASCADE SAS
5 -- This file is part of Open CASCADE Technology software library.
7 -- This library is free software; you can redistribute it and/or modify it under
8 -- the terms of the GNU Lesser General Public License version 2.1 as published
9 -- by the Free Software Foundation, with special exception defined in the file
10 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11 -- distribution for complete text of the license and disclaimer of any warranty.
13 -- Alternatively, this file may be used under the terms of Open CASCADE
14 -- commercial license or contractual agreement.
16 private class ColorScale from V3d inherits ColorScale from Aspect
18 ---Purpose: A colorscale class
23 LayerMgrPointer from V3d,
24 --Layer from Visual3d,
26 ExtendedString from TCollection
32 Create(theMgr : LayerMgr from V3d)
33 returns ColorScale from V3d;
34 ---Purpose: Returns returns ColorScale from V3d.
37 --returns View from V3d;
38 ---Purpose: Returns View from V3d.
40 Display(me : mutable);
45 returns Boolean from Standard;
47 ---Category: Protected
49 UpdateColorScale(me : mutable)
50 is redefined protected;
52 --BeginPaint(me : mutable)
53 --returns Boolean from Standard
54 --is redefined protected;
56 --EndPaint(me : mutable)
57 --returns Boolean from Standard
58 --is redefined protected;
60 PaintRect(me : mutable; theX, theY, theWidth, theHeight : Integer from Standard;
61 theColor : Color from Quantity;
62 theFilled : Boolean from Standard = Standard_False)
65 PaintText(me : mutable; theText : ExtendedString from TCollection;
66 theX, theY : Integer from Standard;
67 theColor : Color from Quantity)
70 TextWidth(me; theText : ExtendedString from TCollection)
71 returns Integer from Standard
74 TextHeight(me; theText : ExtendedString from TCollection)
75 returns Integer from Standard
79 theText : ExtendedString from TCollection;
80 theHeight : Integer from Standard;
81 theWidth : in out Integer from Standard;
82 theAscent : in out Integer from Standard;
83 theDescent : in out Integer from Standard );
85 DrawScale(me : mutable);
90 --returns Layer from Visual3d
95 --myView : View from V3d;
96 myLayerMgr : LayerMgrPointer from V3d;
97 --myOverlay : Layer from Visual3d;
98 myDisplay : Boolean from Standard;