Author: gert
Date: 2007-08-29 12:09:16 -0400 (Wed, 29 Aug 2007)
New Revision: 85004
Added:
trunk/gert/interactive/bug82367/
trunk/gert/interactive/bug82367/MainForm.cs
trunk/gert/interactive/bug82367/default.build
Modified:
trunk/gert/interactive/bug82618/MainForm.cs
trunk/gert/interactive/known_issues
Log:
Added test for bug #82367. Marked bug #82618 as fixed, and improved test.
Added: trunk/gert/interactive/bug82367/MainForm.cs
===================================================================
--- trunk/gert/interactive/bug82367/MainForm.cs 2007-08-29 16:08:02 UTC (rev
85003)
+++ trunk/gert/interactive/bug82367/MainForm.cs 2007-08-29 16:09:16 UTC (rev
85004)
@@ -0,0 +1,131 @@
+using System;
+using System.Drawing;
+using System.Globalization;
+using System.IO;
+using System.Windows.Forms;
+
+public class MainForm : Form
+{
+ public MainForm ()
+ {
+ //
+ // _textBox
+ //
+ _textBox = new TextBox ();
+ _textBox.Dock = DockStyle.Top;
+ _textBox.Height = 100;
+ _textBox.Multiline = true;
+ Controls.Add (_textBox);
+ //
+ // _creditsCheckBox
+ //
+ _creditsCheckBox = new CheckBox ();
+ _creditsCheckBox.Location = new Point (125, 110);
+ _creditsCheckBox.Size = new Size (60, 20);
+ _creditsCheckBox.Text = "Credits";
+ _creditsCheckBox.CheckedChanged += new EventHandler
(CreditsCheckBox_CheckedChanged);
+ Controls.Add (_creditsCheckBox);
+ //
+ // MainForm
+ //
+ ClientSize = new Size (300, 140);
+ Location = new Point (250, 100);
+ StartPosition = FormStartPosition.Manual;
+ Text = "bug #82367";
+ Load += new EventHandler (MainForm_Load);
+ }
+
+ static void Main ()
+ {
+ Application.Run (new MainForm ());
+ }
+
+ void MainForm_Load (object sender, EventArgs e)
+ {
+ _textBox.Lines = new string [] { "Mono's", "Managed Windows
Forms", "ROCKS!" };
+
+ InstructionsForm instructionsForm = new InstructionsForm ();
+ instructionsForm.Show ();
+ }
+
+ void CreditsCheckBox_CheckedChanged (object sender, EventArgs e)
+ {
+ if (_creditsCheckBox.Checked)
+ _textBox.Lines = new string [] { "Rolf", "Chris",
"Everalo", "Jonathan", "..." };
+ else
+ _textBox.Lines = new string [] { "Mono's", "Managed
Windows Forms", "ROCKS!" };
+ }
+
+ private TextBox _textBox;
+ private CheckBox _creditsCheckBox;
+}
+
+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,
+ "Expected result on start-up:{0}{0}" +
+ "1. The following lines are displayed in the
textbox:{0}{0}" +
+ " Mono's{0}" +
+ " Managed Windows Forms{0}" +
+ " ROCKS!",
+ Environment.NewLine);
+ //
+ // _tabPage1
+ //
+ _tabPage1 = new TabPage ();
+ _tabPage1.Text = "#1";
+ _tabPage1.Controls.Add (_bugDescriptionText1);
+ _tabControl.Controls.Add (_tabPage1);
+ //
+ // _bugDescriptionText2
+ //
+ _bugDescriptionText2 = new TextBox ();
+ _bugDescriptionText2.Dock = DockStyle.Fill;
+ _bugDescriptionText2.Multiline = true;
+ _bugDescriptionText2.Text = string.Format
(CultureInfo.InvariantCulture,
+ "Steps to execute:{0}{0}" +
+ "1. Check the Credits checkbox.{0}{0}" +
+ "Expected result:{0}{0}" +
+ "1. The following lines are displayed in the
TextBox:{0}{0}" +
+ " Rolf{0}" +
+ " Chris{0}" +
+ " Everaldo{0}" +
+ " Jonathan{0}" +
+ " ...",
+ Environment.NewLine);
+ //
+ // _tabPage2
+ //
+ _tabPage2 = new TabPage ();
+ _tabPage2.Text = "#2";
+ _tabPage2.Controls.Add (_bugDescriptionText2);
+ _tabControl.Controls.Add (_tabPage2);
+ //
+ // InstructionsForm
+ //
+ ClientSize = new Size (360, 215);
+ Location = new Point (600, 100);
+ StartPosition = FormStartPosition.Manual;
+ Text = "Instructions - bug #82367";
+ }
+
+ private TextBox _bugDescriptionText1;
+ private TextBox _bugDescriptionText2;
+ private TabControl _tabControl;
+ private TabPage _tabPage1;
+ private TabPage _tabPage2;
+}
Property changes on: trunk/gert/interactive/bug82367/MainForm.cs
___________________________________________________________________
Name: svn:eol-style
+ native
Added: trunk/gert/interactive/bug82367/default.build
===================================================================
--- trunk/gert/interactive/bug82367/default.build 2007-08-29 16:08:02 UTC
(rev 85003)
+++ trunk/gert/interactive/bug82367/default.build 2007-08-29 16:09:16 UTC
(rev 85004)
@@ -0,0 +1,62 @@
+<project name="bug82367" default="rebuild">
+ <target name="mono-1.0">
+ <property name="csc.defines"
value="NET_1_0,NET_1_1,ONLY_1_1,MONO" />
+ </target>
+
+ <target name="mono-2.0">
+ <property name="csc.defines"
value="NET_1_0,NET_1_1,NET_2_0,ONLY_2_0,MONO" />
+ </target>
+
+ <target name="net-1.1">
+ <property name="csc.defines" value="NET_1_0,NET_1_1,ONLY_1_1" />
+ </target>
+
+ <target name="net-2.0">
+ <property name="csc.defines"
value="NET_1_0,NET_1_1,NET_2_0,ONLY_2_0" />
+ </target>
+
+ <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="build">
+ <property name="original.targetframework"
value="${nant.settings.currentframework}" />
+
+ <foreach property="framework" item="String" in="${frameworks}"
delim=",">
+ <if test="${framework::exists(framework)}">
+ <property name="nant.settings.currentframework"
value="${framework}" />
+ <call
target="${nant.settings.currentframework}" />
+ <call target="run" />
+ <call target="clean" />
+ </if>
+ </foreach>
+
+ <property name="nant.settings.currentframework"
value="${original.targetframework}" />
+ </target>
+
+ <target name="compile">
+ <csc target="winexe" define="${csc.defines}" output="test.exe"
warnaserror="true" warninglevel="4">
+ <sources>
+ <include name="MainForm.cs" />
+ </sources>
+ <references>
+ <include name="System.Drawing.dll" />
+ <include name="System.Windows.Forms.dll" />
+ </references>
+ </csc>
+ </target>
+
+ <target name="run" depends="compile">
+ <exec program="test.exe" managed="true" output="out" />
+ <fail if="${file::exists('out')}" />
+ </target>
+
+ <target name="rebuild" depends="clean, build" />
+</project>
Property changes on: trunk/gert/interactive/bug82367/default.build
___________________________________________________________________
Name: svn:eol-style
+ native
Modified: trunk/gert/interactive/bug82618/MainForm.cs
===================================================================
--- trunk/gert/interactive/bug82618/MainForm.cs 2007-08-29 16:08:02 UTC (rev
85003)
+++ trunk/gert/interactive/bug82618/MainForm.cs 2007-08-29 16:09:16 UTC (rev
85004)
@@ -93,6 +93,7 @@
void SelectFolderButton_Click (object sender, EventArgs e)
{
+ _fbd.SelectedPath = null;
DialogResult result = _fbd.ShowDialog (this);
_dialogResultText.Text = result.ToString ();
@@ -153,6 +154,33 @@
_tabPage1.Controls.Add (_bugDescriptionText1);
_tabControl.Controls.Add (_tabPage1);
//
+ // _bugDescriptionText2
+ //
+ _bugDescriptionText2 = new TextBox ();
+ _bugDescriptionText2.Dock = DockStyle.Fill;
+ _bugDescriptionText2.Multiline = true;
+ _bugDescriptionText2.Text = string.Format
(CultureInfo.InvariantCulture,
+ "Steps to execute:{0}{0}" +
+ "1. Click the Select button.{0}{0}" +
+ "2. Select the Desktop node.{0}{0}" +
+ "3. Click the Make New Folder button.{0}{0}" +
+ "4. Press the Esc key.{0}{0}" +
+ "5. Click the Make New Folder button.{0}{0}" +
+ "6. Enter Mono as label.{0}{0}" +
+ "7. Press the Enter key.{0}{0}" +
+ "Expected result:{0}{0}" +
+ "1. DialogResult is OK.{0}{0}" +
+ "2. SelectedPath is the full path of the Mono
folder.{0}{0}" +
+ "3. The Exists checkbox is checked.",
+ Environment.NewLine);
+ //
+ // _tabPage2
+ //
+ _tabPage2 = new TabPage ();
+ _tabPage2.Text = "#2";
+ _tabPage2.Controls.Add (_bugDescriptionText2);
+ _tabControl.Controls.Add (_tabPage2);
+ //
// InstructionsForm
//
ClientSize = new Size (360, 375);
@@ -162,6 +190,8 @@
}
private TextBox _bugDescriptionText1;
+ private TextBox _bugDescriptionText2;
private TabControl _tabControl;
private TabPage _tabPage1;
+ private TabPage _tabPage2;
}
Modified: trunk/gert/interactive/known_issues
===================================================================
--- trunk/gert/interactive/known_issues 2007-08-29 16:08:02 UTC (rev 85003)
+++ trunk/gert/interactive/known_issues 2007-08-29 16:09:16 UTC (rev 85004)
@@ -127,4 +127,3 @@
bug82580/**
bug82590/**
bug82592/**
-bug82618/**
_______________________________________________
Mono-patches maillist - [email protected]
http://lists.ximian.com/mailman/listinfo/mono-patches
