/[thuban]/branches/WIP-pyshapelib-bramz/Thuban/UI/mainwindow.py
ViewVC logotype

Diff of /branches/WIP-pyshapelib-bramz/Thuban/UI/mainwindow.py

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 314 by bh, Wed Sep 11 15:18:09 2002 UTC revision 346 by bh, Wed Oct 23 14:45:28 2002 UTC
# Line 219  class MainWindow(wxFrame): Line 219  class MainWindow(wxFrame):
219          """Run a modal message box with the given text, title and flags          """Run a modal message box with the given text, title and flags
220          and return the result"""          and return the result"""
221          dlg = wxMessageDialog(self, text, title, flags)          dlg = wxMessageDialog(self, text, title, flags)
222            dlg.CenterOnParent()
223          result = dlg.ShowModal()          result = dlg.ShowModal()
224          dlg.Destroy()          dlg.Destroy()
225          return result          return result
# Line 250  class MainWindow(wxFrame): Line 251  class MainWindow(wxFrame):
251              text = "(%10.10g, %10.10g)" % pos              text = "(%10.10g, %10.10g)" % pos
252          else:          else:
253              text = ""              text = ""
254            self.set_position_text(text)
255    
256        def set_position_text(self, text):
257            """Set the statusbar text showing the current position.
258    
259            By default the text is shown in field 0 of the status bar.
260            Override this method in derived classes to put it into a
261            different field of the statusbar.
262            """
263          self.SetStatusText(text)          self.SetStatusText(text)
264    
265      def save_modified_session(self, can_veto = 1):      def save_modified_session(self, can_veto = 1):
# Line 336  class MainWindow(wxFrame): Line 346  class MainWindow(wxFrame):
346          self.RunMessageBox("About",          self.RunMessageBox("About",
347                             ("Thuban is a program for\n"                             ("Thuban is a program for\n"
348                              "exploring geographic data.\n"                              "exploring geographic data.\n"
349                              "Copyright (C) 2001 Intevation GmbH.\n"                              "Copyright (C) 2001, 2002 Intevation GmbH.\n"
350                              "Thuban is licensed under the GPL"),                              "Thuban is licensed under the GPL"),
351                             wxOK | wxICON_INFORMATION)                             wxOK | wxICON_INFORMATION)
352    
Legend:
Removed from v.314  
changed lines
  Added in v.346
[email protected]
 ViewVC Help
Powered by ViewVC 1.1.26