1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
|
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Drawing;
using System.Data;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using System.Drawing.Text;
using Histacom2.Engine;
namespace Histacom2.OS.Win95.Win95Apps
{
public partial class WinClassicWordPad : UserControl
{
WindowManager wm = new WindowManager();
bool doBold = false;
bool doItalic = false;
bool doUnderline = false;
public WinClassicWordPad()
{
InitializeComponent();
foreach (ToolStripMenuItem item in topmenu.Items)
{
item.Font = new Font(TitleScreen.pfc.Families[0], 16F, FontStyle.Regular, GraphicsUnit.Point, ((0)));
item.BackColor = Color.Silver;
item.BackgroundImage = Properties.Resources.sliversilver;
item.BackgroundImageLayout = ImageLayout.Center;
item.DisplayStyle = ToolStripItemDisplayStyle.Text;
}
// Time to prepare to load all the fonts up for the combo boxes
foreach (FontFamily font in FontFamily.Families) comboFont.Items.Add(font.Name);
// Handlers
this.clearToolStripMenuItem.Click += (sender, args) => mainText.Text = mainText.Text.Remove(mainText.SelectionStart, mainText.SelectedText.Length);
this.pasteToolStripMenuItem.Click += (sender, args) => mainText.Paste();
this.btnPaste.Click += (sender, args) => mainText.Paste();
this.btnCopy.Click += (sender, args) => { if (mainText.SelectedText.Length >= 0) mainText.Copy(); };
this.copyToolStripMenuItem.Click += (sender, args) => { if (mainText.SelectedText.Length >= 0) mainText.Copy(); };
this.cutToolStripMenuItem.Click += (sender, args) => { if (mainText.SelectedText.Length >= 0) mainText.Cut(); };
this.btnCut.Click += (sender, args) => { if (mainText.SelectedText.Length >= 0) mainText.Cut(); };
this.undoToolStripMenuItem.Click += (sender, args) => mainText.Undo();
this.selectAllToolStripMenuItem.Click += (sender, args) => mainText.SelectAll();
this.dateTimeToolStripMenuItem.Click += (sender, args) => mainText.AppendText(DateTime.Now.ToString("HH:mm tt dd/MM/yyyy"));
this.toolbarToolStripMenuItem.Click += (sender, args) => pnlToolbar.Visible = toolbarToolStripMenuItem.Checked;
this.formatBarToolStripMenuItem.Click += (sender, args) => pnlFormatBar.Visible = formatBarToolStripMenuItem.Checked;
this.statusBarToolStripMenuItem.Click += (sender, args) => statusBar.Visible = statusBarToolStripMenuItem.Checked;
this.exitToolStripMenuItem.Click += (sender, args) => ((Form)this.TopLevelControl).Close();
this.aboutWordpadToolStripMenuItem.Click += (sender, args) => wm.StartAboutBox95("Wordpad", "Microsoft Wordpad", Properties.Resources.Win95IconWordpad);
this.btnNew.Click += (sender, args) => mainText.Text = "";
this.newToolStripMenuItem.Click += (sender, args) => mainText.Text = "";
this.sendToolStripMenuItem.Click += (sender, args) => wm.StartInfobox95("Wordpad", "An error occured opening send option.", Engine.Template.InfoboxType.Error, Engine.Template.InfoboxButtons.OK);
this.bulletStyleToolStripMenuItem.Click += (sender, args) => mainText.SelectionBullet = bulletStyleToolStripMenuItem.Checked;
this.comboFont.SelectedIndexChanged += (sender, args) => SetSelectedTextFont(comboFont.Text);
this.comboSize.SelectedIndexChanged += (sender, args) => SetSelectedTextSize(comboSize.Text);
}
#region Format_Buttons
private void btnBold_Click(object sender, EventArgs e)
{
if (!doBold)
{
btnBold.BackgroundImage = null;
doBold = true;
} else {
btnBold.BackgroundImage = Properties.Resources.wordpad_bold;
doBold = false;
}
DoFontStyles();
}
private void btnItalic_Click(object sender, EventArgs e)
{
if (!doItalic)
{
btnItalic.BackgroundImage = null;
doItalic = true;
}
else
{
btnItalic.BackgroundImage = Properties.Resources.wordpad_italic;
doItalic = false;
}
DoFontStyles();
}
private void btnUnderline_Click(object sender, EventArgs e)
{
if (!doUnderline)
{
btnUnderline.BackgroundImage = null;
doUnderline = true;
}
else
{
btnUnderline.BackgroundImage = Properties.Resources.wordpad_underline;
doUnderline = false;
}
DoFontStyles();
}
#endregion
#region Designer-Stuff
private void btnBold_MouseEnter(object sender, EventArgs e)
{
lblStatus.Text = "Makes the selected text Bold. (toggle)";
}
private void btnBold_MouseLeave(object sender, EventArgs e)
{
lblStatus.Text = "For Help, goto Help -> Help Topics";
}
private void btnItalic_MouseEnter(object sender, EventArgs e)
{
lblStatus.Text = "Makes the selected text Italic. (toggle)";
}
private void btnItalic_MouseLeave(object sender, EventArgs e)
{
lblStatus.Text = "For Help, goto Help -> Help Topics";
}
private void btnUnderline_MouseEnter(object sender, EventArgs e)
{
lblStatus.Text = "Makes the selected text Underline. (toggle)";
}
private void btnUnderline_MouseLeave(object sender, EventArgs e)
{
lblStatus.Text = "For Help, goto Help -> Help Topics";
}
#endregion
// Things for Cut/Copy/Paste have been placed in the "Designer-Stuff" region!
void SetSelectedTextFont(string font)
{
// The next two lines convert a string to a Font
var cvt = new FontConverter();
Font f = cvt.ConvertFromString(font) as Font;
mainText.SelectionFont = f;
}
void SetSelectedTextSize(string size)
{
// The next few lines will ATTEMPT to convert a string to an Integer
int SizeInt = Convert.ToInt32(size);
mainText.SelectionFont = new Font(mainText.SelectionFont.FontFamily, SizeInt, mainText.SelectionFont.Style);
}
void DoFontStyles()
{
FontStyle Bold = FontStyle.Regular;
FontStyle Italic = FontStyle.Regular;
FontStyle Underline = FontStyle.Regular;
if (doBold) Bold = FontStyle.Bold;
if (doItalic) Italic = FontStyle.Italic;
if (doUnderline) Underline = FontStyle.Underline;
mainText.SelectionFont = new Font(mainText.SelectionFont.FontFamily, mainText.SelectionFont.Size, Bold | Italic | Underline);
}
}
}
|
