Hola Hard233,
Ya inicie las pruebas y...aún tenemos trabajo! Te cuento las 2 grandes incidencias que he visto:
a) La instalación en la memoria externa no me funciona. El comando SendSpecial ( "Down" ) en mi máquina no hace absolutamente nada...
b) La subrutina de copiar no funciona (además de que... lo has complicado mucho! Para ganar que el usuario pueda personalizar el copiar icono por icono)
Te paso mi propuesta (que a mi si me funciona [a falta de los mensajes de Status]:
Código:
Sub Copiar
StartMenuDir = device_dir & "\Windows\Menú Inicio"
If ( DirExists( StartMenuDir ) )
iSelect = Choice( "EASY-INSTALLER", \
"EASY-INSTALLER by Hard233 (v." & version & ")^CR^^LF^(c) 2009 Hard233 (HTCMANIA)^CR^^LF^^CR^^LF^ \
¿Como personalizar el Menú Inicio?", 1, 10, \
"1. Sustituirlo con el personalizado", \
"2. Sólo añadirle iconos personalizados" )
If ( iSelect = 1 )
StartMenuDir = "\Windows\Menú Inicio"
Deltree( StartMenuDir )
EndIf
EndIf
XCopy ( device_dir & "\*.*", "\" , TRUE, TRUE )
EndSub
Mañana seguiré, me interesa mucho solucionar lo de que no instale en la memoria externa y debe ser una chorrada... la idea es buenisima, pero ya digo... a mi no me funciona!
Buenas noches!