Red de conocimiento informático - Aprendizaje de código fuente - Código fuente de miembro de Easy Language

Código fuente de miembro de Easy Language

Código fuente del proyecto registrado

Versión 2

Biblioteca de soporte xplib

. Se ha creado la subrutina_ _Ventana de inicio_

. Código de registro de variable local, tipo de texto

. Registro de variables locales, tipo de texto

Estilo XP (1)

Código de registro = a texto (tome la palabra característica del disco duro ()+2234240× 0)

Registro = enviar texto(Obtenga el elemento de registro de texto (4, "Software\History Policy\zhucema",))

. Si (código de registro = registro)

Cargar(ventana1, falso)

Destruir()

De lo contrario.

Cuadro de edición 1. Contenido = enviar texto (obtener la palabra característica del disco duro ())

Si se acabó

. Se hizo clic en subrutina_button1_.

. If (cuadro de edición 2. Contenido = a texto (obtener la palabra característica del disco duro () + 2234240× 0))

Cuadro de información ("Registro exitoso", 0,)

Registrará el elemento (4, "Software\History Policy\zhucema") escrito en el texto (tome la palabra característica del disco duro ()+2234240× 0).

Cargar(ventana1, falso)

Destruir()

En caso contrario.

Cuadro de información("Error en el registro", 0,)

Si finalizó

. Se hace clic en Subroutine_button2_is

Fin()

-

Registrar código fuente

Versión 2

Biblioteca de soporte xplib

. Conjunto ventana conjunto 1

. Subrutina_ _Ventana de inicio_ creada

Estilo XP (1)

. Se hizo clic en subrutina_button1_.

. Código de registro de variable local, tipo de texto

Código de máquina de variable local, tipo entero

Código de máquina = a un número entero (cuadro de edición 1. Contenido)

Código de registro =Texto(código de máquina+2234240× 0)

Cuadro de edición 2. Contenido=Código de registro

. Se hace clic en el botón 2 de subrutina

Destruir()

=========================== ==== ======================

Fuente de respuesta → Foro Jingyi. Si quieres aprender sobre software, puedes ir al "Foro Jingyi".

Foro Jingyi → Plataforma profesional de aprendizaje e intercambio de tecnología de idiomas fácil. Puedes escribir software sin inglés.