]> Creatis software - bbtk.git/blobdiff - packages/demo/bbs/appli/demoViewing1.bbs
Fix comment/code
[bbtk.git] / packages / demo / bbs / appli / demoViewing1.bbs
index 60d826ba91659e5931fad6cc2978d171de13ab5b..d6b4afa79076328535b9fcfcaf9c68609fa039b4 100644 (file)
@@ -17,86 +17,26 @@ load gdcmvtk
 include wxvtk/boxes/bbSimpleSlicer
 
 new LayoutX4 main
-new LayoutLine upright
-new LayoutLine upleft
-new LayoutLine downleft
 
-connect upright.Widget  main.Widget1
-connect upleft.Widget   main.Widget2
-connect downleft.Widget main.Widget3
+new LayoutLine  upright
+new LayoutLine  upleft
+new LayoutLine  downleft
+new LayoutSplit downright
+   set downright.Proportion 85
+
+connect upright.Widget   main.Widget1
+connect upleft.Widget    main.Widget2
+connect downleft.Widget  main.Widget3
+connect downright.Widget main.Widget4
+
+# Here loads 'hola.mhd'
+# ---------------------
 
-# Here loads hola.mhd
-# -------------------
 include vtk/boxes/bbLoadHola
 new LoadHola reader
 
-# uncomment next lines to have a file selector
-# --------------------------------------------
-/*
-new FileSelector openFileDialog
-new ImageReader reader
-  connect openFileDialog.Out reader.In
-*/
-
-# uncomment next lines to use Gimmick
-# -----------------------------------
-/*
-load creaImageIO
-new Gimmick reader
-*/
-
-# uncomment next lines to Read a MHD file (and nothing else !)
-# ------------------------------------------------------------
-/*
-new FileSelector openFileDialog
- set openFileDialog.Wildcard  "(*.mhd)|*.mhd"
-new MetaImageReader reader
-   connect openFileDialog.Out reader.In
-*/
-
-# uncomment the following lines to read a 3D images stack
-# (only if file name order is meaningfull)
-# -------------------------------------------------------
-/*
-// To choose the directory
-new DirectorySelector ds
-// To get the image names into a vector
-new FilesFromDirectory fd
-// To read all the files, as a bbitk::ImagePointer
-new ImageSeriesReader reader
-// user choosen directory as input
-connect ds.Out fd.In
-set fd.Recursive false
-// list of files as input
-#print "Files found in $ds.Out$\n
-connect fd.Out reader.FileNames
-*/
-
-# uncomment the following lines to read a 3D images stack
-# (if the directory contains a 'XCoherent" Serie)
-# -------------------------------------------------------
-/*
-// To choose the directory
-new DirectorySelector ds
-// To get the image names into a vector
-new FilesFromDirectory fd
-// user choosen directory as input
-connect ds.Out fd.In 
-// order the files, computes an accurate ZSpacing
-new GetXCoherentInfoGdcmReader reader
-connect fd.Out reader.In
-*/
-
-# uncomment the following lines to read a 3D images stack
-# (with DICOMDirReader)
-# -------------------------------------------------------
-/*
-include itk/boxes/bbDICOMDirReader
-// To choose the directory
-new DirectorySelector ds
-new DICOMDirReader reader
-   connect ds.Out reader.In
-*/
+# Have a look at exampleViewing1.1.bbs
+# If you want to know how to read different images.
 
 // We need that to set Sliders sizes
 
@@ -104,8 +44,6 @@ new DICOMDirReader reader
 new ImageProperties mc
    connect reader.Out mc.In
 
-#print "Image properties : $reader.Out"
-
 #Get number of column (X)
 new GetVectorIntElement gveX
    connect mc.Size gveX.In
@@ -120,7 +58,7 @@ new GetVectorIntElement gveY
 new GetVectorIntElement gveZ
    connect mc.Size gveZ.In
    set gveZ.I 2
-print "Dim Z $gveZ.Out"
+//print "Dim Z $gveZ.Out"
 
 #Compute the number of the 'middle' slice on X axis
 new Div div0
@@ -186,10 +124,20 @@ new Viewer3D viewer
   connect planes.PlaneY viewer.Obs2
   connect planes.PlaneZ viewer.Obs3
 
-  connect viewer.Widget main.Widget4
+new CheckBox   chkbox
+  set chkbox.Title "Interpolate Pixels (in '2D' images)"
+  set chkbox.In 1
+  connect chkbox.BoxChange   viewerUL.BoxExecute
+  connect chkbox.BoxChange   viewerUR.BoxExecute
+  connect chkbox.BoxChange   viewerTD.BoxExecute
+
+  connect viewer.Widget downright.Widget1
+  connect chkbox.Widget downright.Widget2
+
+  connect chkbox.Out viewerUL.Interpolate
+  connect chkbox.Out viewerUR.Interpolate
+  connect chkbox.Out viewerTD.Interpolate
 
 set main.WinTitle "demoViewing1"
 exec main
 exec viewerTD
-
-