Instalador de programas

Presentaciones - Mensajes de Bienvenida - Mensagem de Boas-vindas

Instalador de programas

Notapor wbueso » 23 Ene 2014, 00:39

Hola soy muy novato en esto de la programación (Tengo como 2 meses de haber comenzado), decidí que quería aprender programación y el mejor programa que encontré fue Autoit, ya hice todos mis programas desatendidos, y me fascino trabajar con Autoit.
E creado un script instalador de programas como el WPI que instala los programas que tienen activado el checkbox, pero el problema es que tengo que elegir los programas antes de compilarlo, lo que quiero es que la GUI principal tenga un botón para que el usuario pueda agregar los programas, el botón AGREGAR habré una nueva GUI donde hay un botón para buscar el programa que agregaremos, un GUICtrlCreateInput para escribir el nombre del programa y un botón de listo, el problema es que la nueva GUI al ser cerrada me cierra la GUI principal, y los checkbox no me reconocen los nombres del programa que e agregado, e intentado varios métodos y he avanzado mucho pero se me facilitarían mas las cosas con la ayuda de ustedes, no se tal vez mostrándome el código fuente de algún programa similar hecho con autoit, seguiré intentándolo y agradeceré su ayuda, adelante con autoit.


Este es el codigo que tengo, solo les pongo doy dos botones y dos checkbox para que no sea tan grande el codigo, hasta ahorita no se como funcionan los array.

Código: Seleccionar todo
#include <File.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
GUICreate("Agregar Programas",915,500,50,100)
$BtnVlvr = GUICtrlCreateButton("Volver al Instalador",5,405,110,20)
$BtnAct = GUICtrlCreateButton("Actualizar",5,425,110,20)
$BtnSlr = GUICtrlCreateButton("Salir",5,445,110,20)

GuiSetState(@SW_SHOW)
$BtnAdd0 = GUICtrlCreateButton("Agregar",125,35,45,20)
$BtnAdd1 = GUICtrlCreateButton("Agregar",125,55,45,20)

$ChckBx0 = GUICtrlCreateLabel(FileReadLine(@ScriptDir&"\Programas.txt",1),175,40,140,20)
$ChckBx1 = GUICtrlCreateLabel(FileReadLine(@ScriptDir&"\Programas.txt",4),175,60,140,20)

GUICtrlCreateGroup("Configuraciónes",120,20,190,220)

Func Actlzr()
     WinClose("Agregar Programas","")
     ShellExecute(@ScriptDir&"\Agregar Programas.exe")
   EndFunc

   Func Add0()
       $FlRut0 = FileOpenDialog("Seleccione un Ejecutable", @DesktopCommonDir, "Ejecutables (*.exe;*.bat;*.com;*.cmd)", 1 + 4 )
       If $FlRut0 = "" Then
       MsgBox(0,"Error","Debe seleccionar un Archivo",5)
       Else
       $FlName0 = InputBox("Programa Agregado","Usted Selecciono el Siguiente Programa"&$FlRut0&@CRLF&@CRLF&"Escriba el Nombre del Programa")
     If $FlName0 = "" Then
       MsgBox(0,"Error","Debe Escribir un Nombre para el Archivo")
       else
         $Dflt0 = MsgBox(4,"Listo","Desea que el programa se instale por default")
     If $Dflt0 = 6 Then
       $Chckd0 = 1
     Else
       $Chckd0 = 0
     EndIf
       $FlOpn0 = FileOpen("Programas.txt")
       _FileWriteToLine(@ScriptDir&"\Programas.txt",1,$FlName0,1)
       _FileWriteToLine(@ScriptDir&"\Programas.txt",2,$FlRut0,1)
       _FileWriteToLine(@ScriptDir&"\Programas.txt",3,$Chckd0,1)
       FileClose($FlOpn0)
       Call("Actlzr")
     EndIf
     EndIf
   EndFunc

While 1
   $msg = GUIGetMsg()

   Switch 1

   Case $msg = $BtnAdd0
       Call("Add0")

   Case $msg = $BtnVlvr
   WinClose("Agregar Programas","")
   ShellExecute(@ScriptDir&"\Agregar Programas.exe")

Case $msg = $BtnAct
      Call("Actlzr")

Case $msg = $BtnSlr
         Exit
   Case $msg = $GUI_EVENT_CLOSE
         Exit
EndSwitch

WEnd
Última edición por wbueso el 31 Ene 2014, 00:14, editado 2 veces en total
wbueso
Aprendiz de Mago
 
Mensajes: 60
Registrado: 31 Dic 2013, 01:02

Re: Instalador de programas

Notapor Dany » 23 Ene 2014, 01:42

Muestra el código que llevas?
    ............................................Imagen
    ......................................Imagen
Avatar de Usuario
Dany
Profesional del Autoit
 
Mensajes: 625
Registrado: 28 Mar 2012, 22:49

Re: Instalador de programas

Notapor melvinhn » 24 Ene 2014, 20:31

Mira yo también en su momento quise hacer algo que tu quieres, pero la idea me resulto muy complicada, claro que no es imposible ya que en la programación solo hay que inventar un poco.

Mira yo al menos lo resolví hacerlo de la manera manual, agregando
Código: Seleccionar todo
GUICtrlCreateTreeViewItem
GUI_CHECKED

bueno para no aburrirte mucho te dejo un ejemplo del WPI que tengo.

Bueno este WPI mio con todos mis programas incorporados me pesa 3.5GB, pero solo te he dejado la muestra con 5MB para que lo mires
Vista previa.png
Vista previa.png (90.44 KiB) Visto 1513 veces

Para probarlo tienes que irte a la categoría Herramientas de compresión ya que el único programa que te incorpore fue el 7 Zip

Puedes bajar el archivo acá, tienes que tener el Mozilla Firefox o el Google Chrome ya que en Internet Explorer no es compatible esta pagina.
https://mega.co.nz/#F!cVoEhToS!ANbmEQaKyM5F13BWkHSFCQ
Saludos espero te sirva de algo...
Avatar de Usuario
melvinhn
Hacker del Foro
 
Mensajes: 73
Registrado: 16 Jul 2011, 22:14
Ubicación: Honduras, Cortes, Puerto Cortes, Col Miraflores

Re: Instalador de programas

Notapor Dany » 26 Ene 2014, 14:18

Esta re-guapo me gusto mucho. solo falta depurar un poco los errores. y declarar algunas variables.

saludos muy buena y útil la herramienta.

:smt027
    ............................................Imagen
    ......................................Imagen
Avatar de Usuario
Dany
Profesional del Autoit
 
Mensajes: 625
Registrado: 28 Mar 2012, 22:49

Re: Instalador de programas

Notapor melvinhn » 27 Ene 2014, 05:58

Dany escribió:Esta re-guapo me gusto mucho. solo falta depurar un poco los errores. y declarar algunas variables.

saludos muy buena y útil la herramienta.

:smt027

Como que errores y como que variables, vamos a ver si tienes algunas ideas para optimizarlo...
Me serviria de mucho dany asi que porfa espero tu opinion.
Saludos
Avatar de Usuario
melvinhn
Hacker del Foro
 
Mensajes: 73
Registrado: 16 Jul 2011, 22:14
Ubicación: Honduras, Cortes, Puerto Cortes, Col Miraflores

Re: Instalador de programas

Notapor Dany » 27 Ene 2014, 14:31

melvinhn escribió:
Dany escribió:Esta re-guapo me gusto mucho. solo falta depurar un poco los errores. y declarar algunas variables.

saludos muy buena y útil la herramienta.

:smt027

Como que errores y como que variables, vamos a ver si tienes algunas ideas para optimizarlo...
Me serviria de mucho dany asi que porfa espero tu opinion.
Saludos


perdón el mensaje era para esta herramienta :S:
viewtopic.php?p=15935#p15935

ahí te dejo a lo que me refiero.

saludos
    ............................................Imagen
    ......................................Imagen
Avatar de Usuario
Dany
Profesional del Autoit
 
Mensajes: 625
Registrado: 28 Mar 2012, 22:49


Volver a Welcome ¡ Presentación - Bienvenida - Boas-vindas! -Apresentações

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 1 invitado

cron