FiveTech Support Forums

Hello,
the Download-Link for the < xBrowse-ImageViewer > Release 1.5 :



Included :
PRG, PIXELFORMER, FREEIMAGE.dll, Desktop Screenresolution switch
some nice Image-collections are included as well
have a look at the bottom of the PRG for xBrowse-changes ( from Rao ) for new compile.
As well You must change the Rmk-file ( path defines )
In case something is not working, just let me know.

Thanks to Mr. Rao, who helped, to put this Project into practice !!!

You are welcome, to join the Project with new Ideas or maybe changes to make it better.

Download ( 8.2 MB )
http://www.pflegeplus.com/fw_downloads/xbrwImage.zip

You can update from older Releases to 1.5
Download ( 0.9 MB only Main-files )
http://www.pflegeplus.com/fw_downloads/xbrwImage1.zip



Best Regards
Uwe

Silvio,

I noticed a small Problem, switching between Directorys.
I will test and fix it.

Here is the Update Release 1.1 => Release 1.2

Download ( 0.9 MB only Exe and Prg )

http://www.pflegeplus.com/fw_downloads/xbrwimage1.zip

Best Regards
Uwe

Ukoenig,



to

Carles,

Thank You very much.
Is fixed for the next Update.

There is a mistake I noticed, testing different Screen-resolutions.
I have to work with calculated, fixed Values for Dialog and Background-image ( Brush )
not the detected ( only for RESET ) :
nScrwidth := GetSysmetrics( 0 ) // Width of screen.
nScrheight := GetSysmetrics( 1 ) // Height of screen.
is fixed as well.

DEFINE DIALOG oDlg1 FROM 0, 0 TO 720, 1004 PIXEL ; // TRANSPARENT ;
STYLE WS_POPUP | WS_VISIBLE | WS_DLGFRAME | WS_THICKFRAME
oBrush1 := TBrush():new( ,,,, ResizeBmp( oTmp:hBitmap, 1004, 720, .T. ) )
oDlg1:Setbrush( oBrush1 )
oTmp:End()

Best Regards
Uwe

Updated to => Release 1.3

Download ( 2.0 MB includes : Exe, Prg, Backgrd.jpg and Freeimage.pdf )
http://www.pflegeplus.com/fw_downloads/xbrwimage1.zip

Changes / New :
1.
Adjustment of Screen-resolution ( new Background-image added )
Dialog and Brush changed to calculated, fixed Dimension.
A Screen-change to the used 1024 x 768 Screen-resolution shows the Dialog with Border adjusted to Screen.

DEFINE DIALOG oDlg1 FROM 0, 0 TO 720, 1004 PIXEL ;
STYLE WS_POPUP | WS_VISIBLE | WS_DLGFRAME | WS_THICKFRAME
oBrush1 := TBrush():new( ,,,, ResizeBmp( oTmp:hBitmap, 1004, 720, .T. ) )
oDlg1:Setbrush( oBrush1 )
oTmp:End()

2.
Changing the Image-format-filter, didn't detect a Directory-switch from Default to Destination and reverse.
it is working now.

3.
A wrong Path for the Read-directory was saved to the INI-file.
It is fixed now.
With a non existing SYSTEM.INI, the Read- and Destination-path will be ???/bitmaps/
Closing the Application, the used Read- and Destination-path is saved to the INI.
At new Start they are loaded from the INI-file and displayed as default.

4.
Changed Text < Save > to < Dest.> to make it the same like the Button.

5.
Freeimage.pdf added for Format-infos and maybe needed Commands



Best Regards
Uwe

Updated to => Release 1.4

Download ( 2.0 MB includes : Exe, Prg, Backgrd.jpg, Zoom.bmp and Freeimage.pdf )
http://www.pflegeplus.com/fw_downloads/xbrwimage1.zip
Please add < Clouds.bmp > from FWH/bitmaps/backgrounds ( missing in Update )

Changes / New :

A new Zoom-button is added, to adjust ALL Images to the selected Cell-size.
It works like a Switch between normal- and adjusted Size.
The same Row of the Image is selected after Zoom.
Slowly, no Space left on Screen !



All Images adjusted to Cell-size ( useful viewing small Images like 16x16 or 24x24 ) :



Best Regards
Uwe

New Image-viewer Release 1.5
because of many changes, I hope everything works OK.
Just let me know.

Some new Functions added :
1. a second Painter ( User defined )
2. Quick Image-seek
3. Action on Background-image
4. Zoom-switch between Original-size <> Cell-adjusted

We could save the Userdefined Graphic-application to the INI
and the User can change it from inside the Program.
Could be a usefull Option ???

@ 100, 462 BTNBMP oBtn6 FILENAME c_path + "\Bitmaps\Paint.bmp" ;
SIZE 40, 38 OF oDlg1 PIXEL NOBORDER ;
TOP ;
PROMPT " &Ms-Paint" ;
FONT oTxtfont ;
ACTION WaitRun( 'MsPaint.exe' + " " + cImgname )



the Download-Link ( Full Version 8.2 MB ) :
http://www.pflegeplus.com/fw_downloads/xbrwImage.zip

the Download-Link ( Update 0.9 MB ) :
http://www.pflegeplus.com/fw_downloads/xbrwImage1.zip
please add < Clouds.bmp > to Subdir /Bitmaps ( needed for Image-info missing in Update )

Clouds.bmp




Best Regards
Uwe

Owe, a TIF file is a file with multiple pictures inside. Is normal used to store FAX, fotoalbum, etc. In your sample with my files show the main picture, but it must show all the pictures when we dobleclick. I think we must to do another browse to show all the pictures. Here you have a samble with 3 pictures inside.
https://rapidshare.com/files/459087202/sample.TIF. I use that file to store fotos like an albumbook because it can be easy linked with a record in a datafile.

Could you please see the sample.tif.

Thanks

Andres,

I changed MsPaint to xNView ( Freeware )
I added the Button for selecting the Grafic-application ( under Construction )
You can download the Update again if You like it, it is included.

using xNView instead of MsPaint

@ 85, 462 BTNBMP oBtn6 FILENAME c_path + "\Bitmaps\Paint.bmp" ;
SIZE 40, 38 OF oDlg1 PIXEL NOBORDER ;
TOP ;
PROMPT " &xNView" ;
FONT oTxtfont ;
ACTION WaitRun( "C:\Program Files\XnView\xnview.exe" + " " + cImgname )

Under Construction !




The different Frames of the selected TIFF :







Best Regards
Uwe

Andrés,

Loading a Image using FREEIMAGE.dll, the Help shows a needed Flag-setting :

I don't know, if it is possible to define this Flag and display the Frames inside xbrowse.
It could be a nice Option.

Best Regards
Uwe