Displaying an image with xbrowse ( uwe )

[Rick Lipkin]

Uwe

I have seen your tools that will display an image with xBrowse .. I am trying to display part information and add a picture to a row and column.

I am using fwh 910 hoping that I can add a pic, gif, jpg, bmp to xBrowse .. or perhaps better yet .. if I have a link top the picture .. could I use a eval( codeblock ) to view the image in xBrowse ?

Code: Select all  Expand view  RUN

http://tewarehouse.com/core/media/media.nl?id=1399&c=640052&h=1a930fa87f162a5984cd&resizeid=-1&resizeh=75&resizew=75
 

http://tewarehouse.com/core/media/media ... resizew=75


Your help would be appreciated!

Rick Lipkin

[ukoenig]

Rick,

A question, do You need a Image-list ( all Fields are filled with Images )
or just displayed in one Column ?

Best Regards
Uwe

[Rick Lipkin]

Uwe

Thanks for the quick reply .. I want to create a 6th column (last column) to insert the picture of the part .. here is my xbrowse code..

Thanks
Rick

Code: Select all  Expand view  RUN

 REDEFINE xBROWSE oLBX2                ;
       ARRAY aResults                    ;
       COLUMNS 1,2,3,4,5                 ;
       COLSIZES 150,70,300,70,50         ;
       HEADERS "Site",                   ;
               "Part",                   ;
               "Desc",                   ;
               "Price",                  ;
               "Qty"                     ;
       ID 121 of oGrps                   ;
       AUTOSORT AUTOCOLS FASTEDIT LINES CELL

       oLbx2:Desc:cDataType := "M"
 

[nageswaragunupudi]

How are you storing picture information in your data file or array?

If you are storing as image buffer, simply add that column like any other column.
XBrowse automatically recognizes it to be a picture and shows the picture, without any need to write any specific code.

[Rick Lipkin]

Rao

The location of the file can be cached locally ( have to figure out how to copy it from the website ) or as a direct URL ..

The file location would be something like this :
cFILE := "c:\webcrawl\dbtmp\image.jpg"

or

cFILE := "http://tewarehouse.com/core/media/media.nl?id=1399&c=640052&h=1a930fa87f162a5984cd&resizeid=-1&resizeh=75&resizew=75"

Are you suggesting I can add either of those two values to my array like :

aLINE := { cURL,cITEM,cDESC,cPRICE,cQTY,cFILE }
SetRowHeight( oLbx2:Desc, aLine[ 3 ] )
AAdd( aResults, aLine )
oLbx2:Refresh()
oLbx2:GoBottom()

Thanks
Rick

[nageswaragunupudi]

If the image is stored in a file then after usually defining the browse,
set
oBrw:aCols[ 6 ]:cDataType := "F".
Setting the datatype to "F" tells xbrowse not to display the contents of aLine[6] ( which is file name) as a character value, but to read the file and display the contents as an image.

Better way is this.
I guess you are reading the image buffer in to memory and then store it as a file.
You can skip this step.
Read the image buffer directly into aLine[ 6 ].
You do not have to specify any datatype to aCols[ 6 ].
When xbrowse tries to display the contents of aLine[6], it recognizes the value as a binary data representing image and automatically displays it as image.

[Rick Lipkin]

Rao

I used your column suggestion and I did get the picture which I had manually saved as a file to my computer to work ..



Just curious .. if I have a link to a picture .. is it possible to eval that in the pic column ?

http://tewarehouse.com/core/media/media ... resizew=75

Otherwise I will need to devise a way to copy the file under program control from the website and then show it as a picture file.

Any ideas ?

Thanks
Rick

[nageswaragunupudi]

XBrowse does not have inbuilt capability to read from a weblink.

[Rick Lipkin]

Rao

Thanks .. I am working on the logic to copy the file down to my computer during the 'crawl' .. found a VB script that works which I think I can easily adapt.

Rick Lipkin

[ukoenig]

Rick,

for a new Update, I added the Internet-Option, to read / fill a Directory-array
with Infos from my Homepage-picture Directory, to show the Images in xbrowse.

WinSCP download :
http://winscp.net/eng/download.php

reading about WinSCP
http://winscp.net/eng/docs/

includes a Scripting-language, Commandline-mode and is absolutely FREE.
Connect to Your Homepage ( Upload / Download ), sending Emails .....
You can include and deliver the Files with Your application.

After the Install, I used only 4 Files, copied to my Sub-directory => \Internet
after that, I uninstalled again.

1. WinSCP.exe => Graphical user interface
2. WinSCP.com => Batch file scripting and command-line interface
3. DragExt.dll
4. WinSCP.ger => German-language-file

Connecting to the Homepage using a SCRIPT ( Log-file Log.txt created ) :

@ 70, 20 BTNBMP oBtn2 OF oDlg5 ;
SIZE 120, 40 PIXEL ;
PROMPT " &Connect to Internet" FILE c_path + "\Bitmaps\Internet.bmp" 2007 ;
FONT oTxtfont LEFT ;
ACTION WaitRun( c_path + "\Internet\WinSCP.exe /console /script=copy.txt /log=log.txt > log.txt", 0", 0 )
oBtn2:cToolTip = { "Connect to " + CRLF + "Internet", "Internet-Connection", 1, CLR_BLACK, 14089979 }

Save Script ( connects to a Homepage ) as Copy.txt
( there is a Forum about Scripting )

option batch on
option confirm off
# open ftp://[USER]:[PASSWORD]@[DOMAIN]:[PORT] You can define a Start-directory in DOMAIN
open ftp://??????? : ???????@esc-engineering.de/software/Pictures/ : 21
# add the actions, what You want to do
close
exit

Features :

•Graphical user interface
•Translated into several languages
•Integration with Windows (drag&drop, URL, shortcut icons)
•All common operations with files
•Support for SFTP and SCP protocols over SSH-1 and SSH-2 and plain old FTP protocol
•Batch file scripting and command-line interface
•Directory synchronization in several semi or fully automatic ways
•Integrated text editor
•Support for SSH password, keyboard-interactive, public key and Kerberos (GSS) authentication
•Integrates with Pageant (PuTTY authentication agent) for full support of public key authentication with SSH
•Explorer and Commander interfaces
•Optionally stores session information
•Optionally supports portable operation using a configuration file in place of registry entries, suitable for operation from removable media

1. Connecting to the Homepage
2. Filling the Directory-Array

1. Connecting to my Homepage Image-directory



2. The Connecting-defines



Possible to define / select a Homepage as project.
You can define as many You like



3. Connected to the Homepage, a Filemanager opens, to select Images, Create Directorys, copy Files .....



4. Selecting the Directory of the stored / downloaded Images from Internet



5. The Result in xBrowseshows the downloaded Images



Best Regards
Uwe

[byron.hopp]

Thank you, this works great. I even have my program write the script file so it becomes dynamic. Works very well, and it is free. Your program can read the log file to make sure it is successful.

[nageswaragunupudi]

XBrowse does not have inbuilt capability to read from a weblink.

We can now read images from URLS automatically without any additional programming.

Code: Select all  Expand view  RUN

#include "fivewin.ch"

#define MANGOES "https://img.huffingtonpost.com/asset/5c1225351f0000f00626a771.jpeg?ops=scalefit_630_noupscale"
#define APPLES  "https://cdn.images.express.co.uk/img/dynamic/109/590x/Apple-links-587431.jpg"
#define GRAPES  "https://img-aws.ehowcdn.com/350x235p/s3-us-west-1.amazonaws.com/contentlab.studiod/getty/f36944f5be3843ddafebd89b1dca105f.jpg"
#define ORANGES "https://www.jesmondfruitbarn.com.au/wp-content/uploads/2016/10/Jesmond-Fruit-Barn-Oranges.jpg"

function Main()

   local aData := { { "MANGOES", MANGOES }, { "APPLES",  APPLES  }, ;
                    { "GRAPES",  GRAPES  }, { "ORANGES", ORANGES }  }

   XBROWSER aData SETUP ( oBrw:nRowHeight := 150, oBrw:aCols[ 2 ]:cDataType := "F" )

return nil