In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Lanzamiento de Xailer 5.0.2

Foro público de Xailer en español
Responder
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9252
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

Lanzamiento de Xailer 5.0.2

Mensaje por ignacio »

Estimados usuarios de Xailer,

Hoy publicamos una nueva actualización de Xailer, la versión 5.0.2 que básicamente corrige todos los errores que nos habéis encontrado, aunque también incluye alguna mejora y un buen ejemplo de creación de miniaturas que esperamos os guste.

Más información en los siguientes enlaces:

https://www.xailer.com/?lonuevo
http://www2.xailer.com/download/?es&file=1

Un cordial saludo
[El equipo de Xailer]
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Avatar de Usuario
XeviCOMAS
Mensajes: 586
Registrado: Sab Mar 12, 2011 8:16 pm

Re: Lanzamiento de Xailer 5.0.2

Mensaje por XeviCOMAS »

Alguna cosa ha cambiado... y esto no funciona en la última versión.
(funcionaba hasta Xailer501)

Se trata de "pintar" y "redimensionar" una imagen en el fondo de un form...


/*
* Projecte: PRUEBA
* fitxer: Form1.prg
* Descripció:
* Autor:
* Data: 14/09/2017
*/

#include "Xailer.ch"

CLASS TForm1 FROM TForm

COMPONENT oStatusBar1

METHOD CreateForm()

// El metodo Free() es necesario para liberar los recursos utilizados
// Es llamado automaticamente por Xailer al destruirse la ventana
DATA oImage1
METHOD Free() INLINE If( ::oImage1 = Nil, ,::oImage1:End() ), ::Super:Free()
METHOD FormPaint( oSender, hDC, cPaintStruct )
METHOD FormInitialize( oSender )

ENDCLASS

#include "Form1.xfm"

//------------------------------------------------------------------------------

METHOD FormInitialize( oSender ) CLASS TForm1

// Cargar una imagen y guardarla en la DATA oImage1
::oImage1 := TPicture():Create( "XA_BMP_CANCEL" )

RETURN Nil

//------------------------------------------------------------------------------

METHOD FormPaint( oSender, hDC, cPaintStruct ) CLASS TForm1

// Dibujar la imagen
::oImage1:Paint( hDC, 0, 0, ::nClientWidth, ::nClientHeight )

RETURN Nil

//------------------------------------------------------------------------------

Alguna sugerencia???

Por lo demás, parece que mis aplicaciones siguen funcionando perfectamente con Xailer502.
Sigo con las pruebas...


Un Saludo,
Xevi.
Un Saludo,
Xevi.
Avatar de Usuario
emeasoft
Mensajes: 1088
Registrado: Mié Abr 01, 2009 4:12 pm
Ubicación: emeasoft
Contactar:

Re: Lanzamiento de Xailer 5.0.2

Mensaje por emeasoft »

Buen día,

Estamos con el mismo problema.
Las imágenes que utilizamos en nuestro sistema no se redimensionan correctamente en la versión 5.0.2 de Xailer.
En la versión 5.0.1 funciona perfectamente.

Gracias,

André Corrêa
Avatar de Usuario
ignacio
Site Admin
Mensajes: 9252
Registrado: Lun Abr 06, 2015 8:00 pm
Ubicación: Madrid, Spain
Contactar:

Re: Lanzamiento de Xailer 5.0.2

Mensaje por ignacio »

Buenos días,

Somos conscientes del problema que se ha producido al añadir en esta última versión la posibilidad de hacer 'AutoFit' de la imagen en las coordenadas de pintado que se le indican. Estamos trabajando en una rápida solución que esperamos publicar cuanto antes. Mientras tanto pueden cargar las imágenes con Gdi+, ya que de esa forma os debería de funcionar perfectamente.

Un saludo
Ignacio Ortiz de Zúñiga
[Equipo de Xailer / Xailer team]
https://www.xailer.com
Responder