Red de conocimiento informático - Aprendizaje de código fuente - Cómo importar texto específico en un cuadro de texto usando un lenguaje sencillo

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