blob: 2f560359df232b1d565692c7d6947e7760924a64 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
-- File: Graphic3d_Texture1D.cdl
-- Created: Mon Jul 28 10:31:03 1997
-- Author: Pierre CHALAMET
-- <pct@sgi93>
-- Modified : GG 10/01/2000 IMP
-- Add NumberOfTextures() and TextureName() methods
-- Add Name(),IsSmoothed() and ISModulate() methods
-- GG IMP140300
-- Add Repeat methods.
---Copyright: Matra Datavision 1997
deferred class Texture1D from Graphic3d
inherits TextureMap from Graphic3d
---Purpose: This is an abstract class for managing 1D textures.
uses
TypeOfTexture from Graphic3d,
NameOfTexture1D from Graphic3d,
StructureManager from Graphic3d
raises
OutOfRange from Standard
is
Initialize(SM : StructureManager from Graphic3d;
aFileName: CString from Standard;
aType : TypeOfTexture from Graphic3d);
Initialize(SM : StructureManager from Graphic3d;
aName : NameOfTexture1D from Graphic3d;
aType : TypeOfTexture from Graphic3d);
Name(me) returns NameOfTexture1D from Graphic3d;
---Purpose:
-- Returns the name of the predefined textures or NOT_1D_UNKNOWN
-- when the name is given as a filename.
---Level: Public
NumberOfTextures(myclass) returns Integer from Standard;
---Purpose:
-- Returns the number of predefined textures.
---Level: Public
TextureName(myclass; aRank: Integer from Standard)
returns CString from Standard
raises OutOfRange from Standard;
---Purpose:
-- Returns the name of the predefined texture of rank <aRank>
---Trigger: when <aRank> is < 1 or > NumberOfTextures.
---Level: Public
fields
myName: NameOfTexture1D from Graphic3d;
end Texture1D;
|
