TImage:Hbmppal error

dbzap · Post by **dbzap** » Mon Apr 10, 2006 3:36 pm

Quiero imprimir una imagen o mostarla en pantalla ( centrada en lo posible ) pero lo unico que obtengo en ese error en impresion y en pantalla no muestra nada ( esta pegada al EXE ).
Revise los ejemplos pero no logro imprimir.
Agradecido de antemano.

Post by **Antonio Linares** » Mon Apr 10, 2006 4:31 pm

Ya no se usa hBmpPal. Ahora se usa hBitmap (por razones de 32 bits).

dbzap · Post by **dbzap** » Mon Apr 10, 2006 5:01 pm

Sip, ya me entere. Pero no logro dar en el clavo, pues este es mi codigo para desplegar una imagen centrada en mi ventana principal

oWnd:bPainted = { | hDC | PalBmpDraw( hDC,;
(oWnd:nTop()-50)+((oWnd:nHeight()-nBmpHeight( oBmp:hBitmap ))/2),;
oWnd:nLeft()+((oWnd:nWidth()-nBmpWidth( oBmp:hBitmap ))/2),;
oBmp:hBitmap ) }

ACTIVATE WINDOW oWnd ;
ON INIT ( If( controlar, control( oWnd, intervalo ), NIL ),;
oWndPrincipal := oWnd ) ;
MAXIMIZED

Pero no muestra nada en la pantalla.
El EXE tiene el BMP que quiero mostrar ( incrustado, lo revisé )
Definí el objeto antes de iniciar la ventana asi :

DEFINE BITMAP oBmp RESOURCE "RANDOM"

No se en que fallo.
De todas formas ando buscando.
Gracias de antemano.

Post by **Antonio Linares** » Mon Apr 10, 2006 7:07 pm

Es una ventana MDI ?

dbzap · Post by **dbzap** » Mon Apr 10, 2006 7:12 pm

No es solo mi ventana principal, desde alli solo se gatillan llamadas a dialogs.
Por eso me parece que es raro el comportamiento.

Post by **Antonio Linares** » Tue Apr 11, 2006 8:24 am

Revisa samples\ImgTest.prg