Código fuente de miembro de Easy Language
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.