Page 1 of 1
ADJUST en Bitmap
Posted: Tue Mar 07, 2006 1:33 pm
by Carles
Antonio,
Como teneis el tema del ADJUST en los bitmaps ?
Aparece u2 mensajes -> Not implemented yet -> CreateBitmapIndirect() y SetStretchBlt()
Saludos.
C.
Posted: Tue Mar 07, 2006 3:52 pm
by Antonio Linares
Carles,
Son funciones que no soporta el API de Windows Mobile. Tenemos que implementar unas equivalentes, ó hacerlo de otra forma.
Posted: Wed Mar 08, 2006 7:50 am
by Carles
Antonio,
Esta bien, pero p.e. si ejecutas el codigo (tutor11) añadiendo el ancho y alto en oWnd:SayBitmap(), aparecen los dos mensajes pero despues muestra el bitmap redimensionado. No habria manera de momento, 'capar' estas dos funciones.
Code: Select all
#include "FWCE.ch"
//----------------------------------------------------------
function Main()
local oWnd, oBmp
DEFINE BITMAP oBmp FILE CurDir() + "\test.bmp"
DEFINE WINDOW oWnd TITLE "Tutor11"
ACTIVATE WINDOW oWnd ;
ON PAINT oWnd:SayBitmap( 10, 10, oBmp, 20, 20 ) // <- 20, 20
oBmp:End()
return nil
//----------------------------------------------------------
Nota: Para poner una imagen en el post, es necesario ponerla en una url primero ?. Como lo haces tu ?
Saludos.
C.
Posted: Wed Mar 08, 2006 8:42 am
by Antonio Linares
Carles,
Los avisos están puestos para recordar las funciones que no están disponibles en el API de Windows Mobile. Si conseguimos implementar una determinada funcionalidad de otra forma, entonces no son llamadas y no aparecen los mensajes
>
Nota: Para poner una imagen en el post, es necesario ponerla en una url primero ?. Como lo haces tu ?
>
Sí, primero alojas la imagen en un servidor de imágenes como
www.imageshack.us y te proporciona una dirección URL que es la que hay que copiar aqui.
Posted: Wed Mar 08, 2006 9:20 am
by Carles
Antonio
Yo lo decia, porque a apriori, he creado ejemplos jugando con el tamaño, y funciona perfectamente. Por eso te decia la posiblidad 'momentanea' de quitar los mensajes, para poder utilizar ya esta funcionalidad.
Imagen con parametros nWidth y nHeight
Imagen normal
Q te parece ?
Saludos.
C.
Posted: Thu Mar 09, 2006 7:38 am
by Antonio Linares
Carles,
Puedes poner el código del ejemplo completo ? gracias
Posted: Thu Mar 09, 2006 7:50 am
by Carles
Antonio,
Es el ejemplo tutor11, añadiendo en el metodo :Saybitmap(), el cuarto y quinto parametro (nWidth, nHeight)
Code: Select all
function Main()
local oWnd, oBmp
DEFINE BITMAP oBmp FILE CurDir() + "\test.bmp"
DEFINE WINDOW oWnd TITLE "Tutor11"
ACTIVATE WINDOW oWnd ;
ON PAINT oWnd:SayBitmap( 10, 10, oBmp, 20, 20 )
oBmp:End()
return nil
Saludos.
C.
Posted: Thu Mar 09, 2006 8:08 am
by Antonio Linares
Carles,
Corregido y publicado un nuevo build que además incluye la función SerialNumber() para obtener el identificador del Pocket PC.
Posted: Thu Mar 09, 2006 8:13 am
by Carles
Antonio,
Caray, q rapido cuando quieres ( o cuando puedes
)
Voy a probarlo a ver q tal. -> Gracias
Nota: ( Te envie el MsgGet corregido, lo recibiste ?)
Saludos.
C.
Posted: Thu Mar 09, 2006 10:18 am
by Antonio Linares
Carles,
Sí, lo recibí. Lo que ocurre es que aún no he tenido tiempo de revisarlo. Gracias