Una Foto en listado twbrowse se muestra transparente

Una Foto en listado twbrowse se muestra transparente

Postby GUSPRE » Wed Jan 03, 2007 10:04 pm

Una Pregunta, en un listado donde se muestran datos de personas y fotos , las mismas se muestran como si fueran transparentes, o sea cambian algunos pixeles color fondo y faltan partes de la imagen. Hay alguna forma de decirle al wbrowse que no las muestra transparentes ?

Saludos,
GUSTAVO PREDIGER
User avatar
GUSPRE
 
Posts: 94
Joined: Thu May 11, 2006 10:00 pm
Location: BS.AS.ARGENTINA

Postby Antonio Linares » Wed Jan 03, 2007 11:15 pm

Gustavo,

El color del pixel 0,0 del bitmap se usa como máscara para la transparencia. Cambia el pixel 0,0 del bitmap a otro color, un color que no esté en la foto.
regards, saludos

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

Postby GUSPRE » Thu Jan 04, 2007 2:48 pm

Gracias por la respuesta, pero no he podido arreglarlo, a continuación esta la funcion que levanta los bmp del disco para mostrarlos en el wbrowse. Que estoy haciendo mal ?, sigue mostrando partes de la imagen con pixeles del color del fondo. Las fotos fueron tomadas con una camara USB y grabadas en formato BMP, solo se muestran mal en el listbox.-

Muchas Gracias y Saludos.-

esto en el wbrowse

@ 0,0 LISTBOX oBremp ; FIELDS trae_cara(oBemp),;


*------------------------------------------------------
* TRAE CARA SI ESTA *
*------------------------------------------------------
FUNCTION trae_cara(oBemp)

LOCAL cim:="", hBitmap

car:=ud+"\GRCARD\IMLE\F"+STRZERO((oBemp)->EMP_LEGA,7)+".BMP"
IF FILE(car)
If( hBitmap != nil, ( DeleteObject( hBitmap ), hBitmap := nil ),)
hBitmap := readbitmap( 0, car )
SetPixel( hBitmap, 0, 0, rgb(255,0,0) )
cim:=hBitmap
ENDIF

RETURN(cim)
GUSTAVO PREDIGER
User avatar
GUSPRE
 
Posts: 94
Joined: Thu May 11, 2006 10:00 pm
Location: BS.AS.ARGENTINA

Postby GUSPRE » Thu Jan 04, 2007 3:25 pm

Aqui adjunto imagen de lo que me sucede,
me esta sacando canas verdes!!

Muchas Gracias y saludos,

Image
GUSTAVO PREDIGER
User avatar
GUSPRE
 
Posts: 94
Joined: Thu May 11, 2006 10:00 pm
Location: BS.AS.ARGENTINA

Postby Antonio Linares » Thu Jan 04, 2007 5:46 pm

Gustavo,

Que browse estás usando ?
regards, saludos

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

Postby GUSPRE » Thu Jan 04, 2007 6:59 pm

Antonio estoy usando:

fwh 2.6 03/2005
Compiler version: xHarbour build 0.99.51 Intl. (SimpLex)
Clase TWBrowse by Hernan Ceccarelli Ver: 15

Probé actualizar el wbrowse a la versión 17 que esta en utilidades pero me tiro errores, creo que funciona solo con versiones de fwh superiores.. será esto el problema ?

Saludos y Gracias,
GUSTAVO PREDIGER
User avatar
GUSPRE
 
Posts: 94
Joined: Thu May 11, 2006 10:00 pm
Location: BS.AS.ARGENTINA

Postby Antonio Linares » Fri Jan 05, 2007 7:05 am

Gustavo,

En el módulo wbrwline.c del browse de Hernán se está llamando a DrawMasked(). Hay que cambiarlo para que llame a DrawBitmap() y modificar un poco los parámetros que se le pasan
regards, saludos

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

Postby GUSPRE » Fri Jan 05, 2007 1:03 pm

Muchas gracias Antonio, ya lo encontre, lo probaré ahora...

Saludos.-
GUSTAVO PREDIGER
User avatar
GUSPRE
 
Posts: 94
Joined: Thu May 11, 2006 10:00 pm
Location: BS.AS.ARGENTINA


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot], jair and 35 guests