Lenguaje simple ¿Cómo comparar el texto del cuadro de lista 2 con el texto del cuadro de lista 1, filtrar el texto diferente y enviar el mismo texto al cuadro de edición 1?
.Bibliotecas compatibles OPenGL
.Conjunto de ventanas de ensamblaje 1
.Subroutine_Button1_Clicked
Cuadro de edición 2 .Contenido = Filtro de caracteres (Cuadro de edición 1.Contenido, 0)
Cuadro de edición 3.Contenido = Filtro de caracteres (Cuadro de edición 1.Contenido, 1)
.Subrutina de filtrado de caracteres, tipo de texto, filtro eliminar tipos de caracteres especificados innecesarios. "Doble byte" y "un solo byte"
Parámetros El texto a filtrar, texto, el texto a filtrar. No puede estar vacío.
Parámetros: tipo de carácter a devolver, entero, tipo de carácter a devolver después del filtrado. 0 representa un carácter de un solo byte, todos los demás valores son caracteres de doble byte
. Recuento de variables locales, número entero
. Valor de retorno de variable local, valor lógico
. Texto de un solo carácter variable local, tipo de texto
. Texto de doble carácter de variable local, tipo de texto
Inicio de bucle ()
Valor de retorno = si es un carácter de doble byte (texto a filtrar, recuento - 1)
. Comience a juzgar (valor de retorno = verdadero)
Texto de carácter de doble byte = texto de carácter de doble byte + obtenga la parte media del texto (texto a filtrar, recuento, 2)
Recuento = Recuento + 2
.Valor predeterminado
Texto de un solo carácter = Texto de un solo carácter + Obtener centro de texto (texto a filtrar, recuento, 1)
.Si es verdadero (buscar texto (texto a filtrar, # salto de línea, contar, falso) = contar)
Texto de doble carácter = Texto de doble carácter + # salto de línea
.End si es cierto
Contar = Contar + 1
.El juicio termina
. Fin del ciclo (recuento . Inicio del juicio (tipo de carácter a devolver = 0) Retorno (texto de un solo carácter) .Valor predeterminado Devolución (texto de dos caracteres) .Fin del juicio.