mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-05-01 10:26:12 +03:00
24 lines
587 B
Plaintext
24 lines
587 B
Plaintext
puts "=========="
|
|
puts "OCC23883"
|
|
#################################################################################
|
|
puts "Bound color in the primitive array do not work when displayed using VBO"
|
|
#################################################################################
|
|
|
|
set x_coord 321
|
|
set y_coord 200
|
|
|
|
vinit
|
|
vvbo 0
|
|
vdrawparray pl01 polylines 0 v 0 0 0 v 0 10 0 v 0 10 10 v 0 0 0 b 4 c 1 0 0
|
|
vfit
|
|
checkcolor $x_coord $y_coord 1 0 0
|
|
|
|
vclear
|
|
vvbo 1
|
|
vdrawparray pl01 polylines 0 v 0 0 0 v 0 10 0 v 0 10 10 v 0 0 0 b 4 c 1 0 0
|
|
checkcolor $x_coord $y_coord 1 0 0
|
|
|
|
set only_screen 1
|
|
|
|
|