TImage:Hbmppal error

TImage:Hbmppal error

Postby 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.
User avatar
dbzap
 
Posts: 189
Joined: Mon Nov 07, 2005 7:36 pm
Location: Chile

Postby Antonio Linares » Mon Apr 10, 2006 4:31 pm

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

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

Postby 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.
User avatar
dbzap
 
Posts: 189
Joined: Mon Nov 07, 2005 7:36 pm
Location: Chile

Postby Antonio Linares » Mon Apr 10, 2006 7:07 pm

Es una ventana MDI ?
regards, saludos

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

Postby 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.
User avatar
dbzap
 
Posts: 189
Joined: Mon Nov 07, 2005 7:36 pm
Location: Chile

Postby Antonio Linares » Tue Apr 11, 2006 8:24 am

Revisa samples\ImgTest.prg
regards, saludos

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


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 90 guests