PONER VARIAS IMAGENES EN UN DIALOGO

Post Reply
Marco Augusto
Posts: 122
Joined: Wed Oct 12, 2005 1:03 pm
Location: Cuernacava, Morelos Mexico

PONER VARIAS IMAGENES EN UN DIALOGO

Post by Marco Augusto »

SALUDOS

ALGUIEN ME PODRIA INDICAR COMO COLOCAR VARIAS IMAGENES
EN UN DIALOGO
HAGO LO SIGUIENTE:


Procedure Main()
LOCAL oBmp,oDlg

DEFINE DIALOG oDlg FROM 0,0 TO 35,100 TITLE "Test FreeImage"

DEFINE IMAGE oBmp FILE "001.jpg" OF oDlg
DEFINE IMAGE oBmp2 FILE "002.jpg" OF oDlg

oDlg:bPainted:={|hDC|PalBmpDraw(hDC, 0,450, oBmp:hBitmap,,350,300,.T.)}
oDlg:bPainted:={|hDC|PalBmpDraw(hDC, 0, 0,oBmp2:hBitmap,,350,300,.T.)}

ACTIVATE DIALOG oDlg CENTER


PERO SOLO APARECE LA SEGUNDA IMAGEN
Marco Augusto Rodriguez Manzo
fwh 2020 Xharbour 1.2.3
MySQL 5.0.19 Fastreport

PERZO SOFT
Sistemas Personalizados
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Post by Antonio Linares »

Usa solo uno:

oDlg:bPainted:={|hDC|PalBmpDraw(hDC, 0,450, oBmp:hBitmap,,350,300,.T.),;
PalBmpDraw(hDC, 0, 0,oBmp2:hBitmap,,350,300,.T.)}
regards, saludos

Antonio Linares
www.fivetechsoft.com
Marco Augusto
Posts: 122
Joined: Wed Oct 12, 2005 1:03 pm
Location: Cuernacava, Morelos Mexico

Post by Marco Augusto »

MUCHAS GRACIAS
FUNCIONO OK
Marco Augusto Rodriguez Manzo
fwh 2020 Xharbour 1.2.3
MySQL 5.0.19 Fastreport

PERZO SOFT
Sistemas Personalizados
Post Reply