MessageBox styling and events

2 files changed, 18 insertions, 7 deletions

diff --git a/Tests/GOLIBTests.cs b/Tests/GOLIBTests.cs
index 81d76346..b70a2542 100644
--- a/Tests/GOLIBTests.cs
+++ b/Tests/GOLIBTests.cs
@@ -37,6 +37,9 @@ namespace test
 		int frameCpt = 0;
 		int idx = 0;
 		string[] testFiles = {
+			"testMsgBox.goml",
+			"testCombobox.goml",
+			"testExpandable.goml",
 			"test_Listbox.goml",
 			"6.crow",
 			"testGroupBox.goml",
@@ -44,7 +47,6 @@ namespace test
 			"5.crow",
 			"testCheckbox.goml",
 			"testTabView.crow",
-			"testExpandable.goml",
 			"0.crow",
 			"testImage.crow",
 			"testOutOfClipUpdate.crow",
@@ -55,7 +57,6 @@ namespace test
 			"clip2.crow",
 			"clip0.crow",
 			"clip1.crow",
-			"testCombobox.goml",
 			"testPopper.goml",
 			"testTextBox.crow",
 			"testColorList.crow",
@@ -80,7 +81,7 @@ namespace test
 //			"testRadioButton2.goml",
 			"testContainer.goml",
 			"testRadioButton.goml",
-			"testMsgBox.goml",
+
 //			"testMeter.goml",
 		};
 
@@ -180,7 +181,9 @@ namespace test
 		}
 		void OnClear (object sender, MouseButtonEventArgs e) => TestList = null;
 
-		void OnLoadList (object sender, MouseButtonEventArgs e) => TestList = Color.ColorDic.ToList();
+		void OnLoadList (object sender, MouseButtonEventArgs e) {
+			TestList = Color.ColorDic.ToList();
+		}
 
 		protected override void OnLoad (EventArgs e)
 		{
@@ -189,8 +192,7 @@ namespace test
 
 			GraphicObject obj = LoadInterface("Interfaces/" + testFiles[idx]);
 			obj.DataSource = this;
-
-		}
+	}
 		protected override void OnUpdateFrame (FrameEventArgs e)
 		{
 			//if (frameCpt % 8 == 0)
@@ -255,5 +257,12 @@ namespace test
 				win.Run (30.0);
 			}
 		}
+		void onMsgBoxOk(object sender, EventArgs e){
+			Debug.WriteLine ("OK");
+		}
+		void onMsgBoxCancel(object sender, EventArgs e)
+		{
+			Debug.WriteLine ("cancel");
+		}
 	}
 }
\ No newline at end of file
diff --git a/Tests/Interfaces/testMsgBox.goml b/Tests/Interfaces/testMsgBox.goml
index 9cd0e339..680f43b4 100755
--- a/Tests/Interfaces/testMsgBox.goml
+++ b/Tests/Interfaces/testMsgBox.goml
@@ -1,2 +1,4 @@
 <?xml version="1.0"?>
-<MessageBox Width="200" Height="-1"/>
\ No newline at end of file
+<MessageBox Title="message" Message="this is a message box"
+	Ok="onMsgBoxOk"
+	Cancel="onMsgBoxCancel"/>
\ No newline at end of file