Cómo importar texto específico en un cuadro de texto usando un lenguaje sencillo
.Versión 2
.Biblioteca compatible iext
.Ensamblajes de ventana de ensamblaje 1
.Texto variable de ensamblaje, tipo de texto
Variable de ensamblaje fg01, tipo de texto, "0"
. Variable de ensamblaje fg02, escriba texto, "0"
. El programa establece la variable fg03, tipo de texto, "0"
. Código de variable ensambladora, tipo texto
. Nombre de la variable ensambladora, tipo de texto
Variable ensambladora i, entero
. Variable ensambladora y, entero
. Subrutina __Launch Window_Create_Complete
Texto = a texto (leer archivo (obtener directorio de ejecución () + "/111.txt")
fg01 = dividir texto (texto, #newline,)
Cuenta el primer bucle (obtener miembro de la matriz (fg01), i)
fg02 = dividir texto(fg01[i]). , "=",)
fg03 = texto dividido(fg02[2], ">", )
código = fg03[1]
nombre = sustitución de subtexto (fg03 [2], "[", , , true)
nombre = sustitución de subtexto (nombre, "]", , , true)
y = sustitución de subtexto (nombre, "]", , verdadero)
y = SuperListBox1.InsertTableItem (, , , , )
SuperListBox1.Title (y, 0 , al texto (i))
SuperListBox1.Title (y, 1, nombre)
SuperListBox1.Title (y, 2, código)
.Count Loop Tail()
Sería mejor usar expresiones regulares, pero lamentablemente no sé cómo