<div style="FONT-FAMILY: Arial; COLOR: rgb(0, 0, 0); FONT-SIZE: 12px"><div> Dear VTK Users,</div><div><br /></div><div>I am trying to process the color content of BMP images. I use the following Tcl/Tk script to load and process a BMP file. The scalar data reported from the poly data is shown below the code and the saved poly data shown below that. While the saved poly data has the desired color scalar values the value generated using GetPointData is something I don't understand. Can someone assist me in using the correct command to access the color scalars.</div><div><br /></div><div>Thanks for your help.</div><div><br /></div><div>Patrick</div><div><br /></div><div><div>CODE</div><div># Create the RenderWindow, Renderer and Interactor</div><div>#</div><div>catch {load vtktcl}</div><div><br /></div><div># Get the interactor ui</div><div># VTK 4.0</div><div>package require vtk</div><div>package require vtkinteraction</div><div><br /></div><div>#source voi.tcl</div><div><br /></div><div>vtkRenderer ren1</div><div>vtkRenderWindow renWin</div><div> renWin AddRenderer ren1</div><div>vtkRenderWindowInteractor iren</div><div> iren SetRenderWindow renWin</div><div><br /></div><div>toplevel .debug</div><div>text .debug.t -height 20 -width 60 -background white</div><div>pack .debug.t</div><div> </div><div>vtkBMPReader readBMP</div><div> readBMP SetFileName "TstCore1.bmp"</div><div> readBMP Update</div><div> set dim [[readBMP GetOutput] GetExtent]</div><div> .debug.t insert end "Extent: $dim\n" ; update</div><div> </div><div>vtkDataSetMapper mapBMP</div><div> mapBMP SetInput [readBMP GetOutput]</div><div> mapBMP ScalarVisibilityOn</div><div>vtkActor actorBMP</div><div> actorBMP SetMapper mapBMP</div><div>ren1 AddActor actorBMP </div><div><br /></div><div>vtkImageDataGeometryFilter geomBMP</div><div> geomBMP SetInput [readBMP GetOutput]</div><div> geomBMP SetExtent 0 1000000 0 1000000 0 0</div><div> geomBMP Update</div><div> for {set i 0} {$i < 1000} {incr i} {</div><div> set scalrange [[[[geomBMP GetOutput] GetPointData] GetScalars] GetValue $i]</div><div> .debug.t insert end "Scalar: $i $scalrange\n" ; update</div><div> }</div><div>vtkPolyDataWriter polyWriter</div><div> polyWriter SetInput [geomBMP GetOutput]</div><div> polyWriter SetFileName "OBsurf.vtk"</div><div># polyWriter SetFileTypeToBinary</div><div> polyWriter Write</div><div><br /></div><div>ren1 SetBackground 1.0 1.0 1.0</div><div>renWin SetSize 1000 1000</div><div>[ren1 GetActiveCamera] SetViewUp 0.0 1.0 1.0</div><div>[ren1 GetActiveCamera] Elevation 0.0</div><div>[ren1 GetActiveCamera] Zoom 1.5</div><div><br /></div><div># render the image</div><div>#</div><div>iren Initialize</div><div>#iren SetUserMethod {wm deiconify .vtkInteract}</div></div><div><br /></div><div>SCALARS OUTPUT FROM CODE</div><div><div>Scalar: 0 70</div><div>Scalar: 1 71</div><div>Scalar: 2 89</div><div>Scalar: 3 78</div><div>Scalar: 4 81</div><div>Scalar: 5 96</div><div>Scalar: 6 118</div><div>Scalar: 7 122</div><div>Scalar: 8 134</div><div>Scalar: 9 139</div><div>Scalar: 10 143</div><div>Scalar: 11 152</div><div>Scalar: 12 130</div><div>Scalar: 13 151</div><div>Scalar: 14 152</div></div><div><br /></div><div>SCALARS IN OUTPUT FILE</div><div><div>POINT_DATA 241902</div><div>COLOR_SCALARS BMPImage 3</div><div>0.27451 0.278431 0.34902 0.305882 0.317647 0.376471 0.462745 0.478431 0.52549 </div><div>0.545098 0.560784 0.596078 0.509804 0.592157 0.596078 </div><div>0.329412 0.384314 0.388235 0.298039 0.305882 0.301961 </div><div>0.313725 0.278431 0.258824 0.286275 0.215686 0.160784 </div></div><div><br /></div></div>