Obtener el texto de la línea especificada en un lenguaje sencillo

Obtenga el texto de la línea especificada... El problema es demasiado simple

La siguiente es la información para extraer el texto de la línea especificada en el cuadro de edición,

p>

.Versión 2

.Especificación de biblioteca de soporte

. Subrutina __Launch Window_Created

Variable local n, entero

Cuadro de edición 1. Modo de entrada = 3

Cuadro de edición 1. Permitir múltiples líneas = verdadero

. Cuente la primera línea del bucle (14, n)

Cuadro de edición 1. Agregue texto ("primero", al texto (n), "línea de texto", # nueva línea)

.El bucle de conteo termina ()

.Subroutine_Button1_clicked

.Contenido real de la variable local, tipo de texto

.Dirección del buffer de la variable local, entero

. Número de línea de variable local, entero

' Las líneas comienzan a contar desde 0, 0 es la primera línea, 1 es la segunda línea....

Línea = es un número entero (cuadro de edición 2. contenido)

Contenido real = es texto en blanco (256)

Dirección de búfer = es una dirección de datos variables ( Contenido real)

Si (editbox1.send mensaje (196, línea, dirección de búfer) ≠ 0)

Salida de texto de depuración (contenido real)

. De lo contrario

Genera el texto de depuración ("...!").