Easy Language obtiene automáticamente la ruta

Esto es muy problemático. Si no desea conocer la ruta de CF, debe buscar en el disco, encontrar QQLogin.exe y luego iniciar QQLogin.exe. Como si mi computadora tuviera 500G, si no sabes en qué disco está instalado CF. Si no sabe en qué disco está instalado CF, debe buscar en el disco C.D.E.F.T, lo que puede llevar mucho tiempo. Lo probé y puse la unidad E con QQLogin.exe y me llevó unos 20 minutos encontrar QQLogin.exe.

Habría sido posible encontrar la ruta a QQLogin.exe buscando en el registro y ejecutándolo, pero aún no se ha hecho. Aquí está el código para buscar en toda la página: Debe insertar un cuadro de edición aquí.

.Subrutina __Ventana de Inicio_ creada

' Buscar archivos ("C:\")

' Buscar archivos ("F:\")

p>

' Buscar archivos ("D:\")

' Buscar archivos ("T:\")

' Buscar archivos ("E:\")

.Archivo de búsqueda de subrutinas

.Parámetros de búsqueda, tipo de texto

.Resultado de variable local, tipo de texto

Resultado = Buscar archivo (buscado "QQLogin.exe", )

Determine el primer bucle del bucle (resultado ≠"")

. Si es verdadero (resultado ≠ "")

Cuadro de edición 1. Agregar texto (buscando resultados)

Ejecutar (cuadro de edición 1. Contenido, falso,)

_Ventana de inicio. Destruir ()

Salir del bucle ()

.Finalizar si es verdadero

Resultado = Buscar archivo (, )

. Determinar el punto final del bucle ()

Resultado = buscar archivo (buscado "*. *", # subdirectorios)

Determinar el primero en el bucle (resultado ≠"")

. Si es verdadero (resultado ≠ ".")

resultado ≠ "...")

.

Texto de depuración de salida (resultado buscado "\" ).

Buscar archivo (resultado buscado "\")

.Finalizar si es verdadero

Resultado = Buscar archivo (, # subdirectorios)

.Si es verdadero (editbox1.content ≠ "")

Salir del bucle ()

.Finalizar si es verdadero

.Confirmar el final del bucle ()