You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
63 lines
1.7 KiB
63 lines
1.7 KiB
# This example demonstrates the use of 2D text.
|
|
|
|
#
|
|
# First we include the VTK Tcl packages which will make available
|
|
# all of the vtk commands to Tcl
|
|
#
|
|
package require vtk
|
|
package require vtkinteraction
|
|
|
|
# Create a sphere source, mapper, and actor
|
|
vtkSphereSource sphere
|
|
|
|
vtkPolyDataMapper sphereMapper
|
|
sphereMapper SetInputConnection [sphere GetOutputPort]
|
|
sphereMapper GlobalImmediateModeRenderingOn
|
|
vtkLODActor sphereActor
|
|
sphereActor SetMapper sphereMapper
|
|
|
|
# Create a scaled text actor.
|
|
# Set the text, font, justification, and properties (bold, italics, etc.).
|
|
vtkTextActor textActor
|
|
textActor ScaledTextOn
|
|
textActor SetDisplayPosition 90 50
|
|
textActor SetInput "This is a sphere"
|
|
|
|
# Set coordinates to match the old vtkScaledTextActor default value
|
|
[textActor GetPosition2Coordinate] SetCoordinateSystemToNormalizedViewport
|
|
[textActor GetPosition2Coordinate] SetValue 0.6 0.1
|
|
|
|
set tprop [textActor GetTextProperty]
|
|
$tprop SetFontSize 18
|
|
$tprop SetFontFamilyToArial
|
|
$tprop SetJustificationToCentered
|
|
$tprop BoldOn
|
|
$tprop ItalicOn
|
|
$tprop ShadowOn
|
|
$tprop SetColor 0 0 1
|
|
|
|
# Create the Renderer, RenderWindow, RenderWindowInteractor
|
|
#
|
|
vtkRenderer ren1
|
|
vtkRenderWindow renWin
|
|
renWin AddRenderer ren1
|
|
vtkRenderWindowInteractor iren
|
|
iren SetRenderWindow renWin
|
|
|
|
# Add the actors to the renderer; set the background and size; zoom in;
|
|
# and render.
|
|
#
|
|
ren1 AddActor2D textActor
|
|
ren1 AddActor sphereActor
|
|
|
|
ren1 SetBackground 1 1 1
|
|
renWin SetSize 250 125
|
|
ren1 ResetCamera
|
|
[ren1 GetActiveCamera] Zoom 1.5
|
|
renWin Render
|
|
|
|
# Set the user method (bound to key 'u')
|
|
iren AddObserver UserEvent {wm deiconify .vtkInteract}
|
|
|
|
# Withdraw the tk window
|
|
wm withdraw .
|
|
|