FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Problem with Timage...
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
Problem with Timage...
Posted: Fri Oct 02, 2009 10:51 PM
Hello everybody.

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

Code (fw): Select all Collapse
 
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
;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
Posts: 603
Joined: Sun May 04, 2008 08:44 PM
Re: Problem with Timage...
Posted: Fri Oct 02, 2009 11:22 PM

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

try this.

Posts: 4043
Joined: Wed Dec 19, 2007 06:40 PM
Re: Problem with Timage...
Posted: Fri Oct 02, 2009 11:43 PM
Are You looking for a Solution of a xBrowse-Selection and Display the Image on a Folder-Page ?



Best Regards
Uwe :-)
Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.
Posts: 883
Joined: Tue Oct 11, 2005 11:57 AM
Re: Problem with Timage...
Posted: Sun Oct 04, 2009 10:48 PM

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

;-) Ji,ji,ji... buena la cosa... "all you need is code"

http://www.xdata.cl - Desarrollo Inteligente
----------
Asus TUF F15, 32GB Ram, 2 * 1 TB NVME M.2, GTX 1650
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Problem with Timage...
Posted: Sun Oct 04, 2009 11:13 PM
Adolfo,

Have you checked that the file exists ?

Code (fw): Select all Collapse
MsgInfo( File( oDbMOD:Foto ) )

REDEFINE IMAGE ...
regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion