P004-テキスト表示プログラム

今日の目標→

ここまで画像表示ばっかり続いたので、テキスト表示にも挑戦する。

●プロジェクトの作成

1. 「TextWork」という名前で、新規プロジェクトを作る
2. Form1.csのコードを開き、次のプログラムを入力する

using System; using System.Drawing; using System.Windows.Forms; namespace TextWork { public partial class Form1 : Form { // コントロール private RichTextBox MyTextBox; private Button MyStartButton; private Button MyEndButton; private Timer MyTimer; // フォームのコンストラクタ public Form1() { InitializeComponent(); // テキストボックスを作る MyTextBox = new RichTextBox(); MyTextBox.Name = "MyTextBox"; MyTextBox.Anchor = AnchorStyles.Left | AnchorStyles.Right | AnchorStyles.Top | AnchorStyles.Bottom; MyTextBox.Left = 4; MyTextBox.Top = 4; MyTextBox.Width = this.ClientSize.Width - 8; MyTextBox.Height = this.ClientSize.Height - 36; MyTextBox.Font = new Font("ＭＳ ゴシック", 12); // 開始ボタンを作る MyStartButton = new Button(); MyStartButton.Name = "MyStartButton"; MyStartButton.Anchor = AnchorStyles.Left | AnchorStyles.Bottom; MyStartButton.Left = 4; MyStartButton.Top = this.ClientSize.Height - 28; MyStartButton.Width = 100; MyStartButton.Height = 24; MyStartButton.Text = "開始(&S)"; MyStartButton.Click += MyStartButton_Click; // 終了ボタンを作る MyEndButton = new Button(); MyEndButton.Name = "MyEndButton"; MyEndButton.Anchor = AnchorStyles.Left | AnchorStyles.Bottom; MyEndButton.Left = MyStartButton.Right + 4; MyEndButton.Top = MyStartButton.Top; MyEndButton.Width = 100; MyEndButton.Height = 24; MyEndButton.Text = "終了(&E)"; MyEndButton.Click += MyEndButton_Click; // コントロールをフォームに配置する this.SuspendLayout(); this.Controls.Add(MyTextBox); this.Controls.Add(MyStartButton); this.Controls.Add(MyEndButton); this.ResumeLayout(); // タイマーを作る MyTimer = new Timer(); MyTimer.Tick += MyTimer_Tick; } // 「開始(S)」ボタンのクリック private void MyStartButton_Click(object sender, EventArgs e) { if (!MyTimer.Enabled) { // 開始メッセージ表示 MyTextBox.AppendText("タイマー処理を開始\n"); // 周期1000ミリ秒（1秒）でタイマー処理を開始 MyTimer.Interval = 1000; MyTimer.Start(); } } // 「終了(E)」ボタンのクリック private void MyEndButton_Click(object sender, EventArgs e) { if (MyTimer.Enabled) { // タイマー処理を終了 MyTimer.Stop(); // 終了メッセージ表示 MyTextBox.AppendText("タイマー処理を終了\n"); } } // タイマー周期ごとの処理 private void MyTimer_Tick(object sender, EventArgs e) { string line = string.Format("現在時刻は {0}\n", DateTime.Now); MyTextBox.AppendText(line); } } }

プログラムを実行し、「開始(S)」ボタンを押すと、現在時刻を1秒ごとに繰り返して表示する。「終了(E)」ボタンを押すと停止する。

●要点の解説

文字出力には各種の方法がある。たとえばConsole.Write()によるコンソール出力とか、Labelコントロールにテキストを表示するとか。しかしいろいろ試した結果、いちばん便利だと思ったのは、テキストボックスを１個配置して、そこにテキスト出力を垂れ流していく方法だ。

このときただのTextBoxクラスではなくRichTextBoxクラスを使えば、文字に色をつけたりできて面白い。次の記事からしばらくは、RichTextBoxを利用したテキスト出力や文字列処理についてみていきたい。

あと今回使ったタイマー（Windows.Forms.Timerクラス）についても、いつか説明したいところ。

（実行画面が入る予定）