Este foro usa cookies
Este foro utiliza cookies para almacenar su información de inicio de sesión si está registrado y su última visita si no lo está. Las cookies son pequeños documentos de texto almacenados en su computadora; las cookies establecidas por este foro solo se pueden usar en este sitio web y no representan ningún riesgo de seguridad. Las cookies en este foro también rastrean los temas específicos que ha leído y la última vez que los leyó. Si Ud. continúa navegando, entenderemos que acepta todas las cookies.

Se almacenará una cookie en su navegador, independientemente de la elección, para evitar que se le vuelva a hacer esta pregunta. Podrá cambiar la configuración de sus cookies en cualquier momento utilizando el enlace en el pie de página.

El foro antiguo se encuentra accesible desde https://foro.gambas-es.org en modo de solo lectura.

Calificación:
  • 0 voto(s) - 0 Media
  • 1
  • 2
  • 3
  • 4
  • 5

Cargar múltiples archivos de texto en simultáneo
#1

Hola gente, estoy con un inconveniente, que de seguro la solución está en mis narices, pero no la veo.

Tengo un formulario con 4 TextEditor, donde debo cargar 4 archivos de texto diferentes, que tienen en común que se llaman igual y cambia la extensión (.tex, .bib, .sgl y .nts)

El código que utilizo para hacer la carga del 1 (el que manda) es:

GAMBAS
  1. Public Sub menuAbrir_Click()
  2.  
  3.   Dialog.Title = "Seleccionar archivo"
  4.   Dialog.Filter = ["*.tex", ("Formato permitido")]
  5.   Dialog.Path = User.Home
  6.   If Dialog.OpenFile() Then
  7.     Return
  8.   Else
  9.     cadena = File.Load(Dialog.Path)
  10.     TextEditor.Text = cadena
  11.   FormEDITOR.Title = File.RealPath(Dialog.Path)
  12.   ruta = File.RealPath(Dialog.Path)
  13.   TerminalView1.Input("cd " & File.Dir(Dialog.Path) & "\n" & "clear" & "\n")
  14.   Message.Error("No se pudo abrir el archivo")
  15.   TextEditor.SetFocus()



Lo que estoy haciendo acá es cargar el .tex en el primer TextEditor, poner la ruta y el nombre en la cabecera del formulario y aplicar la ruta a una consola.

Aplico los siguientes cambios (se nota que mi lógica es mala, porque no funciona)

GAMBAS
  1.     cadena = File.Load(Dialog.Path)
  2.     TextEditor.Text = cadena
  3.     cadenaBIB = File.Load(File.BaseName(Dialog.Path)) & ".bib" 'cargo en otra variable el archivo bib
  4.     txtBIB.Text = cadenaBIB



Alguien me puede mostrar que hago mal

Gracias de antemano
    ¡Gracias!
#2

No entiendo, ¿cual es el problema exactamente?

1 Saludo.
    ¡Gracias!
#3

Que raro, yo lo veo, adjunto captura


Archivos adjuntos Miniatura(s)
   
    ¡Gracias!
#4

(28-08-2022, 21:58)alberto-moyano escribió:  Que raro, yo lo veo, adjunto captura

si, ok en ete post se ve correctamente. en el otro post no se ve, pero no importa seguimos por aca

1 Saludo.
    ¡Gracias!
#5

El problema en concreto es que no logro levantar los otros archivos en sus correspondientes textEdit.

Carga el primero y luego me sale un cartel que dice que no pudo cargar el archivo.
    ¡Gracias!
#6

Tenes que poner esto
GAMBAS
  1. cadenaBIB = File.Load(File.Dir(Dialog.Path) &/ File.BaseName(Dialog.Path) & ".bib")  'cargo en otra variable el archivo bib



Te explico.
GAMBAS
  1. sRuta= "/home/alberto/unarchivo.txt"
  2. File.Dir(sRuta)= /home/alberto
  3. File.BaseName(sRuta) = unarchivo



1 Saludo.
[-] Los siguientes 1 usuarios dice gracias a tincho por este post:
  • alberto-moyano
    ¡Gracias!
#7

Perfecto Tincho y entendí muy bien la lógica, gracias de nuevo
    ¡Gracias!


Posibles temas similares…
Tema / Autor Respuestas Vistas Último mensaje

Salto de foro:


Usuarios navegando en este tema: 1 invitado(s)