Author: gert
Date: 2008-02-05 16:27:04 -0500 (Tue, 05 Feb 2008)
New Revision: 94957
Added:
trunk/gert/interactive/bug355850/
trunk/gert/interactive/bug355850/MainForm.cs
trunk/gert/interactive/bug355850/TestControl.cs
trunk/gert/interactive/bug355850/default.build
Modified:
trunk/gert/interactive/known-issues
Log:
Added test for bug #355850.
Added: trunk/gert/interactive/bug355850/MainForm.cs
===================================================================
--- trunk/gert/interactive/bug355850/MainForm.cs 2008-02-05 21:26:49 UTC
(rev 94956)
+++ trunk/gert/interactive/bug355850/MainForm.cs 2008-02-05 21:27:04 UTC
(rev 94957)
@@ -0,0 +1,133 @@
+using System;
+using System.Drawing;
+using System.Globalization;
+using System.Windows.Forms;
+
+public class MainForm : Form
+{
+ public MainForm ()
+ {
+ //
+ // _tabControl
+ //
+ _tabControl = new TabControl ();
+ _tabControl.Dock = DockStyle.Fill;
+ _tabControl.SelectedIndex = 0;
+ _tabControl.TabIndex = 0;
+ _tabControl.SelectedIndexChanged += new EventHandler
(OnSelectedIndexChanged);
+ Controls.Add (_tabControl);
+ //
+ // _tabPage1
+ //
+ _tabPage1 = new TabPage ();
+ _tabPage1.Location = new Point (4, 22);
+ _tabPage1.Size = new Size (384, 240);
+ _tabPage1.TabIndex = 0;
+ _tabPage1.Text = "A";
+ _tabControl.Controls.Add (_tabPage1);
+ //
+ // _tabPage2
+ //
+ _tabPage2 = new TabPage ();
+ _tabPage2.Location = new Point (4, 22);
+ _tabPage2.Size = new Size (192, 74);
+ _tabPage2.TabIndex = 1;
+ _tabPage2.Text = "B";
+ _tabControl.Controls.Add (_tabPage2);
+ //
+ // _textBox
+ //
+ _textBox = new TextBox ();
+ _textBox.BackColor = Color.Green;
+ _textBox.Dock = DockStyle.Fill;
+ _textBox.Multiline = true;
+ _tabPage1.Controls.Add (_textBox);
+ //
+ // MainForm
+ //
+ ClientSize = new Size (300, 240);
+ Location = new Point (250, 100);
+ StartPosition = FormStartPosition.Manual;
+ Text = "bug #355850";
+ Load += new EventHandler (MainForm_Load);
+ }
+
+ [STAThread]
+ static void Main ()
+ {
+ Application.EnableVisualStyles ();
+ Application.Run (new MainForm ());
+ }
+
+ void MainForm_Load (object sender, EventArgs e)
+ {
+ InstructionsForm instructionsForm = new InstructionsForm ();
+ instructionsForm.Show ();
+ }
+
+ void OnSelectedIndexChanged (object sender, EventArgs e)
+ {
+ TabPage page = ((TabControl) sender).SelectedTab;
+ if (page == _tabPage2) {
+ _control = new TestControl ();
+ _control.Dock = DockStyle.Fill;
+ _tabPage2.Controls.Clear ();
+ _tabPage2.Controls.Add (_control);
+ } else {
+ if (_control != null)
+ _control.Dispose ();
+ _control = null;
+ }
+ }
+
+ private TestControl _control;
+ private TextBox _textBox;
+ private TabPage _tabPage1;
+ private TabPage _tabPage2;
+ private TabControl _tabControl;
+}
+
+public class InstructionsForm : Form
+{
+ public InstructionsForm ()
+ {
+ //
+ // _tabControl
+ //
+ _tabControl = new TabControl ();
+ _tabControl.Dock = DockStyle.Fill;
+ Controls.Add (_tabControl);
+ //
+ // _bugDescriptionText1
+ //
+ _bugDescriptionText1 = new TextBox ();
+ _bugDescriptionText1.Dock = DockStyle.Fill;
+ _bugDescriptionText1.Multiline = true;
+ _bugDescriptionText1.Text = string.Format
(CultureInfo.InvariantCulture,
+ "Steps to execute:{0}{0}" +
+ "1. Click on tab B.{0}{0}" +
+ "2. Click on tab A.{0}{0}" +
+ "Expected result:{0}{0}" +
+ "1. The background color of the textbox changes from " +
+ "green to blue, and back to green.",
+ Environment.NewLine);
+ //
+ // _tabPage1
+ //
+ _tabPage1 = new TabPage ();
+ _tabPage1.Text = "#1";
+ _tabPage1.Controls.Add (_bugDescriptionText1);
+ _tabControl.Controls.Add (_tabPage1);
+ //
+ // InstructionsForm
+ //
+ ClientSize = new Size (320, 180);
+ Location = new Point (600, 100);
+ StartPosition = FormStartPosition.Manual;
+ Text = "Instructions - bug #355850";
+ }
+
+ private TextBox _bugDescriptionText1;
+ private TabControl _tabControl;
+ private TabPage _tabPage1;
+}
Property changes on: trunk/gert/interactive/bug355850/MainForm.cs
___________________________________________________________________
Name: svn:eol-style
+ native
Added: trunk/gert/interactive/bug355850/TestControl.cs
===================================================================
--- trunk/gert/interactive/bug355850/TestControl.cs 2008-02-05 21:26:49 UTC
(rev 94956)
+++ trunk/gert/interactive/bug355850/TestControl.cs 2008-02-05 21:27:04 UTC
(rev 94957)
@@ -0,0 +1,30 @@
+using System;
+using System.Drawing;
+using System.Windows.Forms;
+
+public class TestControl : UserControl
+{
+ public TestControl ()
+ {
+ //
+ // _textBox
+ //
+ _textBox = new TextBox ();
+ _textBox.BackColor = Color.Blue;
+ _textBox.Dock = DockStyle.Fill;
+ _textBox.Multiline = true;
+ Controls.Add (_textBox);
+ //
+ // TestControl
+ //
+ Dock = DockStyle.Fill;
+ }
+
+ protected override void OnLoad (EventArgs e)
+ {
+ _textBox.Focus ();
+ base.OnLoad (e);
+ }
+
+ private TextBox _textBox;
+}
Property changes on: trunk/gert/interactive/bug355850/TestControl.cs
___________________________________________________________________
Name: svn:eol-style
+ native
Added: trunk/gert/interactive/bug355850/default.build
===================================================================
--- trunk/gert/interactive/bug355850/default.build 2008-02-05 21:26:49 UTC
(rev 94956)
+++ trunk/gert/interactive/bug355850/default.build 2008-02-05 21:27:04 UTC
(rev 94957)
@@ -0,0 +1,31 @@
+<project name="bug355850" default="rebuild">
+ <include buildfile="../../build/common.build" />
+
+ <property name="frameworks" value="mono-1.0,mono-2.0,net-1.1,net-2.0" />
+
+ <target name="clean">
+ <delete>
+ <fileset>
+ <include name="out" />
+ <include name="test.exe" />
+ </fileset>
+ </delete>
+ </target>
+
+ <target name="compile" depends="init">
+ <csc target="winexe" define="${csc.defines}" output="test.exe"
warnaserror="true" warninglevel="4">
+ <sources>
+ <include name="*.cs" />
+ </sources>
+ <references>
+ <include name="System.Drawing.dll" />
+ <include name="System.Windows.Forms.dll" />
+ </references>
+ </csc>
+ </target>
+
+ <target name="run-test" depends="compile">
+ <exec program="test.exe" managed="true" output="out" />
+ <fail if="${file::exists('out')}" />
+ </target>
+</project>
Property changes on: trunk/gert/interactive/bug355850/default.build
___________________________________________________________________
Name: svn:eol-style
+ native
Modified: trunk/gert/interactive/known-issues
===================================================================
--- trunk/gert/interactive/known-issues 2008-02-05 21:26:49 UTC (rev 94956)
+++ trunk/gert/interactive/known-issues 2008-02-05 21:27:04 UTC (rev 94957)
@@ -123,6 +123,7 @@
bug345883/**
bug351938/**
bug353310/**
+bug355850/**
bug356527/**
bug356530/**
bug357638/**
_______________________________________________
Mono-patches maillist - [email protected]
http://lists.ximian.com/mailman/listinfo/mono-patches
