X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=mcs%2Fclass%2FManaged.Windows.Forms%2FSystem.Windows.Forms%2FCreateParams.cs;h=8d27ae98a97f5b53e1257ca2b076fb6284e9ee14;hb=30c28c41d7859b7de6ecd7afb652468517048d12;hp=137ef905d66a6b4a468b12d09099d65dbcbd2fcd;hpb=cccbf6a4b7152c24fafc319e77060a4723a8560e;p=mono.git

diff --git a/mcs/class/Managed.Windows.Forms/System.Windows.Forms/CreateParams.cs b/mcs/class/Managed.Windows.Forms/System.Windows.Forms/CreateParams.cs
index 137ef905d66..8d27ae98a97 100644
--- a/mcs/class/Managed.Windows.Forms/System.Windows.Forms/CreateParams.cs
+++ b/mcs/class/Managed.Windows.Forms/System.Windows.Forms/CreateParams.cs
@@ -44,6 +44,7 @@ namespace System.Windows.Forms {
 		private object	param;
 		private IntPtr	parent;
 		internal Menu	menu;
+		internal Control	control;
 		#endregion 	// Local variables
 
 		#region Public Constructors
@@ -108,6 +109,40 @@ namespace System.Windows.Forms {
 		}
 		#endregion	// Public Instance Properties
 
+		#region Internal Instance Methods
+		internal bool IsSet (WindowStyles Style) {
+			return (this.style & (int) Style) != 0;
+		}
+		
+		internal bool IsSet (WindowExStyles ExStyle) {
+			return (this.ex_style & (int)ExStyle) != 0;
+		}
+		
+		internal bool HasWindowManager {
+			get {
+				return control != null && control is Form && ((Form) control).window_manager != null;
+			}
+		}
+		internal WindowExStyles WindowExStyle {
+			get {
+				return (WindowExStyles) ex_style;
+			}
+			set
+			{
+				ex_style = (int)value;
+			}
+		}
+		
+		internal WindowStyles WindowStyle {
+			get {
+				return (WindowStyles) style;
+			}
+			set {
+				style = (int) value;
+			}
+		}
+		#endregion
+
 		#region Public Instance Methods
 		public override string ToString() {
 			return "CreateParams {'" + class_name +