A raíz de un mensaje de Dionisis en el foro en el que comentaba que necesitaba reiniciar un ordenador desde su aplicación surge este componente para Xailer que encapsula la funcionalidad de Windows para lograr este cometido de un modo sencillo y se encarga de hacer las comprobaciones necesarias para cada plataforma.
Continuando con el uso de controles OCX vamos ahora a ver como utilizar un control de terceros no presente directamente en el sistema operativo (como los vistos hasta ahora), esto quiere decir que habremos de instalarlo en cada PC del cliente donde queramos utilizarlo, aunque esto se puede automatizar como se verá mas adelante.
Este control es un generador de gráficos estadísticos de muy fácil manejo, pero de excelentes prestaciones, que además tiene la gran ventaja de ser gratuito ya que su autor lo ha donado de forma altruista al dominio público, es el control OCX llamado RMChart.
Hace algún tiempo, Carlos Ortiz preguntaba si había un modo sencillo de descargar y/o subir archivos a un FTP.
Coincidiendo con Carlos en que el uso de los métodos :OpenFile(), :ReadFile() y :WriteFile() del componente TFtp de Xailer no es el mejor camino para un usuario nuevo con la herramienta, me dispuse a escribir un componente que lo haga de un modo un poco más amigable, donde sólamente sea necesario especificar los datos de la conexión, el nombre del archivo y poco más.
Las propiedades de este componente son:
Los eventos:
Los métodos:
Un pequeño ejemplo de cómo descargar un archivo.
DATA nRead INIT 0
oSender:lEnabled := .F.
WITH OBJECT TFTPFile():Create( Self )
:cRemoteFile := "tests/test.zip"
:cLocalFile := "c:test.zip"
:cServer := "ftp.myserver.com"
:cUser := "User"
:cPassword := "Password"
:OnStart := {|oSender, nSize| ::oLabel2:cText := ToString( nSize ) + " bytes" }
:OnProgress := {|oSender, nBytes| ::nRead += nBytes, ::oLabel1:cText := ToString( ::nRead ) }
:OnComplete := {|oSender| ::oLabel2:cText := "¡ Descargado !" }
:Download()
//:Upload()
:Destroy()
END
oSender:lEnabled := .T.
Para proba el test, sólo hay que configurar los datos de la conexión con unos reales y tras compilar/ejecutar ya podemos empezar a subir o descargar archivos desde nuestro FTP favorito.
En el ZIP está el fuente del componente y la librería lista para usar.
Saludos,
José Lalín
En la línea de los anteriores ejemplos usando ActiveX, ahora presento un ejemplo más elaborado pero muy sencillo de utilizar al mismo tiempo, como integrar los mapas de localización de GoogleMaps en nuestras aplicaciones.
Para ello he construído la clase TGoogleMaps con la cuál he simplificado la integración del sistema en cualquier aplicación, basta con enlazar GoogleMaps.PRG con su XFM, además de WebBrowser.Prg y su CH (como se ha visto en capítulos anteriores) en la lista de ficheros del proyecto y con solo 5 líneas podemos presentar mapas de lo más vistoso en un formulario de Xailer.
De esta manera dotamos a nuestros programas de la posibilidad de poder localizar la dirección de un cliente, desde un botón en el formulario de clientes o la de crear un mapa con la ruta desde nuestras instalaciones hasta la dirección de entrega de un producto, calcular la distancia, etc.
Como hemos visto en el ejemplo anterior podemos utilizar un control OCX que resulta ser un navegador Web incluido en un control de nuestro form y con esto podemos navegar por Internet.
Pero este control nos permite hacer bastantes más cosas, como todos sabemos desde una ventana de Internet también podemos abrir un HTML que se encuentra en el disco duro local del PC, pero no sólo esto sino que podemos usarlo para abrir otros tipos de archivos como puede ser un archivo Adobe Acrobat Reader, es decir un PDF ya que existe un ActiveX que se instala en el PC al instalar este programa y ni tan siquiera tenemos que preocuparnos de usar este ActiveX sino que el explorador de Internet se encarga de ello.
Veamos con detalle los ejemplos que incluye el de Xailer que aquí dejo a vuestra disposición. Proyecto
Me ha sorprendido gratamente que después de mi primer artículo en Xailer.info me hayan enviado varios mensajes privados agradeciendo el código fuente y el manual, sobre todo por parte de usuarios que vienen directamente de Clipper y necesitan leer código antes de empezar a tomar conciencia de trabajar con Programación Orientada a Objetos.
Es por eso que en esa línea más práctica que teórica voy a escribir una breve serie de pequeños artículos para ilustrar con ejemplos, código y manual o explicación detallada, algunos de los agradables descubrimientos que he ido haciendo en estos últimos meses de uso de Xailer.
Agradezco a Xailer.info la posibilidad de colaborar aportando mi primer granito de arena: Messages
Este fue mi primer ejercicio práctico en Xailer a principios del 2006 y en realidad consta de un único PRG que podemos enlazar con nuestras aplicaciones con un conjunto de pequeñas utilidades/trucos pero que nos resuelven algunas cosillas del día a día en nuestros programas.
Consta de un completo manual en castellano y ejemplo práctico de cada una de las funciones, asi que probarlo y ver lo que hace no os costará nada.
Que lo disfrutéis.
Vista introduce un nuevo tipo de control llamado CommandLink que se comporta como un botón estándar, pero pretende hacer más agradable la experiencia del usuario.
Veamos una imagen:
Se puede apreciar cómo el control muestra una imagen, un texto principal y una breve descripción de su cometido.
Para entender cómo funciona, nada mejor que un poco de código que crea un TCommandLink como el que se ve en la imagen anterior:
WITH OBJECT TCommandLink():New( oForm )
:cText := "CommandLink"
:cNote := "This is the new TCommandLink control"
:lShield := .T.
:Create()
END
En el archivo vistacommandlink.zip está todo el código fuente del control, tan sólo hay que compilarlo y añadir el OBJ al proyecto en el que se quiera utilizar.
Un saludo.
En estas últimas semanas se ha preguntado varias veces en los foros si es posible utilizar Blat para enviar correo desde Xailer, así que me he decidido a pulir y publicar una pequeña librería que empezé en el mes de enero a partir de un trabajo inicial de José Luis Capel
Sigue leyendo
Varias personas me han comentado que se encuentran muy a gusto trabajando con Xailer pero lo utilizan, o van a utilizar, para desarrollos nuevos porque no quieren tener que reescribir las aplicaciones que ya tienen terminadas.
Está claro que ninguna herramienta nos va a permitir migrar automáticamente de un entorno de desarrollo a otro: podemos aprovechar el código que maneje la capa de datos pero siempre habrá que hacer cambios en el interfaz para adaptarse a las peculiaridades de nuestra nueva herramienta.
Partiendo de esta base, en Xailer hemos pensado que podríamos hacer algo al respecto y para ello dedicimos incorporar una opción para importar los diálogos que ya teníamos diseñados con el Workshop.