Red de conocimiento informático - Aprendizaje de código fuente - Cómo configurar la página de inicio de 360 ​​Browser o Sogou Browser en idioma Yi

Cómo configurar la página de inicio de 360 ​​Browser o Sogou Browser en idioma Yi

Modifique la página de inicio de ie como referencia, espero que le resulte útil.

Agregue un cuadro de edición y 2 botones a la ventana y listo

El siguiente es el código fuente

Versión

2

. Biblioteca de soporte

xplib

. Ensamblaje

Ensamblaje de ventana 1

.Subrutina

__Iniciar ventana_Crear

Estilo XP

(3)

Cuadro de edición 1.Contenido

=

Obtener entrada de registro de texto

(3,

"Software\Microsoft \ Internet

Explorer\Main\Start

Página",

)

Etiqueta 1.Título

=

Cuadro de edición 1.Contenido

Cuadro de edición 1.Posición de selección inicial

3000

.Subrutina

_Se_hace clic en el Botón1

. Si es verdadero

(escriba el elemento de registro

(3,

"Software\Microsoft\Internet

Explorer\Main\Start

Página",

Cuadro de edición 1. Contenido)

=

true)

Cuadro de mensaje

("Modificar página de inicio correctamente",

#Botón Confirmar

#Icono de mensaje,

)

.Fin si es verdadero

.Subrutina

_Cuadro de edición 1_Presione una tecla,

Tipo lógico

. Parámetros

código clave,

tipo entero

. Parámetros

Estado de la tecla de función,

tipo de entero

. Si es verdadero

(Código del botón

=

#Enter)

_Button1_clicked

()

. Si es verdadero final

. Si es verdadero

(código clave

=

tecla #F5)

_Iniciar ventana. _Iniciar ventana_ creada

()

.Finalizar si es verdadero

.Subrutina

_Button2_clicked

.

if

(label 1.title

"about: white")

Escribir elemento de registro

(3,

"Software\Microsoft\ Internet

Explorer\Main\Start

Página",

"acerca de: en blanco ")

Cuadro de información

( "Página de inicio modificada a blanco",

Botón #Confirmación

#Infoicon,

)

Cuadro de edición 1.content

=

"acerca de: en blanco"

Etiqueta 1.Título

=

"acerca de: en blanco"

De lo contrario

Cuadro de información

( "Ya hay una página en blanco",

#Botón de confirmación

#Infoicon,

)

. si final

. Subrutina

_Cuadro de edición 1_Se ha movido la posición del mouse,

Tipo de lógica

. Parámetros

posición horizontal,

tipo entero

. Parámetros

posición vertical,

tipo entero

. Parámetros

Estado de la tecla de función,

Tipo de entero

Etiqueta 1. Título

=

Cuadro de edición 1 .Contenido.