5d470f244cbae80d49370f8061a3ba8c90cac8e8
[scilab.git] / scilab / modules / scicos / tests / unit_tests / model / Annotation.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2014 - Scilab Enterprises - Paul Bignier
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 // <-- CLI SHELL MODE -->
8 loadXcosLibs();
9 scicos_log("TRACE");
10 p = funcprot();
11 funcprot(0);
12 // Overload scicos_getvalue and xstringl to customize parameters
13 function [ok,txt,font,siz,exprs] = scicos_getvalue(title, fields, types, exprs)
14     ok = %t;
15     txt = "newText";
16     font = 3;
17     siz = 4;
18     exprs = [txt; string(font); string(siz)];
19 endfunction
20 function r = xstringl(a, b, c, d, e)
21     r = [0 0 3 4];
22 endfunction
23 funcprot(p);
24 // Allocate an Annotation
25 o = TEXT_f("define")
26 Xcos info:    objectCreated( 1 , ANNOTATION )
27 Xcos trace:   propertyUpdated( 1 , ANNOTATION , GEOMETRY ) : NO_CHANGES
28 Xcos trace:   propertyUpdated( 1 , ANNOTATION , GEOMETRY ) : NO_CHANGES
29 Xcos trace:   propertyUpdated( 1 , ANNOTATION , DESCRIPTION ) : NO_CHANGES
30 Xcos trace:   propertyUpdated( 1 , ANNOTATION , FONT ) : NO_CHANGES
31 Xcos trace:   propertyUpdated( 1 , ANNOTATION , FONT_SIZE ) : NO_CHANGES
32 Xcos trace:   propertyUpdated( 1 , ANNOTATION , STYLE ) : NO_CHANGES
33  o  = 
34 GUI     : TEXT_f
35 Graphics: 
36           orig = [0,0]
37           sz = [2,1]
38           exprs = ["Text";"2";"1"]
39           style = ""
40 o.graphics
41  ans  =
42 orig = [0,0]
43 sz = [2,1]
44 exprs = ["Text";"2";"1"]
45 style = ""
46 o.model
47  ans  =
48     []
49 o.void
50  ans  =
51     []
52 o.gui
53  ans  =
54  TEXT_f
55 // Redefine gca() to prevent graphic display
56 p = funcprot();
57 funcprot(0);
58 function a = gca()
59     a.font_style = 6;
60     a.font_size = 1;
61     a.font_color = -1;
62 endfunction
63 funcprot(p);
64 // Modify it
65 o = TEXT_f("set", o)
66 Xcos info:    objectCreated( 2 , ANNOTATION )
67 Xcos info:    objectCloned( 1 , 2 , ANNOTATION )
68 Xcos trace:   propertyUpdated( 2 , ANNOTATION , DESCRIPTION ) : NO_CHANGES
69 Xcos trace:   propertyUpdated( 2 , ANNOTATION , FONT ) : NO_CHANGES
70 Xcos trace:   propertyUpdated( 2 , ANNOTATION , FONT_SIZE ) : NO_CHANGES
71 Xcos trace:   propertyUpdated( 2 , ANNOTATION , UID ) : NO_CHANGES
72 Xcos trace:   propertyUpdated( 2 , ANNOTATION , STYLE ) : NO_CHANGES
73 Xcos trace:   propertyUpdated( 2 , ANNOTATION , GEOMETRY ) : NO_CHANGES
74 Xcos trace:   propertyUpdated( 2 , ANNOTATION , PARENT_DIAGRAM ) : NO_CHANGES
75 Xcos trace:   propertyUpdated( 2 , ANNOTATION , PARENT_BLOCK ) : NO_CHANGES
76 Xcos trace:   propertyUpdated( 2 , ANNOTATION , RELATED_TO ) : NO_CHANGES
77 Xcos trace:   propertyUpdated( 2 , ANNOTATION , GEOMETRY ) : NO_CHANGES
78 Xcos debug:   propertyUpdated( 2 , ANNOTATION , GEOMETRY ) : SUCCESS
79 Xcos debug:   propertyUpdated( 2 , ANNOTATION , DESCRIPTION ) : SUCCESS
80 Xcos debug:   propertyUpdated( 2 , ANNOTATION , FONT ) : SUCCESS
81 Xcos debug:   propertyUpdated( 2 , ANNOTATION , FONT_SIZE ) : SUCCESS
82 Xcos trace:   propertyUpdated( 2 , ANNOTATION , STYLE ) : NO_CHANGES
83 Xcos info:    objectDeleted( 1 , ANNOTATION )
84  o  = 
85 GUI     : TEXT_f
86 Graphics: 
87           orig = [0,0]
88           sz = [3,4]
89           exprs = ["newText";"3";"4"]
90           style = ""
91 o.graphics
92  ans  =
93 orig = [0,0]
94 sz = [3,4]
95 exprs = ["newText";"3";"4"]
96 style = ""
97 o.model
98  ans  =
99     []
100 o.void
101  ans  =
102     []
103 o.gui
104  ans  =
105  TEXT_f
106 // Check that all the model items are freed
107 clear
108 Xcos info:    objectDeleted( 2 , ANNOTATION )