En la última práctica vimos como hacer una función de las que nos ofrece el Asistente de Dinamización, pero en VBScript, en esta ocasión vamos a crear una nueva función con el Editor Dynamic Wizard.

Aqui, si que es recomendable hacer una lectura del Manual, ya que explicar toda la extructura es un poco complicado, con lo cual me voy a limitar a poner el código necesario para crear una función que lo que nos va a realizar es la inversion de una variable Booleana, es decir, cuando pulsemos sobre el objeto que hayamos dinamizado, vamos a invertir su valor, si esta a 1 la ponemos a 0 y viceversa.

Para insertarla en nuestro Proyecto, debemos iniciar el Editor Dynamic Wizard y crear una nuevo Archivo *wnf, pegamos el siguiente código, compilamos para comprobar que no haya ningún error y lo guardamos con el nombre deseado, una vez compilado Generamos el Archivo AD, Asistente de dinamizacion -> Crear WAD, una vez creado, Asistente de dinamizacion -> Leer Wizard Script y automaticamente nos lo cargara y ya podemos utilizarlo.

Pues una vez realizado los pasos anteriores, es momento de probar si funciona correctamente... Instanciamos un Objeto Boton y con el Asistente de dinamizacion seleccionamos la que acabamos de crear y se ejecutara con el click de ratón.

Seleccionamos la variables que nos interese, aquí si que habia que haber establecido un filtro, para que solo deje seleccionar variables Booleanas, pero ... para la próxima ya lo solucionaremos... y finalizamos el asistente.

Ya podemos observar como en los eventos de nuestro botón se ha creado la acción, y si comprobamos su código es el siguiente.

Y si ejectutamos el Runtime y la probamos... funciona perfectamente. Osea que quien se aburra, que se anime a crear alguna nueva y la comparta

18 de Enero del 2013

Si te ha gustado o ha sido de utilidad... Compartelo :-)