Integration of OCCT 6.5.0 from SVN
[occt.git] / src / OpenGl / OpenGl_textstyle.cxx
1 /***********************************************************************
2
3 FONCTION :
4 ----------
5 File OpenGl_textstyle :
6
7
8 REMARQUES:
9 ---------- 
10
11
12 HISTORIQUE DES MODIFICATIONS   :
13 --------------------------------
14 30-11-98 : FMN ; Creation.
15
16 ************************************************************************/
17
18 /*----------------------------------------------------------------------*/
19 /*
20 * Includes
21 */
22
23
24 #include <OpenGl_tgl_all.hxx>
25
26 #include <stddef.h>
27 #include <stdio.h>
28
29 #include <OpenGl_cmn_varargs.hxx>
30 #include <OpenGl_telem_attri.hxx>
31 #include <OpenGl_tsm.hxx>
32 #include <OpenGl_telem.hxx>
33 #include <OpenGl_telem_inquire.hxx>
34 #include <OpenGl_Memory.hxx>
35
36 /*----------------------------------------------------------------------*/
37 /*
38 * Fonctions statiques
39 */
40
41 static  TStatus  TextStyleDisplay( TSM_ELEM_DATA, Tint, cmn_key* );
42 static  TStatus  TextStyleAdd( TSM_ELEM_DATA, Tint, cmn_key* );
43 static  TStatus  TextStylePrint( TSM_ELEM_DATA, Tint, cmn_key* );
44
45 /*----------------------------------------------------------------------*/
46
47 static  TStatus  (*MtdTbl[])( TSM_ELEM_DATA, Tint, cmn_key* ) =
48 {
49   0,             /* PickTraverse */
50   TextStyleDisplay,
51   TextStyleAdd,
52   0,             /* Delete */
53   TextStylePrint,
54   0              /* Inquire */
55 };
56
57 /*----------------------------------------------------------------------*/
58
59 MtblPtr
60 TelTextStyleInitClass( TelType *el )
61 {
62   *el = TelTextStyle;
63   return MtdTbl;
64 }
65
66 /*----------------------------------------------------------------------*/
67
68 static  TStatus
69 TextStyleAdd( TSM_ELEM_DATA d, Tint n, cmn_key *k )
70 {
71   ((tsm_elem_data)(d.pdata))->ldata = k[0]->data.ldata;
72
73   return TSuccess;
74 }
75
76 /*----------------------------------------------------------------------*/
77
78 static  TStatus
79 TextStyleDisplay( TSM_ELEM_DATA d, Tint n, cmn_key *k )
80 {
81   CMN_KEY  key;
82
83   key.id = TelTextStyle;
84   key.data.ldata = d.ldata;
85   TsmSetAttri( 1, &key );
86   return TSuccess;
87 }
88
89
90 /*----------------------------------------------------------------------*/
91
92 static  TStatus
93 TextStylePrint( TSM_ELEM_DATA data, Tint n, cmn_key *k )
94 {
95   return TSuccess;
96 }
97
98 /*----------------------------------------------------------------------*/