¿Cuál es el código fuente para modificar los iconos del escritorio en un lenguaje sencillo?

Si es verdadero (cuadro de mensaje ("¿Seguro que quieres imitar Panda Burning?", 1, "") = # Botón de confirmación)

Extraer iconos de archivos de recursos (Obtener directorio en ejecución () "\" Obtener archivo ejecutable Name (), 0, "C:\windows\system32\1.ico", ) ' Extrae el icono del archivo de recursos especificado y guárdalo como un archivo ICO o cópialo en el portapapeles.

Escribir elemento registrado (#máquina local, "SOFTWARE\Classes\exefile\DefaultIcon\", "C:\windows\system32\1.ico ")

Terminar proceso (" explorer.exe")

Ejecute ("explorer.exe", false, )

. Si es verdadero, finalice

Return ()

.