Código fuente del botón de fondo en lenguaje simple
2
. Biblioteca de soporte
shellEx
.Assembly
Ensamblaje de Windows 1
.Variables de ensamblaje
Valor de tecla de acceso rápido,
tipo entero
. Variable de ensamblaje
Valor de tecla de acceso rápido 1,
Tipo entero
. Variable de configuración del programa
Valor de tecla de acceso rápido 2,
entero
. Subrutina
__Launch Window_Created
Valor de tecla de acceso rápido
=
Registrar tecla de acceso rápido
(obtener identificador de ventana
(),
Etiqueta 4.
=
Registrar tecla de acceso rápido
(Obtener identificador de ventana
(),
Etiqueta 4. Identificador
(),
Etiqueta 4. Obtener identificador de ventana
(),
0,
#key1)
.Subrutina
_Label4_FeedbackEvent,
Tipo entero
. Parámetro
Parámetro uno,
tipo entero
Parámetro dos,
tipo entero. Comienza el juicio
(valor de tecla de acceso rápido
=
Parámetro 1)
_clock1_cycle_event
p>().
.Judgment
(Valor de tecla de acceso rápido 1
=
Parámetro 1)
Evento _clock2_cycle
()
Aceptar
(Valor de tecla de acceso rápido 2
=
Parámetro 1)
_clock3_cycle event
()
Predeterminado
El juicio finaliza
Subrutina
Subrutina 1<. /p>
Cuadro de información
("alt+1",
0,
)
.Subrutina 2 p>
Cuadro de información
("ctrl+1",
0,
)
.Subrutina 3
Cuadro de información
("1",
0,
)
.Subrutina
_clock1_cycle event
clock1.clock ciclo
=
valor
(Editar cuadro 1.contenido)
Subrutina 1
()
.Subrutina
_clock2_period event
p>clock2.clock period
=
a entero
(cuadro de edición 2.contenido)
Subrutina 2
()
. Subrutina
evento_clock3_cycle
Clock3.content)
Subrutina 3
()
Las condiciones del La subrutina la puede cambiar usted mismo
Porque el cuadro de selección realmente no es necesario