Problem with Timage...

[Adolfo]

Hello everybody.

I have the following code to obtain a JPG and get the path, I also show the image on the folder

Code: Select all  Expand view

REDEFINE IMAGE oImg FILE (oDbMOD:Foto) ADJUST NOBORDER ID 103 OF oFld:aDialogs[ 5 ] UPDATE PIXEL

REDEFINE GET oGet100 VAR oDbMod:FOTO   ID 101 Of oFld:aDialogs[ 5 ] Picture "@K!" VALID ( oImg:LoadBmp(ALLTRIM(oDbMod:FOTO)), oImg:Refresh(), .T.) ACTION ( oDbMod:FOTO:=cGetFile32("JPEG  | *.jpg |" + "Todos los Archivos | *.* ","Seleccione una imagen",1,cPathFoto,,.T.), oGet100:refresh()) update
 

But I get this




Where the image was supposed to be.. I only see some scrolling lines, not the image

I use xHarbour, FWH908

From Chile
Adolfo

[lailton.webmaster]

REDEFINE IMAGE oImg FILENAME oDbMOD:Foto ADJUST NOBORDER ID 103 OF oFld:aDialogs[ 5 ] UPDATE PIXEL

try this.

[ukoenig]

Are You looking for a Solution of a xBrowse-Selection and Display the Image on a Folder-Page ?



Best Regards
Uwe

[Adolfo]

Hi.

Thank you guys for your advices but...

not working..

The same code was working without problems with 8.12
Now with 908, theres no image, just a bunch o lines scrolling where the photo was supposed to be

Any help will be appreciated.
Adolfo

[Antonio Linares]

Adolfo,

Have you checked that the file exists ?

Code: Select all  Expand view

MsgInfo( File( oDbMOD:Foto ) )

REDEFINE IMAGE ...