compactcode keeping software simple

<?xml version="1.0" encoding="utf-8"?>
<mx:HBox 
    xmlns:mx="http://www.adobe.com/2006/mxml" 
    xmlns:compact="com.compact.*">
    <compact:ClickModel id="model" />
    <mx:Button 
      id="button" 
      label="Increment" 
      click="model.incrementClickCount()"/>
</mx:HBox>

package com.compact {
    public class ClickModel {
      public var clickCount:int = 0;
      public function incrementClickCount(): void {
        clickCount++;
      }
    }
}

package com.compact {
    import flash.events.MouseEvent;	
    import flexunit.framework.TestCase;
    public class ClickTest extends TestCase {
      private var _form:ClickForm;
      override public function setUp():void {
        _form = new ClickForm();
        _form.initialize();
      }
      public function testClickingButtonIncrementsClickCount(): void {
        _form.button.dispatchEvent(new MouseEvent(MouseEvent.CLICK));
        assertEquals(1, _form.model.clickCount);
      }
    }
}

<?xml version="1.0" encoding="utf-8"?>
<mx:HBox 
    xmlns:mx="http://www.adobe.com/2006/mxml" 
    xmlns:compact="com.compact.*">
    <compact:SelectionModel id="model"/>
    <mx:List 
      id="listView" 
      dataProvider="{model.list}" 
      change="model.selected = listView.selectedItem"/>
</mx:HBox>

package com.compact {
    import mx.collections.ArrayCollection;
    [Bindable]
    public class SelectionModel {
        public var list:ArrayCollection = new ArrayCollection();
        public var selected:Object;
    }
}

package com.compact {
    import flexunit.framework.TestCase;
    import mx.events.ListEvent;
 
    public class SelectionTest extends TestCase {
      private var _form:SelectionForm;
      override public function setUp():void {
        _form = new SelectionForm();
        _form.initialize();
      }
      public function testListViewSelectionUpdatesModel(): void {
        var itemOne:Object = new Object();
        var itemTwo:Object = new Object();
        _form.model.list.addItem(itemOne);
        _form.model.list.addItem(itemTwo);
        _form.listView.selectedItem = itemTwo;
        _form.listView.dispatchEvent(new ListEvent(ListEvent.CHANGE));
        assertEquals(itemTwo, _form.model.selected);
      }
    }
}

<?xml version="1.0" encoding="utf-8"?>
<mx:HBox 
    xmlns:mx="http://www.adobe.com/2006/mxml" 
    xmlns:compact="com.compact.*">
    <compact:DataGridModel id="model" />
    <mx:DataGrid id="customerGrid" dataProvider="{model.customers}">
      <mx:columns>
        <mx:DataGridColumn id="nameCol" dataField="name"/>
        <mx:DataGridColumn 
          id="birthCol" 
          dataField="birth" 
          labelFunction="model.formatBirth"/>
       </mx:columns>
    </mx:DataGrid>
</mx:HBox>

package com.compact {
  import mx.collections.ArrayCollection;
  import mx.controls.dataGridClasses.DataGridColumn;
  import mx.formatters.DateFormatter;
 
  [Bindable]
  public class DataGridModel {
    [ArrayElementType("com.compact.Customer")]
    public var customers:ArrayCollection = new ArrayCollection();
    private var _format:DateFormatter = new DateFormatter();
    public function formatBirth(item:Object, col:DataGridColumn): String 
      _format.formatString = "MMMM/YYYY";
      return _format.format(item.birth);
    }
  }
}

package com.compact {
  [Bindable]
  public class Customer {
    public var name:String
    public var birth:Date;
  }
}

package com.compact {
  import flexunit.framework.TestCase;
 
  public class DataGridTest extends TestCase {
    private var _form:DataGridForm;
    override public function setUp():void {
      _form = new DataGridForm();
      _form.initialize();
      // Initializes the datagrid columns.
      _form.customerGrid.validateProperties();
    }
    public function testNameIsRenderedAsIs(): void {
      var customer:Customer = new Customer();
      customer.name = "foo";
      assertEquals("foo", _form.nameCol.itemToLabel(customer));
    }
    public function testBirthIsRenderedUsingDateFormat(): void {
      var customer:Customer = new Customer();
      customer.birth = new Date(2000, 0, 1);
      assertEquals("January/2000", _form.birthCol.itemToLabel(customer));
    }
  }
}

<?xml version="1.0" encoding="utf-8"?>
<mx:VBox xmlns:mx="http://www.adobe.com/2006/mxml" model="com.compact.*">
    <model:CustomerEditModel id="model" />
    <mx:Form width="100%">
        <mx:FormItem label="Name">
          <mx:TextInput id="nameText" text="{model.name}"/>
        </mx:FormItem>
        <mx:FormItem label="Age">
          <mx:TextInput id="ageText" text="{model.age}"/>
        </mx:FormItem>
    </mx:Form>
</mx:VBox>

package com.compact {
    [Bindable]
    public class CustomerEditModel {
      public var name:String;
      public var age:int;
    }
}

package com.compact {
    import flexunit.framework.TestCase;
    public class CustomerEditFormTest extends TestCase {
      private var _form:CustomerEditForm;
      override public function setUp():void {
        _form = new CustomerEditForm();
        _form.initialize();
      }
      public function testChangingModelNameUpdatesNameText(): void {
        _form.model.name = "fred";
        assertEquals("fred", _form.nameText.text);
      }
      public function testChangingModelAgeUpdatesAgeText(): void {
        _form.model.age = 25;
        assertEquals("25", _form.ageText.text);
      }
    }
}

    public function testAgeTextValidWhenTextContainsOnlyNumbers(): void {
      _form.ageText.text = "25";
      assertEquals("", _form.nameText.errorString);
    }
    public function testAgeTextInvalidWhenTextContainsLetters(): void {
      var expected:String = "The input contains invalid characters.";
      _form.ageText.text = "twenty  five";
      assertEquals(expected, _form.ageText.errorString);
    }

    <mx:NumberValidator source="{ageText}" property="text" />