mcs/class/System.Windows.Forms/WINELib/FormTest.cs

   1 using System;
   2 using System.Windows.Forms;
   3
   4 // Test basic functionality of the Application and Form class
   5 class FormTest : Form {
   6
   7         Label label;
   8         Button button;
   9
  10         public FormTest () : base ()
  11         {
  12                 label = new Label ();
  13                 label.Top = 50;
  14                 label.Left = 10;
  15                 label.Width = 50;
  16                 label.Height = 50;
  17                 label.Parent = this;
  18                 label.Text = "Label";
  19
  20                 button = new Button ();
  21                 button.Top = 50;
  22                 button.Left = 120;
  23                 button.Width = 50;
  24                 button.Height = 50;
  25                 button.Parent = this;
  26                 button.Text = "Button";
  27         }
  28
  29         // - verifies the WndProc can be overridden propery
  30         // - verifies the Application.MessageLoop is working properly
  31         protected override void WndProc (ref Message m)
  32         {
  33                 base.WndProc (ref m);
  34
  35                 // should be true after the Run command is reached
  36                 Console.WriteLine ("Application.MessageLoop: " +
  37                                    Application.MessageLoop);
  38         }
  39
  40         public class MouseMoveMessageFilter : IMessageFilter {
  41
  42                 public bool PreFilterMessage(ref Message m)
  43                 {
  44                         Console.WriteLine ("PreFilter(ing) message");
  45
  46                         if (m.Msg == Win32.WM_MOUSEMOVE) {
  47                                 Console.WriteLine ("captured mousemove");
  48                                 return true;
  49                         }
  50                         return false;
  51                 }
  52         }
  53
  54
  55         static public void Test1 ()
  56         {
  57                 MessageBox.Show ("test derived form");
  58                 FormTest form = new FormTest ();
  59                 MouseMoveMessageFilter f = new MouseMoveMessageFilter();
  60                 Application.AddMessageFilter (f);
  61
  62                 // should be false
  63                 Console.WriteLine ("Application.MessageLoop: " +
  64                                    Application.MessageLoop);
  65
  66                 Application.Run (form);
  67                 Application.RemoveMessageFilter (f);
  68         }
  69
  70         static public void Test2 ()
  71         {
  72                 MessageBox.Show ("test non-derived form, ctrl-c from console to quit");
  73                 Form form = new Form ();
  74                 form.Show ();
  75                 Application.DoEvents ();
  76                 Application.Run ();
  77         }
  78
  79         static public int Main (String[] args)
  80         {
  81                 Test1();
  82                 //Test2();
  83                 return 0;
  84         }
  85 }