flash on 2013-12-14

by marcsali
♥0 | Line 51 | Modified 2013-12-16 19:51:28 | MIT License
play

ActionScript3 source code

/**
 * Copyright marcsali ( http://wonderfl.net/user/marcsali )
 * MIT License ( http://www.opensource.org/licenses/mit-license.php )
 * Downloaded from: http://wonderfl.net/c/wqc2
 */

<?xml version="1.0" encoding="utf-8"?>
<s:Application xmlns:fx="http://ns.adobe.com/mxml/2009"
               xmlns:s="library://ns.adobe.com/flex/spark"
               xmlns:mx="library://ns.adobe.com/flex/mx"
               creationComplete="listerComposants()">
    <fx:Style>
        @namespace s "library://ns.adobe.com/flex/spark";
        @namespace mx "library://ns.adobe.com/flex/mx";
    
      global {
    font-size: 12;
    color: #AA0000;
    font-weight: normal;
    font-family: arial;
}
    </fx:Style>
<fx:Script>
<![CDATA[
// Importation des classes nécessaires
import mx.controls.Alert;
import mx.rpc.events.FaultEvent;
import mx.rpc.events.ResultEvent;
import mx.rpc.http.HTTPService;
// Procédure déclenchée à la fin de la création de l’application
public function listerComposants():void{
var serviceHttp:HTTPService = new HTTPService;
// Spécification de l’URL
serviceHttp.url = "listerProduits.php";
//Spécification du format des données reçues
serviceHttp.resultFormat = "e4x";
//Type de méthode d’envoi des données 
serviceHttp.method = "POST";
// Procédure à exécuter en cas de succès
serviceHttp.addEventListener(ResultEvent.RESULT,resultatOk);
// Procédure a exécuter en cas d’erreur
serviceHttp.addEventListener(FaultEvent.FAULT,resultatKo); 
// Exécution du service
serviceHttp.send();
}
// Procédure exécutée en cas de réception du résultat 
public function resultatOk(e:ResultEvent):void { 
// Récupération du résultat
var resultatXML:XML = e.result as XML;  
// Alimentation du dataProvider du DataGrid
grilleComposants.dataProvider = resultatXML.composant; 
}
public function resultatKo(e:FaultEvent):void { 
Alert.show("Erreur !");
} ]]> 
</fx:Script> 
 
<s:Panel title="My Title" width="500" height="650" >  
<s:layout>
     <s:VerticalLayout paddingLeft="10" paddingTop="20" />  
 </s:layout>
<mx:DataGrid id="grilleComposants"  resizeableColumns ="true"  x="10" y="10" width="300" rowCount="20">
        <mx:columns> 
        <mx:DataGridColumn headerText="Id"   dataField="id"  width="50"/>
        <mx:DataGridColumn headerText="Name" dataField="name"  width="100"/> 
        <mx:DataGridColumn headerText="Mail" dataField="email" width="100"/>  
        </mx:columns> 
</mx:DataGrid> 
</s:Panel>  
</s:Application>