mcs/class/Managed.Windows.Forms/Test/System.Windows.Forms/FocusTest.cs

   1 //
   2 // Copyright (c) 2006 Novell, Inc.
   3 //
   4 // Authors:
   5 //      Jackson Harper  (jackson@ximian.com)
   6 //
   7
   8 using System;
   9 using System.Windows.Forms;
  10
  11 using NUnit.Framework;
  12
  13 namespace MonoTests.System.Windows.Forms {
  14
  15         [TestFixture]
  16         public class FocusTest {
  17
  18                 public class ControlPoker : Button {
  19
  20                         internal bool directed_select_called;
  21
  22                         public ControlPoker ()
  23                         {
  24                         }
  25
  26                         public ControlPoker (string text)
  27                         {
  28                                 Text = text;
  29                         }
  30
  31                         public void _Select (bool directed, bool forward)
  32                         {
  33                                 Select (directed, forward);
  34                         }
  35
  36                         protected override void Select (bool directed, bool forward)
  37                         {
  38                                 directed_select_called = true;
  39                                 base.Select (directed, forward);
  40                         }
  41
  42                 }
  43
  44                 private ControlPoker [] flat_controls;
  45
  46                 public class ContainerPoker : ContainerControl {
  47
  48                         public ContainerPoker (string s)
  49                         {
  50                                 Text = s;
  51                         }
  52
  53                         public void _Select (bool directed, bool forward)
  54                         {
  55                                 Select (directed, forward);
  56                         }
  57
  58                         public override string ToString ()
  59                         {
  60                                 return String.Concat (GetType (), " ", Text);
  61                         }
  62                 }
  63
  64                 public class GroupBoxPoker: GroupBox {
  65
  66                         public GroupBoxPoker (string s)
  67                         {
  68                                 Text = s;
  69                         }
  70
  71                         public void _Select (bool directed, bool forward)
  72                         {
  73                                 Select (directed, forward);
  74                         }
  75
  76                         public override string ToString ()
  77                         {
  78                                 return String.Concat (GetType (), " ", Text);
  79                         }
  80                 }
  81
  82                 [SetUp]
  83                 protected virtual void SetUp ()
  84                 {
  85                         flat_controls = null;
  86
  87                         flat_controls = new ControlPoker [] {
  88                                 new ControlPoker (), new ControlPoker (), new ControlPoker ()
  89                         };
  90
  91                         for (int i = 0; i < flat_controls.Length; i++)
  92                                 flat_controls [i].Text = i.ToString ();
  93                 }
  94
  95                 [Test]
  96                 public void ControlSelectNextFlatTest ()
  97                 {
  98                         Form form = new Form ();
  99
 100                         form.Controls.AddRange (flat_controls);
 101                         form.Show ();
 102
 103                         Assert.IsTrue (flat_controls [0].Focused, "sanity-1");
 104                         Assert.AreEqual (flat_controls [0], form.ActiveControl, "sanity-2");
 105
 106                         form.SelectNextControl (flat_controls [0], true, false, false, false);
 107                         Assert.IsFalse (flat_controls [0].Focused, "A1");
 108                         Assert.IsTrue (flat_controls [1].Focused, "A2");
 109                         Assert.IsFalse (flat_controls [2].Focused, "A3");
 110                         Assert.AreEqual (flat_controls [1], form.ActiveControl, "A4");
 111
 112                         form.SelectNextControl (flat_controls [1], true, false, false, false);
 113                         Assert.IsFalse (flat_controls [0].Focused, "A5");
 114                         Assert.IsFalse (flat_controls [1].Focused, "A6");
 115                         Assert.IsTrue (flat_controls [2].Focused, "A7");
 116                         Assert.AreEqual (flat_controls [2], form.ActiveControl, "A8");
 117
 118                         // Can't select anymore because we aren't wrapping
 119                         form.SelectNextControl (flat_controls [2], true, false, false, false);
 120                         Assert.IsFalse (flat_controls [0].Focused, "A9");
 121                         Assert.IsFalse (flat_controls [1].Focused, "A10");
 122                         Assert.IsTrue (flat_controls [2].Focused, "A11");
 123                         Assert.AreEqual (flat_controls [2], form.ActiveControl, "A12");
 124
 125                         form.SelectNextControl (flat_controls [2], true, false, false, true);
 126                         Assert.IsTrue (flat_controls [0].Focused, "A13");
 127                         Assert.IsFalse (flat_controls [1].Focused, "A14");
 128                         Assert.IsFalse (flat_controls [2].Focused, "A15");
 129                         Assert.AreEqual (flat_controls [0], form.ActiveControl, "A16");
 130                 }
 131
 132                 [Test]
 133                 public void SelectNextControlNullTest ()
 134                 {
 135                         Form form = new Form ();
 136
 137                         form.Show ();
 138                         form.Controls.AddRange (flat_controls);
 139
 140                         form.SelectNextControl (null, true, false, false, false);
 141                         Assert.IsTrue (flat_controls [0].Focused, "A1");
 142                         Assert.IsFalse (flat_controls [1].Focused, "A2");
 143                         Assert.IsFalse (flat_controls [2].Focused, "A3");
 144                         Assert.AreEqual (flat_controls [0], form.ActiveControl, "A4");
 145
 146                         form.SelectNextControl (null, true, false, false, false);
 147                         Assert.IsTrue (flat_controls [0].Focused, "A5");
 148                         Assert.IsFalse (flat_controls [1].Focused, "A6");
 149                         Assert.IsFalse (flat_controls [2].Focused, "A7");
 150                         Assert.AreEqual (flat_controls [0], form.ActiveControl, "A8");
 151                 }
 152
 153                 [Test]
 154                 public void SelectControlTest ()
 155                 {
 156                         Form form = new Form ();
 157
 158                         form.Show ();
 159                         form.Controls.AddRange (flat_controls);
 160
 161                         flat_controls [0]._Select (false, false);
 162                         Assert.AreEqual (flat_controls [0], form.ActiveControl, "A1");
 163
 164                         flat_controls [0]._Select (true, false);
 165                         Assert.AreEqual (flat_controls [0], form.ActiveControl, "A2");
 166
 167                         flat_controls [0]._Select (true, true);
 168                         Assert.AreEqual (flat_controls [0], form.ActiveControl, "A3");
 169                 }
 170
 171                 [Test]
 172                 public void EnsureDirectedSelectUsed ()
 173                 {
 174                         Form form = new Form ();
 175
 176                         form.Show ();
 177                         form.Controls.AddRange (flat_controls);
 178
 179                         form.SelectNextControl (null, true, false, false, false);
 180                         Assert.IsTrue (flat_controls [0].directed_select_called, "A1");
 181                 }
 182
 183                 [Test]
 184                 public void ContainerSelectDirectedForward ()
 185                 {
 186                         Form form = new Form ();
 187                         ContainerPoker cp = new ContainerPoker ("container-a");
 188
 189                         form.Show ();
 190                         form.Controls.Add (cp);
 191
 192                         cp.Controls.AddRange (flat_controls);
 193
 194                         cp._Select (true, true);
 195                         Assert.IsTrue (flat_controls [0].Focused, "A1");
 196                         Assert.IsFalse (flat_controls [1].Focused, "A2");
 197                         Assert.IsFalse (flat_controls [2].Focused, "A3");
 198                         Assert.AreEqual (flat_controls [0], cp.ActiveControl, "A4");
 199                         Assert.AreEqual (cp, form.ActiveControl, "A5");
 200
 201                         // Should select the first one again
 202                         cp._Select (true, true);
 203                         Assert.IsTrue (flat_controls [0].Focused, "A6");
 204                         Assert.IsFalse (flat_controls [1].Focused, "A7");
 205                         Assert.IsFalse (flat_controls [2].Focused, "A8");
 206                         Assert.AreEqual (flat_controls [0], cp.ActiveControl, "A9");
 207                         Assert.AreEqual (cp, form.ActiveControl, "A10");
 208                 }
 209
 210                 [Test]
 211                 public void ContainerSelectDirectedBackward ()
 212                 {
 213                         Form form = new Form ();
 214                         ContainerPoker cp = new ContainerPoker ("container-a");
 215
 216                         form.Show ();
 217                         form.Controls.Add (cp);
 218
 219                         cp.Controls.AddRange (flat_controls);
 220
 221                         cp._Select (true, false);
 222                         Assert.IsFalse (flat_controls [0].Focused, "A1");
 223                         Assert.IsFalse (flat_controls [1].Focused, "A2");
 224                         Assert.IsTrue (flat_controls [2].Focused, "A3");
 225                         Assert.AreEqual (flat_controls [2], cp.ActiveControl, "A4");
 226                         Assert.AreEqual (cp, form.ActiveControl, "A5");
 227
 228                         // Should select the first one again
 229                         cp._Select (true, false);
 230                         Assert.IsFalse (flat_controls [0].Focused, "A6");
 231                         Assert.IsFalse (flat_controls [1].Focused, "A7");
 232                         Assert.IsTrue (flat_controls [2].Focused, "A8");
 233                         Assert.AreEqual (flat_controls [2], cp.ActiveControl, "A9");
 234                         Assert.AreEqual (cp, form.ActiveControl, "A10");
 235                 }
 236
 237                 [Test]
 238                 public void ContainerSelectUndirectedForward ()
 239                 {
 240                         Form form = new Form ();
 241                         ContainerPoker cp = new ContainerPoker ("container-a");
 242
 243                         form.Show ();
 244                         form.Controls.Add (cp);
 245
 246                         cp.Controls.AddRange (flat_controls);
 247
 248                         cp._Select (false, true);
 249                         Assert.IsFalse (flat_controls [0].Focused, "A1");
 250                         Assert.IsFalse (flat_controls [1].Focused, "A2");
 251                         Assert.IsFalse (flat_controls [2].Focused, "A3");
 252                         Assert.AreEqual (null, cp.ActiveControl, "A4");
 253                         Assert.AreEqual (cp, form.ActiveControl, "A5");
 254                 }
 255
 256                 [Test]
 257                 public void GetNextControlFromForm ()
 258                 {
 259                         Form form = new Form ();
 260                         ContainerPoker con_a = new ContainerPoker ("container-a");
 261                         ContainerPoker con_b = new ContainerPoker ("container-b");
 262                         ContainerPoker con_c = new ContainerPoker ("container-c");
 263                         ControlPoker [] ctrls_a = new ControlPoker [] {
 264                                 new ControlPoker (), new ControlPoker (), new ControlPoker ()
 265                         };
 266                         ControlPoker [] ctrls_b = new ControlPoker [] {
 267                                 new ControlPoker (), new ControlPoker (), new ControlPoker ()
 268                         };
 269                         ControlPoker [] ctrls_c = new ControlPoker [] {
 270                                 new ControlPoker (), new ControlPoker (), new ControlPoker ()
 271                         };
 272
 273                         con_a.Controls.AddRange (ctrls_a);
 274                         con_b.Controls.AddRange (ctrls_b);
 275                         con_c.Controls.AddRange (ctrls_c);
 276
 277                         form.Controls.Add (con_a);
 278                         form.Controls.Add (con_b);
 279                         form.Controls.Add (con_c);
 280
 281                         form.Show ();
 282
 283                         // top level movement,
 284                         Assert.AreEqual (form.GetNextControl (form, true), con_a, "form-1");
 285                         Assert.AreEqual (form.GetNextControl (form, false), con_c, "form-2");
 286
 287                         Assert.AreEqual (form.GetNextControl (con_a, true), con_b, "container-1");
 288                         Assert.AreEqual (form.GetNextControl (con_a, false), null, "container-2");
 289                         Assert.AreEqual (form.GetNextControl (con_b, true), con_c, "container-3");
 290                         Assert.AreEqual (form.GetNextControl (con_b, false), con_a, "container-4");
 291                         Assert.AreEqual (form.GetNextControl (con_c, true), null, "container-5");
 292                         Assert.AreEqual (form.GetNextControl (con_c, false), con_b, "container-6");
 293
 294                         Assert.AreEqual (form.GetNextControl (ctrls_a [0], true), ctrls_a [1], "ctrls-a-1");
 295                         Assert.AreEqual (form.GetNextControl (ctrls_a [0], false), con_a, "ctrls-a-2");
 296                         Assert.AreEqual (form.GetNextControl (ctrls_a [1], true), ctrls_a [2], "ctrls-a-3");
 297                         Assert.AreEqual (form.GetNextControl (ctrls_a [1], false), ctrls_a [0], "ctrls-a-4");
 298                         Assert.AreEqual (form.GetNextControl (ctrls_a [2], true), con_b, "ctrls-a-5");
 299                         Assert.AreEqual (form.GetNextControl (ctrls_a [2], false), ctrls_a [1], "ctrls-a-6");
 300
 301                         Assert.AreEqual (form.GetNextControl (ctrls_b [0], true), ctrls_b [1], "ctrls-b-1");
 302                         Assert.AreEqual (form.GetNextControl (ctrls_b [0], false), con_b, "ctrls-b-2");
 303                         Assert.AreEqual (form.GetNextControl (ctrls_b [1], true), ctrls_b [2], "ctrls-b-3");
 304                         Assert.AreEqual (form.GetNextControl (ctrls_b [1], false), ctrls_b [0], "ctrls-b-4");
 305                         Assert.AreEqual (form.GetNextControl (ctrls_b [2], true), con_c, "ctrls-b-5");
 306                         Assert.AreEqual (form.GetNextControl (ctrls_b [2], false), ctrls_b [1], "ctrls-b-6");
 307
 308                         Assert.AreEqual (form.GetNextControl (ctrls_c [0], true), ctrls_c [1], "ctrls-c-1");
 309                         Assert.AreEqual (form.GetNextControl (ctrls_c [0], false), con_c, "ctrls-c-2");
 310                         Assert.AreEqual (form.GetNextControl (ctrls_c [1], true), ctrls_c [2], "ctrls-c-3");
 311                         Assert.AreEqual (form.GetNextControl (ctrls_c [1], false), ctrls_c [0], "ctrls-c-4");
 312                         Assert.AreEqual (form.GetNextControl (ctrls_c [2], true), null, "ctrls-c-5");
 313                         Assert.AreEqual (form.GetNextControl (ctrls_c [2], false), ctrls_c [1], "ctrls-c-6");
 314                 }
 315
 316                 [Test]
 317                 public void GetNextControlFromContainerA ()
 318                 {
 319                         Form form = new Form ();
 320                         ContainerPoker con_a = new ContainerPoker ("container-a");
 321                         ContainerPoker con_b = new ContainerPoker ("container-b");
 322                         ContainerPoker con_c = new ContainerPoker ("container-c");
 323                         ControlPoker [] ctrls_a = new ControlPoker [] {
 324                                 new ControlPoker ("ctrls-a-0"), new ControlPoker ("ctrls-a-1"), new ControlPoker ("ctrls-a-2")
 325                         };
 326                         ControlPoker [] ctrls_b = new ControlPoker [] {
 327                                 new ControlPoker ("ctrls-b-0"), new ControlPoker ("ctrls-b-1"), new ControlPoker ("ctrls-b-2")
 328                         };
 329                         ControlPoker [] ctrls_c = new ControlPoker [] {
 330                                 new ControlPoker ("ctrls-c-0"), new ControlPoker ("ctrls-c-1"), new ControlPoker ("ctrls-c-2")
 331                         };
 332
 333                         con_a.Controls.AddRange (ctrls_a);
 334                         con_b.Controls.AddRange (ctrls_b);
 335                         con_c.Controls.AddRange (ctrls_c);
 336
 337                         form.Controls.Add (con_a);
 338                         form.Controls.Add (con_b);
 339                         form.Controls.Add (con_c);
 340
 341                         form.Show ();
 342
 343                         // top level movement,
 344                         Assert.AreEqual (con_a.GetNextControl (form, true), ctrls_a [0], "form-1");
 345                         Assert.AreEqual (con_a.GetNextControl (form, false), ctrls_a [2], "form-2");
 346
 347                         Assert.AreEqual (con_a.GetNextControl (con_a, true), ctrls_a [0], "container-1");
 348                         Assert.AreEqual (con_a.GetNextControl (con_a, false), ctrls_a [2], "container-2");
 349                         Assert.AreEqual (con_a.GetNextControl (con_b, true), ctrls_a [0], "container-3");
 350                         Assert.AreEqual (con_a.GetNextControl (con_b, false), ctrls_a [2], "container-4");
 351                         Assert.AreEqual (con_a.GetNextControl (con_c, true), ctrls_a [0], "container-5");
 352                         Assert.AreEqual (con_a.GetNextControl (con_c, false), ctrls_a [2], "container-6");
 353
 354                         Assert.AreEqual (con_a.GetNextControl (ctrls_a [0], true), ctrls_a [1], "ctrls-a-1");
 355                         Assert.AreEqual (con_a.GetNextControl (ctrls_a [0], false), null, "ctrls-a-2");
 356                         Assert.AreEqual (con_a.GetNextControl (ctrls_a [1], true), ctrls_a [2], "ctrls-a-3");
 357                         Assert.AreEqual (con_a.GetNextControl (ctrls_a [1], false), ctrls_a [0], "ctrls-a-4");
 358                         Assert.AreEqual (con_a.GetNextControl (ctrls_a [2], true), null, "ctrls-a-5");
 359                         Assert.AreEqual (con_a.GetNextControl (ctrls_a [2], false), ctrls_a [1], "ctrls-a-6");
 360
 361                         Assert.AreEqual (con_a.GetNextControl (ctrls_b [0], true), ctrls_a [0], "ctrls-b-1");
 362                         Assert.AreEqual (con_a.GetNextControl (ctrls_b [0], false), ctrls_a [2], "ctrls-b-2");
 363                         Assert.AreEqual (con_a.GetNextControl (ctrls_b [1], true), ctrls_a [0], "ctrls-b-3");
 364                         Assert.AreEqual (con_a.GetNextControl (ctrls_b [1], false), ctrls_a [2], "ctrls-b-4");
 365                         Assert.AreEqual (con_a.GetNextControl (ctrls_b [2], true), ctrls_a [0], "ctrls-b-5");
 366                         Assert.AreEqual (con_a.GetNextControl (ctrls_b [2], false), ctrls_a [2], "ctrls-b-6");
 367
 368                         Assert.AreEqual (con_a.GetNextControl (ctrls_c [0], true), ctrls_a [0], "ctrls-c-1");
 369                         Assert.AreEqual (con_a.GetNextControl (ctrls_c [0], false), ctrls_a [2], "ctrls-c-2");
 370                         Assert.AreEqual (con_a.GetNextControl (ctrls_c [1], true), ctrls_a [0], "ctrls-c-3");
 371                         Assert.AreEqual (con_a.GetNextControl (ctrls_c [1], false), ctrls_a [2], "ctrls-c-4");
 372                         Assert.AreEqual (con_a.GetNextControl (ctrls_c [2], true), ctrls_a [0], "ctrls-c-5");
 373                         Assert.AreEqual (con_a.GetNextControl (ctrls_c [2], false), ctrls_a [2], "ctrls-c-6");
 374                 }
 375
 376                 [Test]
 377                 public void GetNextControlFromContainerB ()
 378                 {
 379                         Form form = new Form ();
 380                         ContainerPoker con_a = new ContainerPoker ("container-a");
 381                         ContainerPoker con_b = new ContainerPoker ("container-b");
 382                         ContainerPoker con_c = new ContainerPoker ("container-c");
 383                         ControlPoker [] ctrls_a = new ControlPoker [] {
 384                                 new ControlPoker ("ctrls-a-0"), new ControlPoker ("ctrls-a-1"), new ControlPoker ("ctrls-a-2")
 385                         };
 386                         ControlPoker [] ctrls_b = new ControlPoker [] {
 387                                 new ControlPoker ("ctrls-b-0"), new ControlPoker ("ctrls-b-1"), new ControlPoker ("ctrls-b-2")
 388                         };
 389                         ControlPoker [] ctrls_c = new ControlPoker [] {
 390                                 new ControlPoker ("ctrls-c-0"), new ControlPoker ("ctrls-c-1"), new ControlPoker ("ctrls-c-2")
 391                         };
 392
 393                         con_a.Controls.AddRange (ctrls_a);
 394                         con_b.Controls.AddRange (ctrls_b);
 395                         con_c.Controls.AddRange (ctrls_c);
 396
 397                         form.Controls.Add (con_a);
 398                         form.Controls.Add (con_b);
 399                         form.Controls.Add (con_c);
 400
 401                         form.Show ();
 402
 403                         // top level movement
 404                         Assert.AreEqual (con_b.GetNextControl (form, true), ctrls_b [0], "form-1");
 405                         Assert.AreEqual (con_b.GetNextControl (form, false), ctrls_b [2], "form-2");
 406
 407                         Assert.AreEqual (con_b.GetNextControl (con_a, true), ctrls_b [0], "container-1");
 408                         Assert.AreEqual (con_b.GetNextControl (con_a, false), ctrls_b [2], "container-2");
 409                         Assert.AreEqual (con_b.GetNextControl (con_b, true), ctrls_b [0], "container-3");
 410                         Assert.AreEqual (con_b.GetNextControl (con_b, false), ctrls_b [2], "container-4");
 411                         Assert.AreEqual (con_b.GetNextControl (con_c, true), ctrls_b [0], "container-5");
 412                         Assert.AreEqual (con_b.GetNextControl (con_c, false), ctrls_b [2], "container-6");
 413
 414                         Assert.AreEqual (con_b.GetNextControl (ctrls_a [0], true), ctrls_b [0], "ctrls-a-1");
 415                         Assert.AreEqual (con_b.GetNextControl (ctrls_a [0], false), ctrls_b [2], "ctrls-a-2");
 416                         Assert.AreEqual (con_b.GetNextControl (ctrls_a [1], true), ctrls_b [0], "ctrls-a-3");
 417                         Assert.AreEqual (con_b.GetNextControl (ctrls_a [1], false), ctrls_b [2], "ctrls-a-4");
 418                         Assert.AreEqual (con_b.GetNextControl (ctrls_a [2], true), ctrls_b [0], "ctrls-a-5");
 419                         Assert.AreEqual (con_b.GetNextControl (ctrls_a [2], false), ctrls_b [2], "ctrls-a-6");
 420
 421                         Assert.AreEqual (con_b.GetNextControl (ctrls_b [0], true), ctrls_b [1], "ctrls-b-1");
 422                         Assert.AreEqual (con_b.GetNextControl (ctrls_b [0], false), null, "ctrls-b-2");
 423                         Assert.AreEqual (con_b.GetNextControl (ctrls_b [1], true), ctrls_b [2], "ctrls-b-3");
 424                         Assert.AreEqual (con_b.GetNextControl (ctrls_b [1], false), ctrls_b [0], "ctrls-b-4");
 425                         Assert.AreEqual (con_b.GetNextControl (ctrls_b [2], true), null, "ctrls-b-5");
 426                         Assert.AreEqual (con_b.GetNextControl (ctrls_b [2], false), ctrls_b [1], "ctrls-b-6");
 427
 428                         Assert.AreEqual (con_b.GetNextControl (ctrls_c [0], true), ctrls_b [0], "ctrls-c-1");
 429                         Assert.AreEqual (con_b.GetNextControl (ctrls_c [0], false), ctrls_b [2], "ctrls-c-2");
 430                         Assert.AreEqual (con_b.GetNextControl (ctrls_c [1], true), ctrls_b [0], "ctrls-c-3");
 431                         Assert.AreEqual (con_b.GetNextControl (ctrls_c [1], false), ctrls_b [2], "ctrls-c-4");
 432                         Assert.AreEqual (con_b.GetNextControl (ctrls_c [2], true), ctrls_b [0], "ctrls-c-5");
 433                         Assert.AreEqual (con_b.GetNextControl (ctrls_c [2], false), ctrls_b [2], "ctrls-c-6");
 434                 }
 435
 436                 [Test]
 437                 public void GetNextControlFromContainerC ()
 438                 {
 439                         Form form = new Form ();
 440                         ContainerPoker con_a = new ContainerPoker ("container-a");
 441                         ContainerPoker con_b = new ContainerPoker ("container-b");
 442                         ContainerPoker con_c = new ContainerPoker ("container-c");
 443                         ControlPoker [] ctrls_a = new ControlPoker [] {
 444                                 new ControlPoker ("ctrls-a-0"), new ControlPoker ("ctrls-a-1"), new ControlPoker ("ctrls-a-2")
 445                         };
 446                         ControlPoker [] ctrls_b = new ControlPoker [] {
 447                                 new ControlPoker ("ctrls-b-0"), new ControlPoker ("ctrls-b-1"), new ControlPoker ("ctrls-b-2")
 448                         };
 449                         ControlPoker [] ctrls_c = new ControlPoker [] {
 450                                 new ControlPoker ("ctrls-c-0"), new ControlPoker ("ctrls-c-1"), new ControlPoker ("ctrls-c-2")
 451                         };
 452
 453                         con_a.Controls.AddRange (ctrls_a);
 454                         con_b.Controls.AddRange (ctrls_b);
 455                         con_c.Controls.AddRange (ctrls_c);
 456
 457                         form.Controls.Add (con_a);
 458                         form.Controls.Add (con_b);
 459                         form.Controls.Add (con_c);
 460
 461                         form.Show ();
 462
 463                         // top level movement,
 464                         Assert.AreEqual (con_c.GetNextControl (form, true), ctrls_c [0], "form-1");
 465                         Assert.AreEqual (con_c.GetNextControl (form, false), ctrls_c [2], "form-2");
 466
 467                         Assert.AreEqual (con_c.GetNextControl (con_a, true), ctrls_c [0], "container-1");
 468                         Assert.AreEqual (con_c.GetNextControl (con_a, false), ctrls_c [2], "container-2");
 469                         Assert.AreEqual (con_c.GetNextControl (con_b, true), ctrls_c [0], "container-3");
 470                         Assert.AreEqual (con_c.GetNextControl (con_b, false), ctrls_c [2], "container-4");
 471                         Assert.AreEqual (con_c.GetNextControl (con_c, true), ctrls_c [0], "container-5");
 472                         Assert.AreEqual (con_c.GetNextControl (con_c, false), ctrls_c [2], "container-6");
 473
 474                         Assert.AreEqual (con_c.GetNextControl (ctrls_a [0], true), ctrls_c [0], "ctrls-a-1");
 475                         Assert.AreEqual (con_c.GetNextControl (ctrls_a [0], false), ctrls_c [2], "ctrls-a-2");
 476                         Assert.AreEqual (con_c.GetNextControl (ctrls_a [1], true), ctrls_c [0], "ctrls-a-3");
 477                         Assert.AreEqual (con_c.GetNextControl (ctrls_a [1], false), ctrls_c [2], "ctrls-a-4");
 478                         Assert.AreEqual (con_c.GetNextControl (ctrls_a [2], true), ctrls_c [0], "ctrls-a-5");
 479                         Assert.AreEqual (con_c.GetNextControl (ctrls_a [2], false), ctrls_c [2], "ctrls-a-6");
 480
 481                         Assert.AreEqual (con_c.GetNextControl (ctrls_b [0], true), ctrls_c [0], "ctrls-b-1");
 482                         Assert.AreEqual (con_c.GetNextControl (ctrls_b [0], false), ctrls_c [2], "ctrls-b-2");
 483                         Assert.AreEqual (con_c.GetNextControl (ctrls_b [1], true), ctrls_c [0], "ctrls-b-3");
 484                         Assert.AreEqual (con_c.GetNextControl (ctrls_b [1], false), ctrls_c [2], "ctrls-b-4");
 485                         Assert.AreEqual (con_c.GetNextControl (ctrls_b [2], true), ctrls_c [0], "ctrls-b-5");
 486                         Assert.AreEqual (con_c.GetNextControl (ctrls_b [2], false), ctrls_c [2], "ctrls-b-6");
 487
 488                         Assert.AreEqual (con_c.GetNextControl (ctrls_c [0], true), ctrls_c [1], "ctrls-c-1");
 489                         Assert.AreEqual (con_c.GetNextControl (ctrls_c [0], false), null, "ctrls-c-2");
 490                         Assert.AreEqual (con_c.GetNextControl (ctrls_c [1], true), ctrls_c [2], "ctrls-c-3");
 491                         Assert.AreEqual (con_c.GetNextControl (ctrls_c [1], false), ctrls_c [0], "ctrls-c-4");
 492                         Assert.AreEqual (con_c.GetNextControl (ctrls_c [2], true), null, "ctrls-c-5");
 493                         Assert.AreEqual (con_c.GetNextControl (ctrls_c [2], false), ctrls_c [1], "ctrls-c-6");
 494                 }
 495
 496                 [Test]
 497                 public void GetNextControl2FromForm ()
 498                 {
 499                         Form form = new Form ();
 500                         ContainerPoker con_a = new ContainerPoker ("container-a");
 501                         ContainerPoker con_b = new ContainerPoker ("container-b");
 502                         ContainerPoker con_c = new ContainerPoker ("container-c");
 503                         ControlPoker [] ctrls_a = new ControlPoker [] {
 504                                 new ControlPoker ("ctrls-a-0"), new ControlPoker ("ctrls-a-1"), new ControlPoker ("ctrls-a-2")
 505                         };
 506                         ControlPoker ctrl_b = new ControlPoker ("ctrl-b");
 507
 508                         con_a.Controls.AddRange (ctrls_a);
 509
 510                         form.Controls.Add (con_a);
 511                         form.Controls.Add (ctrl_b);
 512
 513                         form.Show ();
 514
 515                         // top level movement,
 516                         Assert.AreEqual (form.GetNextControl (form, true), con_a, "form-1");
 517                         Assert.AreEqual (form.GetNextControl (form, false), ctrl_b, "form-2");
 518
 519                         Assert.AreEqual (form.GetNextControl (con_a, true), ctrl_b, "con-a-1");
 520                         Assert.AreEqual (form.GetNextControl (con_a, false), null, "con-a-2");
 521
 522                         Assert.AreEqual (form.GetNextControl (ctrl_b, true), null, "ctrl-b-1");
 523                         Assert.AreEqual (form.GetNextControl (ctrl_b, false), con_a, "ctrl-b-2");
 524
 525                         Assert.AreEqual (form.GetNextControl (ctrls_a [0], true), ctrls_a [1], "ctrl-a-1");
 526                         Assert.AreEqual (form.GetNextControl (ctrls_a [0], false), con_a, "ctrl-a-2");
 527                         Assert.AreEqual (form.GetNextControl (ctrls_a [1], true), ctrls_a [2], "ctrl-a-1");
 528                         Assert.AreEqual (form.GetNextControl (ctrls_a [1], false), ctrls_a [0], "ctrl-a-2");
 529                         Assert.AreEqual (form.GetNextControl (ctrls_a [2], true), ctrl_b, "ctrl-a-1");
 530                         Assert.AreEqual (form.GetNextControl (ctrls_a [2], false), ctrls_a [1], "ctrl-a-2");
 531
 532                 }
 533
 534                 [Test]
 535                 public void GetNextControlFlat ()
 536                 {
 537                         Form form = new Form ();
 538
 539                         form.Controls.AddRange (flat_controls);
 540                         form.Show ();
 541
 542                         Assert.AreEqual (form.GetNextControl (null, true), flat_controls [0], "form-1");
 543                         Assert.AreEqual (form.GetNextControl (null, false), flat_controls [2], "form-2");
 544                         Assert.AreEqual (form.GetNextControl (flat_controls [0], true), flat_controls [1], "form-3");
 545                         Assert.AreEqual (form.GetNextControl (flat_controls [0], false), null, "form-4");
 546                         Assert.AreEqual (form.GetNextControl (flat_controls [1], true), flat_controls [2], "form-5");
 547                         Assert.AreEqual (form.GetNextControl (flat_controls [1], false), flat_controls [0], "form-6");
 548                         Assert.AreEqual (form.GetNextControl (flat_controls [2], true), null, "form-7");
 549                         Assert.AreEqual (form.GetNextControl (flat_controls [2], false), flat_controls [1],"form-8");
 550
 551
 552                         Assert.AreEqual (flat_controls [0].GetNextControl (null, true), null, "ctrls-0-1");
 553                         Assert.AreEqual (flat_controls [0].GetNextControl (null, false), null, "ctrls-0-2");
 554                         Assert.AreEqual (flat_controls [0].GetNextControl (flat_controls [0], true), null, "ctrls-0-3");
 555                         Assert.AreEqual (flat_controls [0].GetNextControl (flat_controls [0], false), null, "ctrls-0-4");
 556                         Assert.AreEqual (flat_controls [0].GetNextControl (flat_controls [1], true), null, "ctrls-0-5");
 557                         Assert.AreEqual (flat_controls [0].GetNextControl (flat_controls [1], false), null, "ctrls-0-6");
 558                         Assert.AreEqual (flat_controls [0].GetNextControl (flat_controls [2], true), null, "ctrls-0-7");
 559                         Assert.AreEqual (flat_controls [0].GetNextControl (flat_controls [2], false), null,"ctrls-0-8");
 560                 }
 561
 562                 [Test]
 563                 public void GetNextGroupBoxControlFlat ()
 564                 {
 565                         Form form = new Form ();
 566                         GroupBoxPoker gbp = new GroupBoxPoker ("group-box");
 567
 568                         gbp.Controls.AddRange (flat_controls);
 569                         form.Controls.Add (gbp);
 570                         form.Show ();
 571
 572                         Assert.AreEqual (form.GetNextControl (null, true), gbp, "form-1");
 573                         Assert.AreEqual (form.GetNextControl (null, false), flat_controls [2], "form-2");
 574
 575                         Assert.AreEqual (form.GetNextControl (gbp, true), flat_controls [0], "gb-1");
 576                         Assert.AreEqual (form.GetNextControl (gbp, false), null, "gb-2");
 577
 578                         Assert.AreEqual (gbp.GetNextControl (null, true), flat_controls [0], "gb-3");
 579                         Assert.AreEqual (gbp.GetNextControl (null, false), flat_controls [2], "gb-4");
 580                         Assert.AreEqual (gbp.GetNextControl (gbp, true), flat_controls [0], "gb-5");
 581                         Assert.AreEqual (gbp.GetNextControl (gbp, false), flat_controls [2], "gb-6");
 582                 }
 583
 584                 [Test]
 585                 public void GetNextControlFromTabControl ()
 586                 {
 587                         Form form = new Form ();
 588                         TabControl tab = new TabControl ();
 589                         TabPage page1 = new TabPage ("page one");
 590                         TabPage page2 = new TabPage ("page two");
 591
 592                         tab.TabPages.Add (page1);
 593                         tab.TabPages.Add (page2);
 594
 595                         form.Controls.Add (tab);
 596                         form.Show ();
 597
 598                         Assert.AreEqual (form.GetNextControl (null, true), tab, "form-1");
 599                         Assert.AreEqual (form.GetNextControl (null, false), page2, "form-2");
 600
 601                         Assert.AreEqual (form.GetNextControl (tab, true), page1, "tab-1");
 602                         Assert.AreEqual (form.GetNextControl (tab, false), null, "tab-2");
 603
 604                         Assert.AreEqual (form.GetNextControl (page1, true), page2, "page-one-1");
 605                         Assert.AreEqual (form.GetNextControl (page1, false), tab, "page-one-2");
 606
 607                         Assert.AreEqual (form.GetNextControl (page2, true), null, "page-two-1");
 608                         Assert.AreEqual (form.GetNextControl (page2, false), page1, "page-two-2");
 609                 }
 610
 611                 [Test]
 612                 public void GetNextControlTabIndex ()
 613                 {
 614                         Form form = new Form ();
 615                         ControlPoker [] ctrls = new ControlPoker [5];
 616
 617                         for (int i = 0; i < 5; i++) {
 618                                 ctrls [i] = new ControlPoker ();
 619                                 ctrls [i].TabIndex = i;
 620                                 ctrls [i].Text = "ctrl " + i;
 621                         }
 622
 623                         form.Controls.AddRange (ctrls);
 624                         form.Show ();
 625
 626                         Assert.AreEqual (form.GetNextControl (null, true), ctrls [0], "A1");
 627                         Assert.AreEqual (form.GetNextControl (null, false), ctrls [4], "A2");
 628
 629                         Assert.AreEqual (form.GetNextControl (ctrls [0], true), ctrls [1], "A3");
 630                         Assert.AreEqual (form.GetNextControl (ctrls [0], false), null, "A4");
 631
 632                         Assert.AreEqual (form.GetNextControl (ctrls [1], true), ctrls [2], "A5");
 633                         Assert.AreEqual (form.GetNextControl (ctrls [1], false), ctrls [0], "A6");
 634
 635                         Assert.AreEqual (form.GetNextControl (ctrls [2], true), ctrls [3], "A7");
 636                         Assert.AreEqual (form.GetNextControl (ctrls [2], false), ctrls [1], "A8");
 637
 638                         Assert.AreEqual (form.GetNextControl (ctrls [3], true), ctrls [4], "A9");
 639                         Assert.AreEqual (form.GetNextControl (ctrls [3], false), ctrls [2], "A10");
 640
 641                         Assert.AreEqual (form.GetNextControl (ctrls [4], true), null, "A11");
 642                         Assert.AreEqual (form.GetNextControl (ctrls [4], false), ctrls [3], "A12");
 643
 644                 }
 645
 646                 [Test]
 647                 public void GetNextControlDuplicateTabIndex ()
 648                 {
 649                         Form form = new Form ();
 650                         ControlPoker [] ctrls = new ControlPoker [5];
 651
 652                         for (int i = 0; i < 5; i++) {
 653                                 ctrls [i] = new ControlPoker ();
 654                                 ctrls [i].TabIndex = i;
 655                                 ctrls [i].Text = "ctrl " + i;
 656                         }
 657
 658                         ctrls [3].TabIndex = 2;
 659
 660                         form.Controls.AddRange (ctrls);
 661                         form.Show ();
 662
 663                         Assert.AreEqual (form.GetNextControl (null, true), ctrls [0], "A1");
 664                         Assert.AreEqual (form.GetNextControl (null, false), ctrls [4], "A2");
 665
 666                         Assert.AreEqual (form.GetNextControl (ctrls [0], true), ctrls [1], "A3");
 667                         Assert.AreEqual (form.GetNextControl (ctrls [0], false), null, "A4");
 668
 669                         Assert.AreEqual (form.GetNextControl (ctrls [1], true), ctrls [2], "A5");
 670                         Assert.AreEqual (form.GetNextControl (ctrls [1], false), ctrls [0], "A6");
 671
 672                         Assert.AreEqual (form.GetNextControl (ctrls [2], true), ctrls [3], "A7");
 673                         Assert.AreEqual (form.GetNextControl (ctrls [2], false), ctrls [1], "A8");
 674
 675                         Assert.AreEqual (form.GetNextControl (ctrls [3], true), ctrls [4], "A9");
 676                         Assert.AreEqual (form.GetNextControl (ctrls [3], false), ctrls [2], "A10");
 677
 678                         Assert.AreEqual (form.GetNextControl (ctrls [4], true), null, "A11");
 679                         Assert.AreEqual (form.GetNextControl (ctrls [4], false), ctrls [3], "A12");
 680
 681                 }
 682
 683                 [Test]
 684                 public void GetNextControlComposite ()
 685                 {
 686                         Form form = new Form ();
 687                         ControlPoker a = new ControlPoker ("a");
 688                         ControlPoker b = new ControlPoker ("b");
 689                         ControlPoker c = new ControlPoker ("c");
 690
 691                         form.Controls.Add (a);
 692                         form.Controls.Add (b);
 693                         b.Controls.Add (c);
 694
 695                         form.Show ();
 696
 697                         Assert.AreEqual (form.GetNextControl (a, true), b, "form-1");
 698                         Assert.AreEqual (form.GetNextControl (a, false), null, "form-2");
 699                 }
 700
 701                 [Test]
 702                 public void FocusSetsActive ()
 703                 {
 704                         Form form = new Form ();
 705
 706                         form.Controls.AddRange (flat_controls);
 707                         form.Show ();
 708
 709                         Assert.AreEqual (form.ActiveControl, flat_controls [0], "A1");
 710
 711                         flat_controls [1].Focus ();
 712
 713                         Assert.AreEqual (form.ActiveControl, flat_controls [1], "A2");
 714                 }
 715         }
 716
 717 }
 718