0024387: Tests - use system-independent fonts in test cases
[occt.git] / tests / 3rdparty / fonts / A3
... / ...
CommitLineData
1puts "============"
2puts "OCC23457 Text rendering performance"
3puts "Test case performs rendering of single huge text label"
4puts "============"
5puts ""
6
7vfont add [locate_data_file DejaVuSans.ttf] SansFont
8
9vtrihedron trihedr
10
11set aFileHandle [open [locate_data_file screw.step] r]
12set aText [read $aFileHandle]
13close $aFileHandle
14
15vpoint p0 0 0 -400
16vpoint p1 0 10000 -400
17vpoint p2 1000 0 -400
18vfit
19
20vdrawtext text "$aText" -pos 100 100 -400 -color 0.0 1.0 1.0 -halign left -valign bottom -angle 000 -zoom 1 -height 50 -aspect regular -font SansFont
21
22vfps