Back To Dev. Page
This program is released in its FULL SOURCE code, but copyright is maintained to Eitan Gilboa.
Features: If you hate reading, then: DownLoad EgPicDBF Sources
Yes, I consider such an installation to be a feature <VBG> Nothing is changed to any of your computer's state. Everything is done in the program's directory. For the time being there is not even an .INI file.
- Unzip the compiled .exe file into any folder and eventually make some link to it, with or without a command line parameter. The Sources - Just unzip, load the .DPR and compile (Delphi 5)
This is a picture storage (in a dBase file's Memo) and display with many options, including a slide show. The particularity of EGPicDBF is that it stores, and displays, optional, user typed TEXT related to the picture. The text can be up to 64 K in size, and can be scrolled when viewing (not while a slide show is on, of course).
EGPicDBF can use any number of dBase files. This means that you can have many such files, each with a specific "topic". The files can have either a similar name (if not in the same directory) or any name.
If the directory in which the program is first run does not include a dBase file, then EGPicDBF creates an empty file called PICTURE. You can, at that time fill it up with a selection of the directory's photos.
EGPicDBF can take a command line parameter that fully specifies the path to a compatible (=EGPicDBF created) database file.
Example: EGPicDBF E:\delphi\eitan\delphi 5\JPG Topaz\Frontera Best\front.dbf
If the file exists then a full screen slide show will start immediately. If not then a message appears and the program waits for user input. During the slide show, any key press will stop it imediately and return to the program's normal screen. For automatic command line slide shows, I set the interval to 3 seconds.
You can create a new file and add into it a full directory of pictures or a selection of such in one go. simply mark the files you want to include and click OPEN.
While viewing an image you can:
DELETE it From the file (mark it for deletion).
RECALL it When deleted.
PRINT Image + text.
ADD One or more images to the file.
PACK The file (=remove all deleted records).
EDIT The text in the Memo. A Scroll bar is provided.
FULL SCREEN See it Full screen by clicking on the image. Return to normal by clicking again on it.
If the picture is not stretched to fill the area, then you have horizontal and vertical scroll bars available.
- Looping Show Yes/No. If YES then the show restarts when EOF is reached.
- Slide Show's Interval in seconds (UpDown * 1000)
- Auto Stretch: the displayed image. If ON then the image fills the display area. If not then scroll Bars allow browsing the rest of the image.
- Show Full Screen: Determines if a slide show will be full screen or in the default display area. (Activate/DeActivate by a click on the image).
- Show From Top: If yes, then all slide shows will start at the file's first record. If not, then it will start at the current record.
JPEG Specific Settings:
On the main screen:
- Full color or B/W
- Scale ratio (1:1, 1:2, 1:4, 1:8)
in the "utilitis" hidden panel:
- Quality or Speed precedence
- Pixel format (24 bit or 8 bit)
- Incremental display or progressive
The last three parameters come from Borland's JPG example, and at least on my computer, I see no difference in any action, but I left them there perhaps someone else will find them useful <VBG>
Petrus Van Breda published on his site a procedure to read JPEG files into a dBase DBF's Memo field using SSI's Topaz. I took the procedure and added everything else <g>. Charlie Chambers "jumped in" with his graphics expertise and helped me in some of the more obscure aspects of displaying images on screen.
Since it is a sort of combined efforts project, and since I made a point of not using any foreign components but Topaz, I decided to make the code available to anybody on my web site.
Petrus Van Breda: e-mail: email@example.com URL: http://www.geocities.com/spsoftdev
Charlie Chambers: e-mail: firstname.lastname@example.org
Eitan Gilboa: e-mail: eitang@Wanadoo.fr URL: http://perso.wanadoo.fr/eitang
Eitan, Back To Dev. Page
August 27th, 2001