From cd7f5d5f3cc2471e408dc5954f9fef6774df2fc8 Mon Sep 17 00:00:00 2001
From: jean-pierre roux <jean-pierre.roux@creatis.insa-lyon.fr>
Date: Tue, 17 Mar 2009 10:33:11 +0000
Subject: [PATCH] To show that GetZSpacing() from File is not enought

---
 .../bbs/appli/exampleGetInfoGdcmReader.bbs    |  2 +-
 .../exampleGetXCoherentInfoGdcmReader.bbs     | 44 +++++++++++++++++++
 2 files changed, 45 insertions(+), 1 deletion(-)
 create mode 100644 packages/gdcmvtk/bbs/appli/exampleGetXCoherentInfoGdcmReader.bbs

diff --git a/packages/gdcmvtk/bbs/appli/exampleGetInfoGdcmReader.bbs b/packages/gdcmvtk/bbs/appli/exampleGetInfoGdcmReader.bbs
index 889e505..b0a94b0 100644
--- a/packages/gdcmvtk/bbs/appli/exampleGetInfoGdcmReader.bbs
+++ b/packages/gdcmvtk/bbs/appli/exampleGetInfoGdcmReader.bbs
@@ -6,7 +6,7 @@ load std
 load wx
 
 
-message All 9
+//message all 9
 
 new FileSelector openFileDialog
 print Avant_new_GetInfoGdcmReader  
diff --git a/packages/gdcmvtk/bbs/appli/exampleGetXCoherentInfoGdcmReader.bbs b/packages/gdcmvtk/bbs/appli/exampleGetXCoherentInfoGdcmReader.bbs
new file mode 100644
index 0000000..4c312bf
--- /dev/null
+++ b/packages/gdcmvtk/bbs/appli/exampleGetXCoherentInfoGdcmReader.bbs
@@ -0,0 +1,44 @@
+category "example"
+
+
+load gdcmvtk
+load std
+load wx
+
+
+//message all 9
+
+// To choose the directory
+new DirectorySelector ds
+// To get the image names into a vector
+print "avant FilesFromDirectory"
+new FilesFromDirectory fd
+print "apres FilesFromDirectory"
+   connect ds.Out fd.In 
+print "apres connect"
+// list of files as input
+print "In $ds.Out$\n
+print "Files found : $fd.Out$\n
+
+
+new GetXCoherentInfoGdcmReader reader
+//connect fd.Out  reader.FileNames
+connect fd.Out  reader.In
+exec  reader  
+
+// No adaptor
+//print $reader.Out$
+
+print IOP
+print $reader.IOP$
+
+print IPP
+print $reader.IPP$
+
+print PixelSpacing
+print $reader.PixelSpacing$
+
+print InterSlice
+print $reader.InterSlice$
+
+
-- 
2.45.1