0027957: Visualization, AIS_InteractiveContext - protect from displaying the same...
[occt.git] / tests / bugs / vis / bug24133_2
1 puts "============"
2 puts "CR24133"
3 puts "============"
4 puts ""
5 #######################################################################
6 #  Development of improvement of dimensions implementation
7 #  Angle dimension
8 #######################################################################
9 pload VISUALIZATION
10
11 vfont add [locate_data_file DejaVuSans.ttf] SansFont
12
13 vinit
14 vpoint angle1P1 0 0 0
15 vpoint angle1P2 50 50 50
16 vpoint angle1P3 50 50 100
17 vdimension dim1 -angle -shapes angle1P1 angle1P2 angle1P3 -font SansFont
18 vfit
19 vmoveto 249 206
20
21 set x_coord 249
22 set y_coord 200
23
24 checkcolor $x_coord $y_coord 0 1 1
25
26 if { $stat != 1 } {
27    puts "Error : Highlighting of angle dimension with 2d text is wrong."
28 }
29 vinit Viewer2/View2
30 vpoint angle2P1 0 0 0
31 vpoint angle2P2 50 50 50
32 vpoint angle2P3 50 50 100
33 vdimension dim2 -angle -text 3d -shapes angle2P1 angle2P2 angle2P3 -font SansFont
34 vfit
35 vmoveto 263 251
36
37 set x_coord 335
38 set y_coord 319
39
40 checkcolor $x_coord $y_coord 0 1 1
41
42 if { $stat != 1 } {
43    puts "Error : Highlighting of angle dimension with 3d text is wrong."
44 }
45
46 checkview -screenshot -3d -path ${imagedir}/${test_image}.png