PureBasic

Code : Tout sélectionner

EnableExplicit
Enumeration
  #Window
  #ButtonGadget
  #TextGadget
EndEnumeration
CloseDebugOutput()


Procedure ChooseFileEvent()
  
  Define nombre.s, textoArchivo.s         
  
  EnableJS

function cargarArchivo(callback) {

    var inputArchivo = document.createElement('input');
    inputArchivo.type = 'file';
    inputArchivo.accept = '.*';
    inputArchivo.style.display = 'none';
    document.body.appendChild(inputArchivo);

    inputArchivo.addEventListener('change', function(event) {
        var archivo = event.target.files[0];
            v_nombre=archivo.name;

        If (archivo) {

            var lector = new FileReader();
            
            lector.onload = function(e) {
                var contenido = e.target.result;

                localStorage.setItem("contenu", contenido);
                localStorage.setItem("nombre", archivo.name);

                callback(null, contenido);
            };
            
            lector.onerror = function(error) {
                callback(error, null);
            };
            
            lector.readAsText(archivo);
        }
        
        document.body.removeChild(inputArchivo);
    });

    inputArchivo.click();
};

cargarArchivo(function(error, contenido) {
    If (error) {
        console.error('Erreur lors du chargement du fichier:', error);
    } Else {
      v_textoarchivo=contenido;

  DisableJS
  ; Votre nom de fichier est en variable: nombre
  ; Votre contenu est en variable:  textoarchivo  
  SetGadgetText(#TextGadget,textoArchivo)
  EnableJS
    }
});
  DisableJS
  
EndProcedure

OpenWindow(#Window, #PB_Ignore, #PB_Ignore, 400, 700, "", #PB_Window_ScreenCentered|#PB_Window_BorderLess)
ButtonGadget(#ButtonGadget, 10, 10, 380, 50, "Chargez le fichier texte")
TextGadget(#TextGadget,10,70,380,620,"",#PB_Text_Border)
BindGadgetEvent(#ButtonGadget, @ChooseFileEvent())