/[cvs]/nfo/projects/netfraggle/bin/BoaAboutDialog.py
ViewVC logotype

Annotation of /nfo/projects/netfraggle/bin/BoaAboutDialog.py

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (hide annotations)
Thu Aug 26 15:07:28 2004 UTC (20 years, 2 months ago) by joko
Branch: MAIN
CVS Tags: HEAD
File MIME type: text/x-python
initial commit

1 joko 1.1 #Boa:Dialog:BoaAboutDialog
2    
3     # $Id$
4     # $Log$
5    
6     import os
7     from fraggleConstants import *
8     from FraggleHtmlWindow import FraggleHtmlWindow
9    
10     from wxPython.wx import *
11     from wxPython.html import *
12    
13     def create(parent):
14     return BoaAboutDialog(parent)
15    
16     [wxID_BOAABOUTDIALOG, wxID_BOAABOUTDIALOGABOUTTEXT,
17     wxID_BOAABOUTDIALOGBUTTON_CLOSE, wxID_BOAABOUTDIALOGLOGOBITMAP,
18     ] = map(lambda _init_ctrls: wxNewId(), range(4))
19    
20     class BoaAboutDialog(wxDialog):
21     _custom_classes = {'wxHtmlWindow': ['FraggleHtmlWindow']}
22     def _init_ctrls(self, prnt):
23     # generated method, don't edit
24     wxDialog.__init__(self, id=wxID_BOAABOUTDIALOG, name='', parent=prnt,
25     pos=wxPoint(302, 304), size=wxSize(480, 278),
26     style=wxDEFAULT_DIALOG_STYLE, title="About NetFraggle")
27     self.SetClientSize(wxSize(472, 251))
28    
29     self.CloseButton = wxButton(id=wxID_CANCEL, label=u'&Close',
30     name=u'CloseButton', parent=self, pos=wxPoint(392, 224),
31     size=wxSize(75, 23), style=0)
32     EVT_BUTTON(self.CloseButton, wxID_BOAABOUTDIALOGBUTTON_CLOSE,
33     self.OnButton_closeButton)
34    
35     self.AboutText = FraggleHtmlWindow(id=wxID_BOAABOUTDIALOGABOUTTEXT,
36     name=u'AboutText', parent=self, pos=wxPoint(208, 16),
37     size=wxSize(256, 200), style=wxHW_SCROLLBAR_AUTO)
38    
39     self.LogoBitmap = wxStaticBitmap(bitmap=wxNullBitmap,
40     id=wxID_BOAABOUTDIALOGLOGOBITMAP, name=u'LogoBitmap', parent=self,
41     pos=wxPoint(16, 16), size=wxSize(179, 104), style=0)
42    
43     def __init__(self, parent):
44     self._init_ctrls(parent)
45     self.__set_properties()
46    
47     def __set_properties(self):
48     #self.SetTitle("About NetFraggle")
49     #self.AboutText.SetSize((305, 200))
50     self.CloseButton.SetDefault()
51    
52     def OnButton_closeButton(self, event):
53     event.Skip()

MailToCvsAdmin">MailToCvsAdmin
ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed