Como percorrer todas as colunas de um DataGrid e exibir seus títulos e o nome do campo correspondente no dataProvider

<?xml version="1.0" encoding="iso-8859-1"?>

<!--
  Este exemplo mostra como percorrer todas as colunas 
  de um DataGrid e exibir seus títulos e o nome do
  campo correspondente no dataProvider. 
-->

<mx:Application xmlns:mx="http://www.adobe.com/2006/mxml"
  creationComplete="creationCompleteHandler(event)">

  <mx:Panel id="painel" title="Estudos" status="Active" 
     height="300" width="400" paddingTop="10" 
     paddingLeft="10" paddingRight="10" 
     paddingBottom="10">

    <mx:DataGrid id="grid">
      <mx:columns>
        <mx:DataGridColumn headerText="Cidade" 
           dataField="cidade"/>
        <mx:DataGridColumn headerText="Estado"  
           dataField="estado"/>
        <mx:DataGridColumn headerText="População"  
           dataField="populacao"/>
      </mx:columns>
    </mx:DataGrid>

    <mx:Button label="Informações das Colunas" 
       click="infoColunas()"/>
  
  </mx:Panel>

  <mx:Script>
    <![CDATA[
      import mx.collections.ArrayCollection;
      import mx.controls.Alert;      
 
      private function creationCompleteHandler(
          event:Event):void{
        var aCidades:Array = new Array(
          {cidade: "Goiânia",
          estado: "GO", populacao: 2564334},
          {cidade: "Cuiabá",
          estado: "MT", populacao: 598122},
          {cidade: "Curitiba",
          estado: "PR", populacao: 4876923});

        var cidades:ArrayCollection = new 
          ArrayCollection(aCidades);
        grid.dataProvider = cidades;
      }

      private function infoColunas():void{
        var colunas:int = grid.columns.length;
        var res:String = "Informações das colunas:\n\n"

        for(var i:int = 0; i < colunas; i++){
          res += (i + 1) + "ª Coluna: Título = " +
            grid.columns[i].headerText + "; Campo: " +
            grid.columns[i].dataField + "\n";
        }

        Alert.show(res);
      }
    ]]>
  </mx:Script>

</mx:Application>