Agradecimiento extendido obviamente para José Lalín
"Juan Castillo A." <
juanc@lasnovedades.com.mx> escribió en el mensaje news:4fb27402$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Muchísimas gracias Ramón, me funciono muy bien.
Saludos Cordiales.
A.P. Juan Castillo Arteaga.
Departamento de Sistemas.
C.Fernandez y Cia., S.A. de C.V.
"Juan Castillo A." <
juanc@lasnovedades.com.mx> escribió en el mensaje news:4fb18fb5$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Vaya que si ando en la luna, mi correo es
juanc@lasnovedades.com.mx
"Juan Castillo A." <
juanc@lasnovedades.com.mx> escribió en el mensaje news:4fb153ea$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Muchas gracias por tu respuesta Ramón, abusando, me podrias hacer el gran favor de mandarme una copia de tu libreria xagpd ?
Saludos Cordiales.
<
zeasoftware@hotmail.com> escribió en el mensaje news:[email=4faef1c1@svctag-j7w3v3j....]4faef1c1@svctag-j7w3v3j....[/email]
Yo lo utilizo y funciona perfecto...
ConvertToJPG( Trim(cUUID) + ".bmp" )
//---------------------------------------------------------- --------------------
//by: José Lalín
Function ConvertToJPG( cFileImage )
LOCAL hImage
Local cPath, cFileName, cExtension
HB_FNameSplit( cFileImage, @cPath, @cFileName, @cExtension )
WITH OBJECT GDP():Create()
IF :SaveToJPEG( cFileImage, cPath + cFileName + ".jpg", 100 )
// ? "Imagen jpg creada", cPath + cFileName+ ".jpg"
ENDIF
:Destroy()
END
RETURN ( Nil )
Saludos.
Ramón Zea
Móvil.: 993-231.62.29
Tel./Fax: 993-353-46-73
www.zeasoftware.com.mx
soporte@zeasoftware.com.mx
zeasoftware@hotmail.com
"Juan Castillo A." escribió en el mensaje de noticias:4faeb405$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Las descargas que encontre estan en
http://xailer.info/esp/?p=100 y
http://xailer.info/esp/?p=177, las pruebas las hice con la version 2.2.0, no
funciono, me regrese a la version 2.0.18 y tampoco; el interes es convertir
de bmp a jpg, alguna idea de como hacerlo de otra manera?
Saludos Cordiales.
Module: 'Module1.prg' was compiled into PCODE version: 9,this version of
xHarbour expects version: 10
"José Lalín" <
dezac@corevia.com> escribió en el mensaje
news:4fa7a25d$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Juan,
disculpa el retraso en responder.
> Module: 'BitmapCapture.Prg was compiled into PCODE version 9, this version
> of xHarbour expects version:10'
>
> Estoy programando con la version Xailer 2.2.0 (January 2011).
No tengo ninguna copia para esa versión de Xailer pero creo recordar que
las últimas versiones funcionaban con Xailer 2.2. De todas maneras busca en
los foros web, creo que hay varios hilos que hablan del tema y hay una
versión actualizada.
Si no la encuentras puedes usar la función nativa XA_CaptureBitmap().
Saludos,
José Lalín
--
