ADJUST en Bitmap

ADJUST en Bitmap

Postby Carles » Tue Mar 07, 2006 1:33 pm

Antonio,

Como teneis el tema del ADJUST en los bitmaps ?

Aparece u2 mensajes -> Not implemented yet -> CreateBitmapIndirect() y SetStretchBlt()


Saludos.
C.
User avatar
Carles
 
Posts: 1139
Joined: Fri Feb 10, 2006 2:34 pm
Location: Barcelona

Postby Antonio Linares » Tue Mar 07, 2006 3:52 pm

Carles,

Son funciones que no soporta el API de Windows Mobile. Tenemos que implementar unas equivalentes, ó hacerlo de otra forma.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42127
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Carles » Wed Mar 08, 2006 7:50 am

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  Expand view  RUN
#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.
User avatar
Carles
 
Posts: 1139
Joined: Fri Feb 10, 2006 2:34 pm
Location: Barcelona

Postby Antonio Linares » Wed Mar 08, 2006 8:42 am

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.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42127
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Carles » Wed Mar 08, 2006 9:20 am

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

Image


Imagen normal

Image


Q te parece ?

Saludos.
C.
User avatar
Carles
 
Posts: 1139
Joined: Fri Feb 10, 2006 2:34 pm
Location: Barcelona

Postby Antonio Linares » Thu Mar 09, 2006 7:38 am

Carles,

Puedes poner el código del ejemplo completo ? gracias :)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42127
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Carles » Thu Mar 09, 2006 7:50 am

Antonio,

Es el ejemplo tutor11, añadiendo en el metodo :Saybitmap(), el cuarto y quinto parametro (nWidth, nHeight)


Code: Select all  Expand view  RUN
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.
User avatar
Carles
 
Posts: 1139
Joined: Fri Feb 10, 2006 2:34 pm
Location: Barcelona

Postby Antonio Linares » Thu Mar 09, 2006 8:08 am

Carles,

Corregido y publicado un nuevo build que además incluye la función SerialNumber() para obtener el identificador del Pocket PC.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42127
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Carles » Thu Mar 09, 2006 8:13 am

Antonio,

Caray, q rapido cuando quieres ( o cuando puedes :wink: )

Voy a probarlo a ver q tal. -> Gracias

Nota: ( Te envie el MsgGet corregido, lo recibiste ?)


Saludos.
C.
User avatar
Carles
 
Posts: 1139
Joined: Fri Feb 10, 2006 2:34 pm
Location: Barcelona

Postby Antonio Linares » Thu Mar 09, 2006 10:18 am

Carles,

Sí, lo recibí. Lo que ocurre es que aún no he tenido tiempo de revisarlo. Gracias
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42127
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to To do - WishList / Por hacer - Peticiones

Who is online

Users browsing this forum: No registered users and 2 guests