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

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

Parent Directory Parent Directory | Revision Log Revision Log


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

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