ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/BasiliskII/src/BeOS/about_window.cpp
Revision: 1.3
Committed: 2002-01-20T16:58:55Z (22 years, 6 months ago) by cebix
Branch: MAIN
CVS Tags: nigel-build-12, nigel-build-13
Changes since 1.2: +2 -2 lines
Log Message:
2001 -> 2002

File Contents

# Content
1 \/*
2 * about_window.cpp - "About" window
3 *
4 * Basilisk II (C) 1997-2002 Christian Bauer
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19 */
20
21 #include <InterfaceKit.h>
22 #include <stdio.h>
23
24 #include "sysdeps.h"
25 #include "version.h"
26 #include "user_strings.h"
27
28 /*
29 * Display "About" window
30 */
31
32 void ShowAboutWindow(void)
33 {
34 char str[512];
35 sprintf(str,
36 "Basilisk II\nVersion %d.%d\n\n"
37 "Copyright " B_UTF8_COPYRIGHT " 1997-2002 Christian Bauer et al.\n"
38 "E-mail: Christian.Bauer@uni-mainz.de\n"
39 "http://www.uni-mainz.de/~bauec002/B2Main.html\n\n"
40 "Basilisk II comes with ABSOLUTELY NO\n"
41 "WARRANTY. This is free software, and\n"
42 "you are welcome to redistribute it\n"
43 "under the terms of the GNU General\n"
44 "Public License.\n",
45 VERSION_MAJOR, VERSION_MINOR
46 );
47 BAlert *about = new BAlert("", str, GetString(STR_OK_BUTTON), NULL, NULL, B_WIDTH_FROM_LABEL);
48 BTextView *theText = about->TextView();
49 if (theText) {
50 theText->SetStylable(true);
51 theText->Select(0, 11);
52 BFont ourFont;
53 theText->SetFontAndColor(be_bold_font);
54 theText->GetFontAndColor(2, &ourFont, NULL);
55 ourFont.SetSize(24);
56 theText->SetFontAndColor(&ourFont);
57 }
58 about->Go();
59 }