packages/gdcmvtk/bbs/appli/exampleGetXCoherentInfoGdcmReader.bbs

   1 category "example"
   2
   3 load gdcmvtk
   4 load std
   5 load wx
   6
   7
   8 //message all 9
   9
  10 // To choose the directory
  11 new DirectorySelector ds
  12 // To get the image names into a vector
  13 new FilesFromDirectory fd
  14    connect ds.Out fd.In
  15 // list of files as input
  16 #print "In $ds.Out$\n
  17 #print "Files found : $fd.Out$\n
  18 // user choosen directory as input
  19 new GetXCoherentInfoGdcmReader reader
  20 connect fd.Out  reader.In
  21 exec  reader
  22
  23 // No adaptor
  24 #print $reader.Out$
  25
  26 print IOP
  27 print $reader.IOP$
  28
  29 print IPP
  30 print $reader.IPP$
  31
  32 print PixelSpacing
  33 print $reader.PixelSpacing$
  34
  35
  36