Exportfile for AOT version 1.0 or later
Formatversion: 1

***Element: FRM

; Microsoft Dynamics AX Forms unloaded
; --------------------------------------------------------------------------------
FRMVERSION 5

FORM #JAEBaseForm
  PROPERTIES
    Name                #JAEBaseForm
  ENDPROPERTIES
  
  METHODS
    Version: 3
    SOURCE #init
      #public void init()
      #{
      #    super();
      #
      #    // Construyo una instancia de la clase manejadora asociada a
      #    // la instancia actual de este formulario
      #    baseFormMngr = JAEBaseForm_Mngr::construct(this);
      #}
    ENDSOURCE
    SOURCE #run
      #public void run()
      #{
      #    // Sobrecargo los métödos de control
      #    element.controlMethodOverload(true);
      #
      #    // ¿Dónde están los métödos de control?: Aquí mismo (this)
      #    element.controlMethodOverloadObject(baseFormMngr);
      #
      #    super();
      #
      #    // Crear los controles
      #    baseFormMngr.drawControls();
      #}
    ENDSOURCE
    SOURCE #classDeclaration
      #public class FormRun extends ObjectRun
      #{
      #    // Clase manejadora de eventos
      #    JAEBaseForm_Mngr    baseFormMngr;
      #}
    ENDSOURCE
  ENDMETHODS
  OBJECTBANK
    PROPERTIES
    ENDPROPERTIES
    
  ENDOBJECTBANK
  
  JOINS
  ENDJOINS
  
  DESIGN
    PROPERTIES
      Width               #Column width
      Height              #Column height
    ENDPROPERTIES
    
    CONTAINER
    ENDCONTAINER
    
  ENDDESIGN
  
ENDFORM


***Element: CLS

; Microsoft Dynamics AX Class: JAEBaseForm_Mngr descargados
; --------------------------------------------------------------------------------
  CLSVERSION 1
  
  CLASS #JAEBaseForm_Mngr
    PROPERTIES
      Name                #JAEBaseForm_Mngr
      Extends             #
      RunOn               #Called from
    ENDPROPERTIES
    
    METHODS
      Version: 3
      SOURCE #buttonDown_clicked
        #public void buttonDown_clicked()
        #{
        #    FormStringControl  fStringCtr = element.design().controlName('stringEditTexto');
        #    ;
        #
        #    fStringCtr.text("Abajo!");
        #}
      ENDSOURCE
      SOURCE #new
        #private void new(FormRun _formRun)
        #{
        #    element = _formRun;
        #}
      ENDSOURCE
      SOURCE #construct
        #public static JAEBaseForm_Mngr construct(FormRun _element)
        #{
        #    return new JAEBaseForm_Mngr(_element);
        #}
      ENDSOURCE
      SOURCE #drawControls
        #public void drawControls()
        #{
        #    FormButtonControl   fButtonCtr;
        #    FormStringControl   fStringCtr;
        #    ;
        #
        #    element.lock();
        #
        #    // Control de texto (StringEdit), en negrita, ancho total
        #    fStringCtr = element.design().addControl(FormControlType::String, 'stringEditTexto');
        #    fStringCtr.bold(10);
        #    fStringCtr.widthMode(FormWidth::ColumnWidth);
        #    fStringCtr.text("Ejemplo");
        #
        #    // Botón, con imagen incrustada y texto, ancho total
        #    fButtonCtr = element.design().addControl(FormControlType::Button, 'buttonUp');
        #    fButtonCtr.widthMode(FormWidth::ColumnWidth);
        #    fButtonCtr.buttonDisplay(FormButtonDisplay::TextAndImageLeft);
        #    fButtonCtr.normalResource(1067);
        #    fButtonCtr.text("Subir");
        #
        #    // Botón, con imagen incrustada y texto, ancho total
        #    fButtonCtr = element.design().addControl(FormControlType::Button, 'buttonDown');
        #    fButtonCtr.widthMode(FormWidth::ColumnWidth);
        #    fButtonCtr.buttonDisplay(FormButtonDisplay::TextAndImageLeft);
        #    fButtonCtr.normalResource(1068);
        #    fButtonCtr.text("Bajar");
        #
        #    element.unLock();
        #}
      ENDSOURCE
      SOURCE #buttonUp_clicked
        #public void buttonUp_clicked()
        #{
        #    FormStringControl  fStringCtr = element.design().controlName('stringEditTexto');
        #    ;
        #
        #    fStringCtr.text("Arriba!");
        #}
      ENDSOURCE
      SOURCE #classDeclaration
        #class JAEBaseForm_Mngr
        #{
        #    FormRun     element;
        #}
      ENDSOURCE
    ENDMETHODS
  ENDCLASS

***Element: PRN

; Microsoft Dynamics AX Project : JAE_RuntimeFormEventControl unloaded
; --------------------------------------------------------------------------------
  PROJECTVERSION 2
  
  PROJECT #JAE_RuntimeFormEventControl
   SHARED
  PROPERTIES
    Name                #JAE_RuntimeFormEventControl
  ENDPROPERTIES
  
    PROJECTCLASS ProjectNode
    BEGINNODE
      FILETYPE 0
      UTILTYPE 11
      UTILOBJECTID 0
      NODETYPE 201
      NAME #JAEBaseForm
    ENDNODE
    BEGINNODE
      FILETYPE 0
      UTILTYPE 45
      UTILOBJECTID 30025
      NODETYPE 329
      NAME #JAEBaseForm_Mngr
    ENDNODE
  ENDPROJECT
  

***Element: END