r428: no message
[ctsim.git] / src / views.cpp
index 0b8290d0005465c89a5db873ae17384e6c544134..167c76e011ee0e04a6cb72d8cddb28b901bf493c 100644 (file)
@@ -9,7 +9,7 @@
 **  This is part of the CTSim program
 **  Copyright (C) 1983-2000 Kevin Rosenberg
 **
-**  $Id: views.cpp,v 1.68 2001/01/20 08:10:33 kevin Exp $
+**  $Id: views.cpp,v 1.69 2001/01/20 17:43:41 kevin Exp $
 **
 **  This program is free software; you can redistribute it and/or modify
 **  it under the terms of the GNU General Public License (version 2) as
@@ -76,6 +76,14 @@ ImageFileCanvas::ImageFileCanvas (ImageFileView* v, wxFrame *frame, const wxPoin
   m_yCursor = -1;
 }
 
+ImageFileCanvas::~ImageFileCanvas()
+{
+  if (m_pView) {
+    wxMenu* pMenu = m_pView->getFileMenu();
+    theApp->getDocManager()->FileHistoryRemoveMenu (pMenu);
+  }
+}
+
 void 
 ImageFileCanvas::OnDraw(wxDC& dc)
 {
@@ -222,7 +230,7 @@ EVT_MENU(IFMENU_PLOT_HISTOGRAM, ImageFileView::OnPlotHistogram)
 END_EVENT_TABLE()
 
 ImageFileView::ImageFileView(void) 
-: wxView(), m_canvas(NULL), m_frame(NULL), m_bMinSpecified(false), m_bMaxSpecified(false)
+: wxView(), m_canvas(NULL), m_frame(NULL), m_bMinSpecified(false), m_bMaxSpecified(false), m_pFileMenu(0)
 {
   m_iDefaultExportFormatID = ImageFile::FORMAT_PNG;
 }
@@ -449,10 +457,10 @@ ImageFileView::OnAdd (wxCommandEvent& event)
       ImageFileDocument* pRHSDoc = dialogGetCompare.getImageFileDocument();
       const ImageFile& rRHSIF = pRHSDoc->getImageFile();
       ImageFileDocument* pNewDoc = dynamic_cast<ImageFileDocument*>(theApp->getDocManager()->CreateDocument("untitled.if", wxDOC_SILENT));
-        if (! pNewDoc) {
-          sys_error (ERR_SEVERE, "Unable to create image file");
-          return;
-        }
+      if (! pNewDoc) {
+        sys_error (ERR_SEVERE, "Unable to create image file");
+        return;
+      }
       ImageFile& newImage = pNewDoc->getImageFile();  
       newImage.setArraySize (rIF.nx(), rIF.ny());
       rIF.addImages (rRHSIF, newImage);
@@ -489,10 +497,10 @@ ImageFileView::OnSubtract (wxCommandEvent& event)
       ImageFileDocument* pRHSDoc = dialogGetCompare.getImageFileDocument();
       const ImageFile& rRHSIF = pRHSDoc->getImageFile();
       ImageFileDocument* pNewDoc = dynamic_cast<ImageFileDocument*>(theApp->getDocManager()->CreateDocument("untitled.if", wxDOC_SILENT));
-        if (! pNewDoc) {
-          sys_error (ERR_SEVERE, "Unable to create image file");
-          return;
-        }
+      if (! pNewDoc) {
+        sys_error (ERR_SEVERE, "Unable to create image file");
+        return;
+      }
       ImageFile& newImage = pNewDoc->getImageFile();  
       newImage.setArraySize (rIF.nx(), rIF.ny());
       rIF.subtractImages (rRHSIF, newImage);
@@ -529,10 +537,10 @@ ImageFileView::OnMultiply (wxCommandEvent& event)
       ImageFileDocument* pRHSDoc = dialogGetCompare.getImageFileDocument();
       const ImageFile& rRHSIF = pRHSDoc->getImageFile();
       ImageFileDocument* pNewDoc = dynamic_cast<ImageFileDocument*>(theApp->getDocManager()->CreateDocument("untitled.if", wxDOC_SILENT));
-        if (! pNewDoc) {
-          sys_error (ERR_SEVERE, "Unable to create image file");
-          return;
-        }
+      if (! pNewDoc) {
+        sys_error (ERR_SEVERE, "Unable to create image file");
+        return;
+      }
       ImageFile& newImage = pNewDoc->getImageFile();  
       newImage.setArraySize (rIF.nx(), rIF.ny());
       rIF.multiplyImages (rRHSIF, newImage);
@@ -569,10 +577,10 @@ ImageFileView::OnDivide (wxCommandEvent& event)
       ImageFileDocument* pRHSDoc = dialogGetCompare.getImageFileDocument();
       const ImageFile& rRHSIF = pRHSDoc->getImageFile();
       ImageFileDocument* pNewDoc = dynamic_cast<ImageFileDocument*>(theApp->getDocManager()->CreateDocument("untitled.if", wxDOC_SILENT));
-        if (! pNewDoc) {
-          sys_error (ERR_SEVERE, "Unable to create image file");
-          return;
-        }
+      if (! pNewDoc) {
+        sys_error (ERR_SEVERE, "Unable to create image file");
+        return;
+      }
       ImageFile& newImage = pNewDoc->getImageFile();  
       newImage.setArraySize (rIF.nx(), rIF.ny());
       rIF.divideImages (rRHSIF, newImage);
@@ -735,11 +743,11 @@ ImageFileView::OnMagnitude (wxCommandEvent& event)
   if (rIF.isComplex()) {
     rIF.magnitude (rIF);
     rIF.labelAdd ("Magnitude of complex-image");
-  m_bMinSpecified = false;
-  m_bMaxSpecified = false;
-  if (theApp->getSetModifyNewDocs())
-    GetDocument()->Modify(TRUE);
-  GetDocument()->UpdateAllViews(this);
+    m_bMinSpecified = false;
+    m_bMaxSpecified = false;
+    if (theApp->getSetModifyNewDocs())
+      GetDocument()->Modify(TRUE);
+    GetDocument()->UpdateAllViews(this);
   }
 }
 
@@ -750,11 +758,11 @@ ImageFileView::OnPhase (wxCommandEvent& event)
   if (rIF.isComplex()) {
     rIF.phase (rIF);
     rIF.labelAdd ("Phase of complex-image");
-  m_bMinSpecified = false;
-  m_bMaxSpecified = false;
-  if (theApp->getSetModifyNewDocs())
-    GetDocument()->Modify(TRUE);
-  GetDocument()->UpdateAllViews(this);
+    m_bMinSpecified = false;
+    m_bMaxSpecified = false;
+    if (theApp->getSetModifyNewDocs())
+      GetDocument()->Modify(TRUE);
+    GetDocument()->UpdateAllViews(this);
   }
 }
 
@@ -784,24 +792,30 @@ ImageFileView::CreateChildFrame(wxDocument *doc, wxView *view)
   wxDocChildFrame* subframe = new wxDocChildFrame (doc, view, theApp->getMainFrame(), -1, "ImageFile Frame", wxPoint(-1, -1), wxSize(0, 0), wxDEFAULT_FRAME_STYLE);
 #endif
   theApp->setIconForFrame (subframe);
-
-  wxMenu *file_menu = new wxMenu;
   
-  file_menu->Append(MAINMENU_FILE_CREATE_PHANTOM, "Cr&eate Phantom...\tCtrl-P");
-  file_menu->Append(MAINMENU_FILE_CREATE_FILTER, "Create &Filter...\tCtrl-F");
-  file_menu->Append(wxID_OPEN, "&Open...\tCtrl-O");
-  file_menu->Append(wxID_SAVE, "&Save\tCtrl-S");
-  file_menu->Append(wxID_SAVEAS, "Save &As...");
-  file_menu->Append(wxID_CLOSE, "&Close\tCtrl-W");
+  wxMenu *m_pFileMenu = new wxMenu;
   
-  file_menu->AppendSeparator();
-  file_menu->Append(IFMENU_FILE_PROPERTIES, "P&roperties");
-  file_menu->Append(IFMENU_FILE_EXPORT, "&Export...");
+  m_pFileMenu->Append(MAINMENU_FILE_CREATE_PHANTOM, "Cr&eate Phantom...\tCtrl-P");
+  m_pFileMenu->Append(MAINMENU_FILE_CREATE_FILTER, "Create &Filter...\tCtrl-F");
+  m_pFileMenu->Append(wxID_OPEN, "&Open...\tCtrl-O");
+  m_pFileMenu->Append(wxID_SAVE, "&Save\tCtrl-S");
+  m_pFileMenu->Append(wxID_SAVEAS, "Save &As...");
+  m_pFileMenu->Append(wxID_CLOSE, "&Close\tCtrl-W");
   
-  file_menu->AppendSeparator();
-  file_menu->Append(wxID_PRINT, "&Print...");
-  file_menu->Append(wxID_PRINT_SETUP, "Print &Setup...");
-  file_menu->Append(wxID_PREVIEW, "Print Pre&view");
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(IFMENU_FILE_PROPERTIES, "P&roperties");
+  m_pFileMenu->Append(IFMENU_FILE_EXPORT, "&Export...");
+  
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(wxID_PRINT, "&Print...");
+  m_pFileMenu->Append(wxID_PRINT_SETUP, "Print &Setup...");
+  m_pFileMenu->Append(wxID_PREVIEW, "Print Pre&view");
+#ifdef CTSIM_MDI
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(MAINMENU_FILE_EXIT, "E&xit");
+#endif
+  theApp->getDocManager()->FileHistoryAddFilesToMenu(m_pFileMenu);
+  theApp->getDocManager()->FileHistoryUseMenu(m_pFileMenu);
   
   wxMenu *view_menu = new wxMenu;
   view_menu->Append(IFMENU_VIEW_SCALE_MINMAX, "Display Scale S&et...\tCtrl-E");
@@ -840,7 +854,7 @@ ImageFileView::CreateChildFrame(wxDocument *doc, wxView *view)
   image_menu->Append (IFMENU_IMAGE_DIVIDE, "&Divide...");
   image_menu->AppendSeparator();
   image_menu->Append (IFMENU_IMAGE_SCALESIZE, "S&cale Size...");
-
+  
   wxMenu *analyze_menu = new wxMenu;
   analyze_menu->Append (IFMENU_PLOT_ROW, "Plot &Row");
   analyze_menu->Append (IFMENU_PLOT_COL, "Plot &Column");
@@ -860,13 +874,13 @@ ImageFileView::CreateChildFrame(wxDocument *doc, wxView *view)
   
   wxMenuBar *menu_bar = new wxMenuBar;
   
-  menu_bar->Append(file_menu, "&File");
+  menu_bar->Append(m_pFileMenu, "&File");
   menu_bar->Append(view_menu, "&View");
   menu_bar->Append(image_menu, "&Image");
   menu_bar->Append(filter_menu, "Fi&lter");
   menu_bar->Append(analyze_menu, "&Analyze");
   menu_bar->Append(help_menu, "&Help");
-
+  
   subframe->SetMenuBar(menu_bar);
   
   subframe->Centre(wxBOTH);
@@ -884,7 +898,7 @@ ImageFileView::CreateChildFrame(wxDocument *doc, wxView *view)
   accelEntries[9].Set (wxACCEL_CTRL, static_cast<int>('E'), IFMENU_VIEW_SCALE_MINMAX);
   wxAcceleratorTable accelTable (10, accelEntries);
   subframe->SetAcceleratorTable (accelTable);
-
+  
   return subframe;
 }
 
@@ -921,7 +935,7 @@ ImageFileView::OnDraw (wxDC* dc)
   wxSize sizeBest = m_canvas->GetBestSize();
   if (sizeWindow.x > sizeBest.x || sizeWindow.y > sizeBest.y)
     m_frame->SetClientSize (sizeBest);
-
+  
   if (m_bitmap.Ok())
     dc->DrawBitmap(m_bitmap, 0, 0, false);
   
@@ -964,7 +978,6 @@ ImageFileView::OnUpdate (wxView *WXUNUSED(sender), wxObject *WXUNUSED(hint) )
     delete imageData;
     int xSize = nx;
     int ySize = ny;
-    xSize = clamp (xSize, 0, 800);
     ySize = clamp (ySize, 0, 800);
     m_frame->SetClientSize (xSize, ySize);
     m_canvas->SetScrollbars(20, 20, nx/20, ny/20);
@@ -981,9 +994,9 @@ ImageFileView::OnClose (bool deleteWindow)
   if (!GetDocument()->Close())
     return false;
   
-  m_canvas->Clear();
-  //m_canvas->m_pView = NULL;
-  m_canvas = NULL;
+//  m_canvas->Clear();
+//  m_canvas->setView(NULL);
+//  m_canvas = NULL;
   wxString s(theApp->GetAppName());
   if (m_frame)
     m_frame->SetTitle(s);
@@ -1014,12 +1027,12 @@ ImageFileView::OnExport (wxCommandEvent& event)
       if (! m_bMaxSpecified)
         m_dMaxPixel = max;
     }
-
+    
     DialogExportParameters dialogExport (getFrameForChild(), m_iDefaultExportFormatID);
     if (dialogExport.ShowModal() == wxID_OK) {
       wxString strFormatName (dialogExport.getFormatName ());
       m_iDefaultExportFormatID = ImageFile::convertFormatNameToID (strFormatName.c_str());
-
+      
       wxString strExt;
       wxString strWildcard;
       if (m_iDefaultExportFormatID == ImageFile::FORMAT_PGM || m_iDefaultExportFormatID == ImageFile::FORMAT_PGMASCII) {
@@ -1032,7 +1045,7 @@ ImageFileView::OnExport (wxCommandEvent& event)
         strWildcard = "PNG Files (*.png)|*.png";
       }
 #endif
-
+      
       const wxString& strFilename = wxFileSelector (wxString("Export Filename"), wxString(""), 
         wxString(""), strExt, strWildcard, wxOVERWRITE_PROMPT | wxHIDE_READONLY | wxSAVE);
       if (strFilename) {
@@ -1049,7 +1062,7 @@ ImageFileView::OnScaleSize (wxCommandEvent& event)
   ImageFile& rIF = GetDocument()->getImageFile();
   unsigned int iOldNX = rIF.nx();
   unsigned int iOldNY = rIF.ny();
-
+  
   DialogGetXYSize dialogGetXYSize (getFrameForChild(), "Set New X & Y Dimensions", iOldNX, iOldNY);
   if (dialogGetXYSize.ShowModal() == wxID_OK) {
     unsigned int iNewNX = dialogGetXYSize.getXSize();
@@ -1260,7 +1273,7 @@ ImageFileView::OnPlotFFTRow (wxCommandEvent& event)
   
   if (v != NULL && yCursor < ny) {
     fftw_complex* pcIn = new fftw_complex [nx];
-
+    
     int i;
     for (i = 0; i < nx; i++) {
       pcIn[i].re = v[i][yCursor];
@@ -1269,11 +1282,11 @@ ImageFileView::OnPlotFFTRow (wxCommandEvent& event)
       else
         pcIn[i].im = 0;
     }
-
+    
     fftw_plan plan = fftw_create_plan (nx, FFTW_FORWARD, FFTW_IN_PLACE);
     fftw_one (plan, pcIn, NULL);
     fftw_destroy_plan (plan);
-
+    
     double* pX = new double [nx];
     double* pYReal = new double [nx];
     double* pYImag = new double [nx];
@@ -1287,7 +1300,7 @@ ImageFileView::OnPlotFFTRow (wxCommandEvent& event)
     Fourier::shuffleFourierToNaturalOrder (pYReal, nx);
     Fourier::shuffleFourierToNaturalOrder (pYImag, nx);
     Fourier::shuffleFourierToNaturalOrder (pYMag, nx);
-
+    
     PlotFileDocument* pPlotDoc = dynamic_cast<PlotFileDocument*>(theApp->getDocManager()->CreateDocument("untitled.plt", wxDOC_SILENT));
     if (! pPlotDoc) {
       sys_error (ERR_SEVERE, "Internal error: unable to create Plot file");
@@ -1303,14 +1316,14 @@ ImageFileView::OnPlotFFTRow (wxCommandEvent& event)
       rPlotFile.addEzsetCommand ("lxfrac 0");
       rPlotFile.addEzsetCommand ("curve 1");
       rPlotFile.addEzsetCommand ("color 1");
-       rPlotFile.addEzsetCommand ("dash 1");
-        rPlotFile.addEzsetCommand ("curve 2");
-        rPlotFile.addEzsetCommand ("color 4");
-        rPlotFile.addEzsetCommand ("dash 3");
-        rPlotFile.addEzsetCommand ("curve 3");
-        rPlotFile.addEzsetCommand ("color 0");
-        rPlotFile.addEzsetCommand ("solid");
-       rPlotFile.addEzsetCommand ("box");
+      rPlotFile.addEzsetCommand ("dash 1");
+      rPlotFile.addEzsetCommand ("curve 2");
+      rPlotFile.addEzsetCommand ("color 4");
+      rPlotFile.addEzsetCommand ("dash 3");
+      rPlotFile.addEzsetCommand ("curve 3");
+      rPlotFile.addEzsetCommand ("color 0");
+      rPlotFile.addEzsetCommand ("solid");
+      rPlotFile.addEzsetCommand ("box");
       rPlotFile.addEzsetCommand ("grid");
       rPlotFile.setCurveSize (4, nx);
       rPlotFile.addColumn (0, pX);
@@ -1328,7 +1341,7 @@ ImageFileView::OnPlotFFTRow (wxCommandEvent& event)
     delete pYImag;
     delete pYMag;
     delete [] pcIn;
-
+    
     if (theApp->getSetModifyNewDocs())
       pPlotDoc->Modify(true);
     pPlotDoc->UpdateAllViews();
@@ -1353,28 +1366,28 @@ ImageFileView::OnPlotFFTCol (wxCommandEvent& event)
   if (v != NULL && xCursor < nx) {
     fftw_complex* pcIn = new fftw_complex [ny];
     double *pdTemp = new double [ny];
-
+    
     int i;
     for (i = 0; i < ny; i++)
       pdTemp[i] = v[xCursor][i];
     Fourier::shuffleNaturalToFourierOrder (pdTemp, ny);
     for (i = 0; i < ny; i++) 
       pcIn[i].re = pdTemp[i];
-
+    
     for (i = 0; i < ny; i++) {
       if (rIF.isComplex())
         pdTemp[i] = vImag[xCursor][i];
       else
-      pdTemp[i] = 0;
+        pdTemp[i] = 0;
     }
     Fourier::shuffleNaturalToFourierOrder (pdTemp, ny);
     for (i = 0; i < ny; i++)
       pcIn[i].im = pdTemp[i];
-
+    
     fftw_plan plan = fftw_create_plan (ny, FFTW_BACKWARD, FFTW_IN_PLACE);
     fftw_one (plan, pcIn, NULL);
     fftw_destroy_plan (plan);
-
+    
     double* pX = new double [ny];
     double* pYReal = new double [ny];
     double* pYImag = new double [ny];
@@ -1385,7 +1398,7 @@ ImageFileView::OnPlotFFTCol (wxCommandEvent& event)
       pYImag[i] = pcIn[i].im;
       pYMag[i] = ::sqrt (pcIn[i].re * pcIn[i].re + pcIn[i].im * pcIn[i].im);
     }
-
+    
     PlotFileDocument* pPlotDoc = dynamic_cast<PlotFileDocument*>(theApp->getDocManager()->CreateDocument("untitled.plt", wxDOC_SILENT));
     if (! pPlotDoc) {
       sys_error (ERR_SEVERE, "Internal error: unable to create Plot file");
@@ -1401,14 +1414,14 @@ ImageFileView::OnPlotFFTCol (wxCommandEvent& event)
       rPlotFile.addEzsetCommand ("lxfrac 0");
       rPlotFile.addEzsetCommand ("curve 1");
       rPlotFile.addEzsetCommand ("color 1");
-       rPlotFile.addEzsetCommand ("dash 1");
-        rPlotFile.addEzsetCommand ("curve 2");
-        rPlotFile.addEzsetCommand ("color 4");
-        rPlotFile.addEzsetCommand ("dash 3");
-        rPlotFile.addEzsetCommand ("curve 3");
-        rPlotFile.addEzsetCommand ("color 0");
-        rPlotFile.addEzsetCommand ("solid");
-       rPlotFile.addEzsetCommand ("box");
+      rPlotFile.addEzsetCommand ("dash 1");
+      rPlotFile.addEzsetCommand ("curve 2");
+      rPlotFile.addEzsetCommand ("color 4");
+      rPlotFile.addEzsetCommand ("dash 3");
+      rPlotFile.addEzsetCommand ("curve 3");
+      rPlotFile.addEzsetCommand ("color 0");
+      rPlotFile.addEzsetCommand ("solid");
+      rPlotFile.addEzsetCommand ("box");
       rPlotFile.addEzsetCommand ("grid");
       rPlotFile.setCurveSize (4, ny);
       rPlotFile.addColumn (0, pX);
@@ -1427,7 +1440,7 @@ ImageFileView::OnPlotFFTCol (wxCommandEvent& event)
     delete pYMag;
     delete pdTemp;
     delete [] pcIn;
-
+    
     if (theApp->getSetModifyNewDocs())
       pPlotDoc->Modify(true);
     pPlotDoc->UpdateAllViews();
@@ -1495,7 +1508,7 @@ ImageFileView::OnCompareCol (wxCommandEvent& event)
         rPlotFile.addColumn (0, pX);
         rPlotFile.addColumn (1, pY1);
         rPlotFile.addColumn (2, pY2);
-
+        
         unsigned int iL;
         for (iL = 0; iL < rIF.nLabels(); iL++) {
           std::string s = GetDocument()->GetFirstView()->GetFrame()->GetTitle().c_str();
@@ -1630,13 +1643,13 @@ ImageFileView::OnPlotHistogram (wxCommandEvent& event)
       sys_error (ERR_SEVERE, "Internal error: unable to create Plot file");
       return;
     }
-
+    
     double* pX = new double [NUMBER_HISTOGRAM_BINS];
     double* pY = new double [NUMBER_HISTOGRAM_BINS];
     double dMin, dMax;
     rIF.getMinMax (dMin, dMax);
     double dBinWidth = (dMax - dMin) / NUMBER_HISTOGRAM_BINS;
-
+    
     for (int i = 0; i < NUMBER_HISTOGRAM_BINS; i++) {
       pX[i] = dMin + (i + 0.5) * dBinWidth;
       pY[i] = 0;
@@ -1647,34 +1660,34 @@ ImageFileView::OnPlotHistogram (wxCommandEvent& event)
         if (iBin >= 0 && iBin < NUMBER_HISTOGRAM_BINS)
           pY[iBin] += 1;
       }
-
-    PlotFile& rPlotFile = pPlotDoc->getPlotFile();
-    std::ostringstream os;
-    os << "Histogram";
-    std::string title("title ");
-    title += os.str();
-    rPlotFile.addEzsetCommand (title.c_str());
-    rPlotFile.addEzsetCommand ("xlabel Pixel Value");
-    rPlotFile.addEzsetCommand ("ylabel Count");
-    rPlotFile.addEzsetCommand ("box");
-    rPlotFile.addEzsetCommand ("grid");
-    rPlotFile.setCurveSize (2, NUMBER_HISTOGRAM_BINS);
-    rPlotFile.addColumn (0, pX);
-    rPlotFile.addColumn (1, pY);
-    for (unsigned int iL = 0; iL < rIF.nLabels(); iL++) {
-      std::string s = GetDocument()->GetFirstView()->GetFrame()->GetTitle().c_str();
-      s += ": ";
-      s += rIF.labelGet(iL).getLabelString();
-      rPlotFile.addDescription (s.c_str());
-    }
-    os << " Plot of " << GetDocument()->GetFirstView()->GetFrame()->GetTitle().c_str();
-    *theApp->getLog() << os.str().c_str() << "\n";
-    rPlotFile.addDescription (os.str().c_str());
-    delete pX;
-    delete pY;
-    if (theApp->getSetModifyNewDocs())
-      pPlotDoc->Modify(true);
-    pPlotDoc->UpdateAllViews();
+      
+      PlotFile& rPlotFile = pPlotDoc->getPlotFile();
+      std::ostringstream os;
+      os << "Histogram";
+      std::string title("title ");
+      title += os.str();
+      rPlotFile.addEzsetCommand (title.c_str());
+      rPlotFile.addEzsetCommand ("xlabel Pixel Value");
+      rPlotFile.addEzsetCommand ("ylabel Count");
+      rPlotFile.addEzsetCommand ("box");
+      rPlotFile.addEzsetCommand ("grid");
+      rPlotFile.setCurveSize (2, NUMBER_HISTOGRAM_BINS);
+      rPlotFile.addColumn (0, pX);
+      rPlotFile.addColumn (1, pY);
+      for (unsigned int iL = 0; iL < rIF.nLabels(); iL++) {
+        std::string s = GetDocument()->GetFirstView()->GetFrame()->GetTitle().c_str();
+        s += ": ";
+        s += rIF.labelGet(iL).getLabelString();
+        rPlotFile.addDescription (s.c_str());
+      }
+      os << " Plot of " << GetDocument()->GetFirstView()->GetFrame()->GetTitle().c_str();
+      *theApp->getLog() << os.str().c_str() << "\n";
+      rPlotFile.addDescription (os.str().c_str());
+      delete pX;
+      delete pY;
+      if (theApp->getSetModifyNewDocs())
+        pPlotDoc->Modify(true);
+      pPlotDoc->UpdateAllViews();
   }
 }
 
@@ -1687,6 +1700,14 @@ PhantomCanvas::PhantomCanvas (PhantomView* v, wxFrame *frame, const wxPoint& pos
   m_pView = v;
 }
 
+PhantomCanvas::~PhantomCanvas ()
+{
+  if (m_pView) {
+    wxMenu* pMenu = m_pView->getFileMenu();
+    theApp->getDocManager()->FileHistoryRemoveMenu (pMenu);
+  }
+}
+
 void 
 PhantomCanvas::OnDraw (wxDC& dc)
 {
@@ -1706,7 +1727,7 @@ EVT_MENU(PHMMENU_PROCESS_PROJECTIONS, PhantomView::OnProjections)
 END_EVENT_TABLE()
 
 PhantomView::PhantomView(void) 
-: wxView(), m_canvas(NULL), m_frame(NULL)
+: wxView(), m_canvas(NULL), m_frame(NULL), m_pFileMenu(0)
 {
   m_iDefaultNDet = 367;
   m_iDefaultNView = 320;
@@ -1716,13 +1737,13 @@ PhantomView::PhantomView(void)
   m_dDefaultFieldOfView = 1;
   m_iDefaultGeometry = Scanner::GEOMETRY_PARALLEL;
   m_iDefaultTrace = Trace::TRACE_NONE;
-
+  
   m_iDefaultRasterNX = 256;
   m_iDefaultRasterNY = 256;
   m_iDefaultRasterNSamples = 2;
 }
 
-PhantomView::~PhantomView(void)
+PhantomView::~PhantomView()
 {
 }
 
@@ -1905,22 +1926,28 @@ PhantomView::CreateChildFrame(wxDocument *doc, wxView *view)
   wxDocChildFrame *subframe = new wxDocChildFrame (doc, view, theApp->getMainFrame(), -1, "Phantom Frame", wxPoint(10, 10), wxSize(256, 256), wxDEFAULT_FRAME_STYLE);
 #endif
   theApp->setIconForFrame (subframe);
-
-  wxMenu *file_menu = new wxMenu;
   
-  file_menu->Append(MAINMENU_FILE_CREATE_PHANTOM, "Cr&eate Phantom...\tCtrl-P");
-  file_menu->Append(MAINMENU_FILE_CREATE_FILTER, "Create &Filter...\tCtrl-F");
-  file_menu->Append(wxID_OPEN, "&Open...\tCtrl-O");
-  file_menu->Append(wxID_SAVEAS, "Save &As...");
-  file_menu->Append(wxID_CLOSE, "&Close");
+  wxMenu *m_pFileMenu = new wxMenu;
   
-  file_menu->AppendSeparator();
-  file_menu->Append(PHMMENU_FILE_PROPERTIES, "P&roperties");
+  m_pFileMenu->Append(MAINMENU_FILE_CREATE_PHANTOM, "Cr&eate Phantom...\tCtrl-P");
+  m_pFileMenu->Append(MAINMENU_FILE_CREATE_FILTER, "Create &Filter...\tCtrl-F");
+  m_pFileMenu->Append(wxID_OPEN, "&Open...\tCtrl-O");
+  m_pFileMenu->Append(wxID_SAVEAS, "Save &As...");
+  m_pFileMenu->Append(wxID_CLOSE, "&Close");
   
-  file_menu->AppendSeparator();
-  file_menu->Append(wxID_PRINT, "&Print...");
-  file_menu->Append(wxID_PRINT_SETUP, "Print &Setup...");
-  file_menu->Append(wxID_PREVIEW, "Print Pre&view");
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(PHMMENU_FILE_PROPERTIES, "P&roperties");
+  
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(wxID_PRINT, "&Print...");
+  m_pFileMenu->Append(wxID_PRINT_SETUP, "Print &Setup...");
+  m_pFileMenu->Append(wxID_PREVIEW, "Print Pre&view");
+#ifdef CTSIM_MDI
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(MAINMENU_FILE_EXIT, "E&xit");
+#endif
+  theApp->getDocManager()->FileHistoryAddFilesToMenu(m_pFileMenu);
+  theApp->getDocManager()->FileHistoryUseMenu(m_pFileMenu);
   
   wxMenu *process_menu = new wxMenu;
   process_menu->Append(PHMMENU_PROCESS_RASTERIZE, "&Rasterize...\tCtrl-R");
@@ -1933,13 +1960,13 @@ PhantomView::CreateChildFrame(wxDocument *doc, wxView *view)
   
   wxMenuBar *menu_bar = new wxMenuBar;
   
-  menu_bar->Append(file_menu, "&File");
+  menu_bar->Append(m_pFileMenu, "&File");
   menu_bar->Append(process_menu, "&Process");
   menu_bar->Append(help_menu, "&Help");
   
   subframe->SetMenuBar(menu_bar);
   subframe->Centre(wxBOTH);
-
+  
   wxAcceleratorEntry accelEntries[8];
   accelEntries[0].Set (wxACCEL_CTRL, static_cast<int>('O'), wxID_OPEN);
   accelEntries[1].Set (wxACCEL_CTRL, static_cast<int>('S'), wxID_SAVE);
@@ -1951,7 +1978,7 @@ PhantomView::CreateChildFrame(wxDocument *doc, wxView *view)
   accelEntries[7].Set (wxACCEL_CTRL, static_cast<int>('R'), PHMMENU_PROCESS_RASTERIZE);
   wxAcceleratorTable accelTable (8, accelEntries);
   subframe->SetAcceleratorTable (accelTable);
-
+  
   return subframe;
 }
 
@@ -1992,9 +2019,9 @@ PhantomView::OnClose (bool deleteWindow)
   if (!GetDocument()->Close())
     return false;
   
-  m_canvas->Clear();
-  //m_canvas->m_pView = NULL;
-  m_canvas = NULL;
+//  m_canvas->Clear();
+//  m_canvas->setView(NULL);
+//  m_canvas = NULL;
   wxString s(wxTheApp->GetAppName());
   if (m_frame)
     m_frame->SetTitle(s);
@@ -2004,7 +2031,7 @@ PhantomView::OnClose (bool deleteWindow)
   
   if (deleteWindow)
     delete m_frame;
-
+  
   return true;
 }
 
@@ -2028,6 +2055,14 @@ ProjectionFileCanvas::ProjectionFileCanvas (ProjectionFileView* v, wxFrame *fram
   m_pView = v;
 }
 
+ProjectionFileCanvas::~ProjectionFileCanvas ()
+{
+  if (m_pView) {
+    wxMenu* pMenu = m_pView->getFileMenu();
+    theApp->getDocManager()->FileHistoryRemoveMenu (pMenu);
+  }
+}
+
 void 
 ProjectionFileCanvas::OnDraw(wxDC& dc)
 {
@@ -2043,7 +2078,7 @@ ProjectionFileCanvas::GetBestSize () const
     Projections& rProj = m_pView->GetDocument()->getProjections();
     best.Set (rProj.nDet(), rProj.nView());
   }
-
+  
   return best;
 }
 
@@ -2060,7 +2095,7 @@ EVT_MENU(PJMENU_CONVERT_FFT_POLAR, ProjectionFileView::OnConvertFFTPolar)
 END_EVENT_TABLE()
 
 ProjectionFileView::ProjectionFileView(void) 
-: wxView(), m_canvas(NULL), m_frame(NULL)
+: wxView(), m_canvas(NULL), m_frame(NULL), m_pFileMenu(0)
 {
   m_iDefaultNX = 256;
   m_iDefaultNY = 256;
@@ -2078,7 +2113,7 @@ ProjectionFileView::ProjectionFileView(void)
   m_iDefaultInterpolation = Backprojector::INTERP_LINEAR;
   m_iDefaultInterpParam = 1;
   m_iDefaultTrace = Trace::TRACE_NONE;
-
+  
   m_iDefaultPolarNX = 256;
   m_iDefaultPolarNY = 256;
   m_iDefaultPolarInterpolation = Projections::POLAR_INTERP_BILINEAR;
@@ -2165,7 +2200,7 @@ ProjectionFileView::OnConvertFFTPolar (wxCommandEvent& event)
       pPolarDoc->Modify(true);
     pPolarDoc->UpdateAllViews();
     pPolarDoc->GetFirstView()->OnUpdate (this, NULL);
-  }}
+}}
 
 void
 ProjectionFileView::OnReconstructFourier (wxCommandEvent& event)
@@ -2207,7 +2242,7 @@ ProjectionFileView::OnReconstructFBP (wxCommandEvent& event)
       imageFile.setArraySize (m_iDefaultNX, m_iDefaultNY);
       
       Reconstructor* pReconstruct = new Reconstructor (rProj, imageFile, optFilterName.c_str(), m_dDefaultFilterParam, optFilterMethodName.c_str(), m_iDefaultZeropad, optFilterGenerationName.c_str(), optInterpName.c_str(), m_iDefaultInterpParam, optBackprojectName.c_str(), m_iDefaultTrace);
-
+      
       Timer timerRecon;
       if (m_iDefaultTrace > Trace::TRACE_CONSOLE) {
         ReconstructDialog* pDlgReconstruct = new ReconstructDialog (*pReconstruct, rProj, imageFile, m_iDefaultTrace, getFrameForChild());
@@ -2283,23 +2318,27 @@ ProjectionFileView::CreateChildFrame(wxDocument *doc, wxView *view)
   wxDocChildFrame *subframe = new wxDocChildFrame (doc, view, theApp->getMainFrame(), -1, "Projection Frame", wxPoint(10, 10), wxSize(0, 0), wxDEFAULT_FRAME_STYLE);
 #endif
   theApp->setIconForFrame (subframe);
-
-  wxMenu *file_menu = new wxMenu;
   
-  file_menu->Append(MAINMENU_FILE_CREATE_PHANTOM, "Cr&eate Phantom...\tCtrl-P");
-  file_menu->Append(MAINMENU_FILE_CREATE_FILTER, "Create &Filter...\tCtrl-F");
-  file_menu->Append(wxID_OPEN, "&Open...\tCtrl-O");
-  file_menu->Append(wxID_SAVE, "&Save\tCtrl-S");
-  file_menu->Append(wxID_SAVEAS, "Save &As...");
-  file_menu->Append(wxID_CLOSE, "&Close\tCtrl-W");
+  wxMenu *m_pFileMenu = new wxMenu;
   
-  file_menu->AppendSeparator();
-  file_menu->Append(PJMENU_FILE_PROPERTIES, "P&roperties");
+  m_pFileMenu->Append(MAINMENU_FILE_CREATE_PHANTOM, "Cr&eate Phantom...\tCtrl-P");
+  m_pFileMenu->Append(MAINMENU_FILE_CREATE_FILTER, "Create &Filter...\tCtrl-F");
+  m_pFileMenu->Append(wxID_OPEN, "&Open...\tCtrl-O");
+  m_pFileMenu->Append(wxID_SAVE, "&Save\tCtrl-S");
+  m_pFileMenu->Append(wxID_SAVEAS, "Save &As...");
+  m_pFileMenu->Append(wxID_CLOSE, "&Close\tCtrl-W");
   
-  file_menu->AppendSeparator();
-  file_menu->Append(wxID_PRINT, "&Print...");
-  file_menu->Append(wxID_PRINT_SETUP, "Print &Setup...");
-  file_menu->Append(wxID_PREVIEW, "Print Pre&view");
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(PJMENU_FILE_PROPERTIES, "P&roperties");
+  
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(wxID_PRINT, "&Print...");
+  m_pFileMenu->Append(wxID_PRINT_SETUP, "Print &Setup...");
+  m_pFileMenu->Append(wxID_PREVIEW, "Print Pre&view");
+#ifdef CTSIM_MDI
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(MAINMENU_FILE_EXIT, "E&xit");
+#endif
   
   wxMenu *convert_menu = new wxMenu;
   convert_menu->Append (PJMENU_CONVERT_POLAR, "&Polar Image...\tCtrl-L");
@@ -2308,7 +2347,7 @@ ProjectionFileView::CreateChildFrame(wxDocument *doc, wxView *view)
   wxMenu *reconstruct_menu = new wxMenu;
   reconstruct_menu->Append (PJMENU_RECONSTRUCT_FBP, "&Filtered Backprojection...\tCtrl-R");
   reconstruct_menu->Append (PJMENU_RECONSTRUCT_FOURIER, "&Fourier...\tCtrl-E");
-
+  
   wxMenu *help_menu = new wxMenu;
   help_menu->Append(MAINMENU_HELP_CONTENTS, "&Contents\tF1");
   help_menu->Append(MAINMENU_HELP_TOPICS, "&Topics\tCtrl-H");
@@ -2316,14 +2355,14 @@ ProjectionFileView::CreateChildFrame(wxDocument *doc, wxView *view)
   
   wxMenuBar *menu_bar = new wxMenuBar;
   
-  menu_bar->Append (file_menu, "&File");
+  menu_bar->Append (m_pFileMenu, "&File");
   menu_bar->Append (convert_menu, "&Convert");
   menu_bar->Append (reconstruct_menu, "&Reconstruct");
   menu_bar->Append (help_menu, "&Help");
   
   subframe->SetMenuBar(menu_bar);  
   subframe->Centre(wxBOTH);
-
+  
   wxAcceleratorEntry accelEntries[11];
   accelEntries[0].Set (wxACCEL_CTRL, static_cast<int>('O'), wxID_OPEN);
   accelEntries[1].Set (wxACCEL_CTRL, static_cast<int>('S'), wxID_SAVE);
@@ -2371,10 +2410,10 @@ ProjectionFileView::OnDraw (wxDC* dc)
 {
   wxSize clientSize = m_frame->GetClientSize();
   wxSize bestSize = m_canvas->GetBestSize();
-
+  
   if (clientSize.x > bestSize.x || clientSize.y > bestSize.y)
     m_frame->SetClientSize (bestSize);
-
+  
   if (m_bitmap.Ok())
     dc->DrawBitmap (m_bitmap, 0, 0, false);
 }
@@ -2435,9 +2474,9 @@ ProjectionFileView::OnClose (bool deleteWindow)
   if (!GetDocument()->Close())
     return false;
   
-  m_canvas->Clear();
-  // m_canvas->m_pView = NULL;
-  m_canvas = NULL;
+//  m_canvas->Clear();
+//  m_canvas->setView(NULL);
+//  m_canvas = NULL;
   wxString s(wxTheApp->GetAppName());
   if (m_frame)
     m_frame->SetTitle(s);
@@ -2461,6 +2500,14 @@ PlotFileCanvas::PlotFileCanvas (PlotFileView* v, wxFrame *frame, const wxPoint&
   m_pView = v;
 }
 
+PlotFileCanvas::~PlotFileCanvas ()
+{
+  if (m_pView) {
+    wxMenu* pMenu = m_pView->getFileMenu();
+    theApp->getDocManager()->FileHistoryRemoveMenu (pMenu);
+  }
+}
+
 void 
 PlotFileCanvas::OnDraw(wxDC& dc)
 {
@@ -2481,7 +2528,7 @@ EVT_MENU(PLOTMENU_VIEW_SCALE_FULL, PlotFileView::OnScaleFull)
 END_EVENT_TABLE()
 
 PlotFileView::PlotFileView(void) 
-: wxView(), m_canvas(NULL), m_frame(NULL), m_pEZPlot(NULL)
+: wxView(), m_canvas(NULL), m_frame(NULL), m_pEZPlot(NULL), m_pFileMenu(0)
 {
   m_bMinSpecified = false;
   m_bMaxSpecified = false;
@@ -2533,7 +2580,7 @@ PlotFileView::OnScaleMinMax (wxCommandEvent& event)
   const PlotFile& rPlotFile = GetDocument()->getPlotFile();
   double min;
   double max;
-
+  
   if (! m_bMinSpecified || ! m_bMaxSpecified) {
     if (! rPlotFile.getMinMax (1, min, max)) {
       *theApp->getLog() << "Error: unable to find Min/Max\n";
@@ -2592,23 +2639,29 @@ PlotFileView::CreateChildFrame(wxDocument *doc, wxView *view)
   wxDocChildFrame *subframe = new wxDocChildFrame(doc, view, theApp->getMainFrame(), -1, "Plot Frame", wxPoint(10, 10), wxSize(500, 300), wxDEFAULT_FRAME_STYLE);
 #endif
   theApp->setIconForFrame (subframe);
-
-  wxMenu *file_menu = new wxMenu;
   
-  file_menu->Append(MAINMENU_FILE_CREATE_PHANTOM, "Cr&eate Phantom...\tCtrl-P");
-  file_menu->Append(MAINMENU_FILE_CREATE_FILTER, "Create &Filter...\tCtrl-F");
-  file_menu->Append(wxID_OPEN, "&Open...\tCtrl-O");
-  file_menu->Append(wxID_SAVE, "&Save\tCtrl-S");
-  file_menu->Append(wxID_SAVEAS, "Save &As...");
-  file_menu->Append(wxID_CLOSE, "&Close\tCtrl-W");
+  wxMenu *m_pFileMenu = new wxMenu;
   
-  file_menu->AppendSeparator();
-  file_menu->Append(PJMENU_FILE_PROPERTIES, "P&roperties");
+  m_pFileMenu->Append(MAINMENU_FILE_CREATE_PHANTOM, "Cr&eate Phantom...\tCtrl-P");
+  m_pFileMenu->Append(MAINMENU_FILE_CREATE_FILTER, "Create &Filter...\tCtrl-F");
+  m_pFileMenu->Append(wxID_OPEN, "&Open...\tCtrl-O");
+  m_pFileMenu->Append(wxID_SAVE, "&Save\tCtrl-S");
+  m_pFileMenu->Append(wxID_SAVEAS, "Save &As...");
+  m_pFileMenu->Append(wxID_CLOSE, "&Close\tCtrl-W");
   
-  file_menu->AppendSeparator();
-  file_menu->Append(wxID_PRINT, "&Print...");
-  file_menu->Append(wxID_PRINT_SETUP, "Print &Setup...");
-  file_menu->Append(wxID_PREVIEW, "Print Pre&view");
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(PJMENU_FILE_PROPERTIES, "P&roperties");
+  
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(wxID_PRINT, "&Print...");
+  m_pFileMenu->Append(wxID_PRINT_SETUP, "Print &Setup...");
+  m_pFileMenu->Append(wxID_PREVIEW, "Print Pre&view");
+#ifdef CTSIM_MDI
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(MAINMENU_FILE_EXIT, "E&xit");
+#endif
+  theApp->getDocManager()->FileHistoryAddFilesToMenu(m_pFileMenu);
+  theApp->getDocManager()->FileHistoryUseMenu(m_pFileMenu);
   
   wxMenu *view_menu = new wxMenu;
   view_menu->Append(PLOTMENU_VIEW_SCALE_MINMAX, "Display Scale &Set...\tCtrl-E");
@@ -2622,13 +2675,13 @@ PlotFileView::CreateChildFrame(wxDocument *doc, wxView *view)
   
   wxMenuBar *menu_bar = new wxMenuBar;
   
-  menu_bar->Append(file_menu, "&File");
+  menu_bar->Append(m_pFileMenu, "&File");
   menu_bar->Append(view_menu, "&View");
   menu_bar->Append(help_menu, "&Help");
   
   subframe->SetMenuBar(menu_bar);
   subframe->Centre(wxBOTH);
-
+  
   wxAcceleratorEntry accelEntries[10];
   accelEntries[0].Set (wxACCEL_CTRL, static_cast<int>('O'), wxID_OPEN);
   accelEntries[1].Set (wxACCEL_CTRL, static_cast<int>('S'), wxID_SAVE);
@@ -2670,7 +2723,7 @@ PlotFileView::OnCreate (wxDocument *doc, long WXUNUSED(flags) )
   
   m_frame->Show(true);
   Activate(true);
-   
+  
   return true;
 }
 
@@ -2695,48 +2748,48 @@ PlotFileView::OnDraw (wxDC* dc)
 void 
 PlotFileView::OnUpdate (wxView *WXUNUSED(sender), wxObject *WXUNUSED(hint) )
 {
-    const PlotFile& rPlotFile = GetDocument()->getPlotFile();
-    const int iNColumns = rPlotFile.getNumColumns();
-    const int iNRecords = rPlotFile.getNumRecords();
+  const PlotFile& rPlotFile = GetDocument()->getPlotFile();
+  const int iNColumns = rPlotFile.getNumColumns();
+  const int iNRecords = rPlotFile.getNumRecords();
+  
+  if (iNColumns > 0 && iNRecords > 0) {
+    if (m_pEZPlot)
+      delete m_pEZPlot;
+    m_pEZPlot = new EZPlot;
     
-    if (iNColumns > 0 && iNRecords > 0) {
-      if (m_pEZPlot)
-        delete m_pEZPlot;
-      m_pEZPlot = new EZPlot;
-      
-      for (unsigned int iEzset = 0; iEzset < rPlotFile.getNumEzsetCommands(); iEzset++)
-        m_pEZPlot->ezset (rPlotFile.getEzsetCommand (iEzset));
-      
-      if (m_bMinSpecified) {
-        std::ostringstream os;
-        os << "ymin " << m_dMinPixel;
-        m_pEZPlot->ezset (os.str());
-      }
-      
-      if (m_bMaxSpecified) {
-        std::ostringstream os;
-        os << "ymax " << m_dMaxPixel;
-        m_pEZPlot->ezset (os.str());
-      }
-      
-      m_pEZPlot->ezset("box");
-      m_pEZPlot->ezset("grid");
-      
-      double* pdXaxis = new double [iNRecords];
-      rPlotFile.getColumn (0, pdXaxis);
-      
-      double* pdY = new double [iNRecords];
-      for (int iCol = 1; iCol < iNColumns; iCol++) {
-        rPlotFile.getColumn (iCol, pdY);
-        m_pEZPlot->addCurve (pdXaxis, pdY, iNRecords);
-      }
-      
-      delete pdXaxis;
-      delete pdY;
+    for (unsigned int iEzset = 0; iEzset < rPlotFile.getNumEzsetCommands(); iEzset++)
+      m_pEZPlot->ezset (rPlotFile.getEzsetCommand (iEzset));
+    
+    if (m_bMinSpecified) {
+      std::ostringstream os;
+      os << "ymin " << m_dMinPixel;
+      m_pEZPlot->ezset (os.str());
     }
-
-    if (m_canvas)
-      m_canvas->Refresh();
+    
+    if (m_bMaxSpecified) {
+      std::ostringstream os;
+      os << "ymax " << m_dMaxPixel;
+      m_pEZPlot->ezset (os.str());
+    }
+    
+    m_pEZPlot->ezset("box");
+    m_pEZPlot->ezset("grid");
+    
+    double* pdXaxis = new double [iNRecords];
+    rPlotFile.getColumn (0, pdXaxis);
+    
+    double* pdY = new double [iNRecords];
+    for (int iCol = 1; iCol < iNColumns; iCol++) {
+      rPlotFile.getColumn (iCol, pdY);
+      m_pEZPlot->addCurve (pdXaxis, pdY, iNRecords);
+    }
+    
+    delete pdXaxis;
+    delete pdY;
+  }
+  
+  if (m_canvas)
+    m_canvas->Refresh();
 }
 
 bool 
@@ -2745,9 +2798,9 @@ PlotFileView::OnClose (bool deleteWindow)
   if (!GetDocument()->Close())
     return false;
   
-  m_canvas->Clear();
-  // m_canvas->m_pView = NULL;
-  m_canvas = NULL;
+//  m_canvas->Clear();
+//  m_canvas->setView (NULL);
+//  m_canvas = NULL;
   wxString s(wxTheApp->GetAppName());
   if (m_frame)
     m_frame->SetTitle(s);
@@ -2762,3 +2815,135 @@ PlotFileView::OnClose (bool deleteWindow)
   return true;
 }
 
+
+////////////////////////////////////////////////////////////////
+
+
+IMPLEMENT_DYNAMIC_CLASS(TextEditView, wxView)
+
+TextEditView::~TextEditView() 
+{
+  if (m_pFileMenu)
+    theApp->getDocManager()->FileHistoryRemoveMenu (m_pFileMenu);
+}
+
+bool TextEditView::OnCreate(wxDocument *doc, long WXUNUSED(flags) )
+{
+  m_pFrame = CreateChildFrame(doc, this);
+  SetFrame (m_pFrame);
+  
+  int width, height;
+  m_pFrame->GetClientSize(&width, &height);
+  m_pFrame->SetTitle("TextEdit");
+  m_pCanvas = new TextEditCanvas (this, m_pFrame, wxPoint(0, 0), wxSize(width, height), wxTE_MULTILINE | wxTE_READONLY);
+  m_pFrame->SetTitle("Log");
+  
+#ifdef __X__
+  // X seems to require a forced resize
+  int x, y;
+  frame->GetSize(&x, &y);
+  frame->SetSize(-1, -1, x, y);
+#endif
+  
+  m_pFrame->Show (true);
+  Activate (true);
+  
+  return true;
+}
+
+// Handled by wxTextWindow
+void TextEditView::OnDraw(wxDC *WXUNUSED(dc) )
+{
+}
+
+void TextEditView::OnUpdate(wxView *WXUNUSED(sender), wxObject *WXUNUSED(hint) )
+{
+}
+
+bool 
+TextEditView::OnClose (bool deleteWindow)
+{
+  return false;
+  
+  if (!GetDocument()->Close())
+    return false;
+  
+  Activate(false);
+  
+  if (deleteWindow)
+  {
+    delete m_pFrame;
+    return TRUE;
+  }
+  return TRUE;
+}
+
+wxFrame*
+TextEditView::CreateChildFrame (wxDocument *doc, wxView *view)
+{
+#if CTSIM_MDI
+  wxDocMDIChildFrame* subframe = new wxDocMDIChildFrame (doc, view, theApp->getMainFrame(), -1, "TextEdit Frame", wxPoint(-1, -1), wxSize(300, 150), wxDEFAULT_FRAME_STYLE);
+#else
+  wxDocChildFrame* subframe = new wxDocChildFrame (doc, view, theApp->getMainFrame(), -1, "TextEdit Frame", wxPoint(-1, -1), wxSize(300, 150), wxDEFAULT_FRAME_STYLE);
+#endif
+  theApp->setIconForFrame (subframe);
+  
+  wxMenu *m_pFileMenu = new wxMenu;
+  
+  m_pFileMenu->Append(MAINMENU_FILE_CREATE_PHANTOM, "Cr&eate Phantom...\tCtrl-P");
+  m_pFileMenu->Append(MAINMENU_FILE_CREATE_FILTER, "Create &Filter...\tCtrl-F");
+  m_pFileMenu->Append(wxID_OPEN, "&Open...\tCtrl-O");
+  m_pFileMenu->Append(wxID_SAVE, "&Save\tCtrl-S");
+  m_pFileMenu->Append(wxID_SAVEAS, "Save &As...");
+  //  m_pFileMenu->Append(wxID_CLOSE, "&Close\tCtrl-W");
+  
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(wxID_PRINT, "&Print...");
+  m_pFileMenu->Append(wxID_PRINT_SETUP, "Print &Setup...");
+  m_pFileMenu->Append(wxID_PREVIEW, "Print Pre&view");
+#ifdef CTSIM_MDI
+  m_pFileMenu->AppendSeparator();
+  m_pFileMenu->Append(MAINMENU_FILE_EXIT, "E&xit");
+#endif
+  theApp->getDocManager()->FileHistoryAddFilesToMenu(m_pFileMenu);
+  theApp->getDocManager()->FileHistoryUseMenu(m_pFileMenu);
+  
+  wxMenu *help_menu = new wxMenu;
+  help_menu->Append(MAINMENU_HELP_CONTENTS, "&Contents\tF1");
+  help_menu->Append(MAINMENU_HELP_TOPICS, "&Topics\tCtrl-H");
+  help_menu->Append(MAINMENU_HELP_ABOUT, "&About");
+  
+  wxMenuBar *menu_bar = new wxMenuBar;
+  
+  menu_bar->Append(m_pFileMenu, "&File");
+  menu_bar->Append(help_menu, "&Help");
+  
+  subframe->SetMenuBar(menu_bar);
+  subframe->Centre(wxBOTH);
+  
+  wxAcceleratorEntry accelEntries[5];
+  accelEntries[0].Set (wxACCEL_CTRL, static_cast<int>('O'), wxID_OPEN);
+  accelEntries[1].Set (wxACCEL_CTRL, static_cast<int>('S'), wxID_SAVE);
+  accelEntries[2].Set (wxACCEL_CTRL, static_cast<int>('W'), wxID_CLOSE);
+  accelEntries[3].Set (wxACCEL_CTRL, static_cast<int>('H'), MAINMENU_HELP_TOPICS);
+  accelEntries[4].Set (wxACCEL_NORMAL, WXK_F1, MAINMENU_HELP_CONTENTS);
+  wxAcceleratorTable accelTable (5, accelEntries);
+  subframe->SetAcceleratorTable (accelTable);
+  
+  return subframe;
+}
+
+
+// Define a constructor for my text subwindow
+TextEditCanvas::TextEditCanvas (TextEditView* v, wxFrame* frame, const wxPoint& pos, const wxSize& size, long style)
+  : wxTextCtrl (frame, -1, "", pos, size, style), m_pView(v)
+{
+}
+
+TextEditCanvas::~TextEditCanvas ()
+{
+  if (m_pView) {
+    wxMenu* pMenu = m_pView->getFileMenu();
+    theApp->getDocManager()->FileHistoryRemoveMenu (pMenu);
+  }
+}