Red de conocimiento informático - Aprendizaje de código fuente - Salto de línea de texto dividido en súper lista de EasyLanguage

Salto de línea de texto dividido en súper lista de EasyLanguage

.Versión 2

.Biblioteca compatible iext

.Ventana de programa Programa__Ventana de inicio

.Subprogram__StartupWindow_CreationComplete

p>

.Número de archivo de variable local, entero

.Texto de archivo de variable local, tipo de texto

.Variable local Split1, tipo de texto, "0"

. Variable local split1, tipo de texto, "0"

. Variable local split2, tipo de texto, "0"

. Variable local i, número entero

. Variable local B, entero

Número de archivo = abrir archivo (obtener directorio de ejecución () "/1.txt", ,)

Texto de archivo = leer texto (número de archivo,)

Dividir 1 = dividir texto (texto de archivo, #nueva línea,)

. Count Loop First (obtener miembro de la matriz (split1), i)

B = SuperListBox1.InsertTableItem (, , , , )

SplitText = SplitText (Split1 [i], "/ ", )

SuperListBox1.Title (B, 0, SplitText [2])

SuperListBox1.Title (B, 1, texto dividido [1])

.Contar cola de bucle ().