/[thuban]/trunk/thuban/Thuban/UI/about.py
ViewVC logotype

Annotation of /trunk/thuban/Thuban/UI/about.py

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1323 - (hide annotations)
Mon Jun 30 12:02:01 2003 UTC (21 years, 8 months ago) by jonathan
File MIME type: text/x-python
File size: 3045 byte(s)
Add Thuban email addresses.

1 jonathan 1305 # Copyright (c) 2001, 2002, 2003 by Intevation GmbH
2     # Authors:
3     # Jonathan Coles <[email protected]>
4     #
5     # This program is free software under the GPL (>=v2)
6     # Read the file COPYING coming with Thuban for details.
7    
8     from wxPython.wx import *
9    
10     from Thuban import _
11     from Thuban.version import versions
12    
13     class About(wxDialog):
14    
15     def __init__(self, parent):
16     wxDialog.__init__(self, parent, -1, _("About Thuban"),
17     style = wxDEFAULT_DIALOG_STYLE
18     | wxSYSTEM_MENU
19     | wxMINIMIZE_BOX
20     | wxMAXIMIZE_BOX
21     | wxRESIZE_BORDER,
22     size = (400, 250))
23    
24     text = _(#"Build Date: %s\n"
25     "%s\n\n"
26     "Currently using:\n"
27     "\t%s\n"
28     "\t%s\n"
29     "\t%s\n"
30     "\t%s\n"
31     "\t%s\n\n"
32     "Compiled against:\n"
33     "\t%s\n"
34     "\t%s\n\n"
35     "Lead Developer:\n"
36 jonathan 1323 "\tBernhard Herzog\n\n"
37 jonathan 1305 "Developers:\n"
38     "\tJonathan Coles\n"
39     "\tFrank Koormann\n"
40     "\tBernhard Reiter\n"
41     "\tJan-Oliver Wagner\n\n"
42     "Contributors:\n"
43     "\tJonathan Byron\n"
44 jonathan 1323 "\tMartin Müller\n\n"
45     "Questions and comments can be sent to the following addresses:\n"
46     "\tThuban developers:\n\t\t<[email protected]>\n"
47     "\tThuban mailing list:\n\t\t<[email protected]>"
48 jonathan 1305 % ("Thuban %s" % versions['thuban-long'],
49     "wxPython %s" % versions['wxPython'],
50     "Python %s" % versions['python'],
51     "PySQLite %s" % versions['pysqlite'],
52     "SQLite %s" % versions['sqlite'],
53 jonathan 1323 "GDAL %s" % versions.get('gdal', "- not available"),
54     "GTK %s" % versions.get('gtk', "- not available"),
55 jonathan 1305 "proj %s" % versions['proj']))
56    
57     self.text = text
58    
59     text_title = wxStaticText(self, -1,
60     "Thuban is a program for exploring geographic data.\n\n"
61     "Copyright 2001-2003 Intevation GmbH.\n"
62     "Thuban is licensed under the GNU GPL",
63     style=wxST_NO_AUTORESIZE|wxALIGN_CENTRE)
64    
65     textBox = wxTextCtrl(self, -1, text,
66     style=wxTE_READONLY|wxTE_MULTILINE|wxTE_LINEWRAP)
67     w, h = (300, 150)
68     textBox.SetSizeHints(w, h)
69     textBox.SetSize((w, h))
70    
71     button_close = wxButton(self, wxID_CANCEL, _("Close"))
72     button_close.SetDefault()
73    
74     sizer = wxBoxSizer(wxVERTICAL)
75     sizer.Add(text_title, 0, wxALL|wxEXPAND|wxADJUST_MINSIZE, 10)
76     sizer.Add(textBox, 1, wxALL|wxEXPAND, 10)
77     sizer.Add(button_close, 0, wxALL|wxALIGN_RIGHT, 10)
78    
79     self.SetAutoLayout(True)
80     self.SetSizer(sizer)
81     sizer.Fit(self)
82     sizer.SetSizeHints(self)
83     self.Layout()
84    
85     EVT_BUTTON(self, wxID_CANCEL, self.OnCancel)
86    
87     def OnCancel(self, event):
88     self.EndModal(wxID_CANCEL)
89    
90    

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26