src/Graphic3d/Graphic3d_Texture2D.cdl

   1 -- Created on: 1997-07-28
   2 -- Created by: Pierre CHALAMET
   3 -- Copyright (c) 1997-1999 Matra Datavision
   4 -- Copyright (c) 1999-2012 OPEN CASCADE SAS
   5 --
   6 -- The content of this file is subject to the Open CASCADE Technology Public
   7 -- License Version 6.5 (the "License"). You may not use the content of this file
   8 -- except in compliance with the License. Please obtain a copy of the License
   9 -- at http://www.opencascade.org and read it completely before using this file.
  10 --
  11 -- The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
  12 -- main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
  13 --
  14 -- The Original Code and all software distributed under the License is
  15 -- distributed on an "AS IS" basis, without warranty of any kind, and the
  16 -- Initial Developer hereby disclaims all such warranties, including without
  17 -- limitation, any warranties of merchantability, fitness for a particular
  18 -- purpose or non-infringement. Please see the License for the specific terms
  19 -- and conditions governing the rights and limitations under the License.
  20
  21 -- Modified :   GG 10/01/2000 IMP
  22 --              Add NumberOfTextures() and TextureName() methods
  23 --              Add Name() and IsRepeat() method
  24
  25 deferred  class  Texture2D  from  Graphic3d
  26
  27 inherits  TextureMap  from  Graphic3d
  28
  29     ---Purpose: This abstract class for managing 2D textures
  30
  31 uses
  32     TypeOfTexture  from  Graphic3d,
  33     NameOfTexture2D  from  Graphic3d,
  34     StructureManager from  Graphic3d
  35
  36
  37 raises
  38     OutOfRange from Standard
  39
  40 is
  41     Initialize(SM  :  StructureManager  from  Graphic3d;
  42                aFileName  :  CString  from  Standard;
  43                aType      :  TypeOfTexture  from  Graphic3d);
  44
  45     Initialize(SM  :  StructureManager  from  Graphic3d;
  46                aName  :  NameOfTexture2D  from  Graphic3d;
  47                aType :  TypeOfTexture  from  Graphic3d);
  48
  49     Name(me) returns NameOfTexture2D from Graphic3d;
  50     ---Purpose:
  51     -- Returns the name of the predefined textures or NOT_2D_UNKNOWN
  52     -- when the name is given as a filename.
  53     ---Level: Public
  54
  55     NumberOfTextures(myclass) returns Integer from Standard;
  56     ---Purpose:
  57     -- Returns the number of predefined textures.
  58     ---Level: Public
  59
  60     TextureName(myclass; aRank: Integer from Standard)
  61         returns CString from Standard
  62         raises OutOfRange from Standard;
  63     ---Purpose:
  64     -- Returns the name of the predefined texture of rank <aRank>
  65     ---Trigger: when <aRank> is < 1 or > NumberOfTextures.
  66     ---Level: Public
  67
  68 fields
  69     myName: NameOfTexture2D from Graphic3d;
  70
  71 end  Texture2D;
  72