FiveTech Support Forums

Hello,

a Part of my Image-converter, to include in Your Application
Format-convert, Crop and Resize.
Full Souce is included :

Download ( 3.4 MB ) :
http://www.pflegeplus.com/fw_downloads/imgcrop1.zip

The Dialogs ( Convert, Resize and Crop ) don't need any Exit/close-buttons.
Open Dialogs are closed automatically, as soon a Button is selected !!!.

Select a Image from subdirectory /Images/???



Available format from FREEIMAGE

BMP Windows or OS/2 Bitmap File (*.BMP)
DDS DirectDraw Surface (*.DDS)
FAXG3 Raw Fax format CCITT G3 (*.G3)
GIF Graphics Interchange Format (*.GIF)
ICO Windows Icon (*.ICO)
IFF Amiga IFF (*.IFF, *.LBM)
JNG JPEG Network Graphics (*.JNG)
JPEG Independent JPEG Group (*.JPG, *.JIF, *.JPEG, *.JPE)
KOALA Commodore 64 Koala format (*.KOA)
MNG MNG
PBM Portable Bitmap (ASCII) (*.PBM)
PBMRAW Portable Bitmap (BINARY) (*.PBM)
PCD Kodak PhotoCD (*.PCD)
PCX Zsoft Paintbrush PCX bitmap format (*.PCX)
PGM Portable Graymap (ASCII) (*.PGM)
PGMRAW Portable Graymap (BINARY) (*.PGM)
PNG Portable Network Graphics (*.PNG)
PPM Portable Pixelmap (ASCII) (*.PPM)
PPMRAW Portable Pixelmap (BINARY) (*.PPM)
PSD Adobe Photoshop (*.PSD)
RAS Sun Rasterfile (*.RAS)
SGI Silicon Graphics SGI image format (*.SGI)
TARGA Truevision Targa files (*.TGA, *.TARGA)
TIFF Tagged Image File Format (*.TIF, *.TIFF)
WBMP Wireless Bitmap (*.WBMP)
XBM X11 Bitmap Format (*.XBM)
XPM X11 Pixmap Format (*.XPM)



Resize horizontal, vertical or percent :



Click Top/Left and Bottom/Right to Crop a Image-area



From a Dialog, You can export to a defined Directory
View the created Script, restore to Original or View the Result



Best Regards
Uwe

Thank You very much for the response.
I hope it will be useful.

Here is a multimedia-help for the Tool :

Download :
http://www.pflegeplus.com/fw_downloads/help1.zip



Maybe You still need some more Scripts ?
It is easy to include more Filters.



Flip and Rotate
-------------------
cScript1 := '-quiet -o ' + cNewfile + ' -rotate_flag smooth -rotate 90 -overwrite ' + cOrgfile
cScript1 := '-quiet -o ' + cNewfile + ' -rotate_flag smooth -rotate 180 -overwrite ' + cOrgfile
cScript1 := '-quiet -o ' + cNewfile + ' -rotate_flag smooth -rotate 270 -overwrite ' + cOrgfile
cScript1 := '-quiet -o ' + cNewfile + ' -rotate_flag smooth -yflip -overwrite ' + cOrgfile
cScript1 := '-quiet -o ' + cNewfile + ' -rotate_flag smooth -xflip -overwrite ' + cOrgfile

Sharpen
---------
// nSharpen = %
cScript2 := '-quiet -o ' + cNewFile + ' -sharpen ' + ALLTRIM(STR(nSharpen)) + ' -overwrite ' + cOrgfile

Contrast
----------
// nContrast = %
cScript3 := '-quiet -o ' + cNewFile + ' -contrast ' + ALLTRIM(STR(nContrast)) + ' -overwrite ' + cOrgfile

Lens-effect
--------------
// nLens = % of Image ( 100 % = Circle fills complete )
cScript4 := '-quiet -o ' + cNewFile + ' -lens ' + ALLTRIM(STR(nLens)) + ' -overwrite ' + cOrgfile

Adding Watermark
----------------------
// cWBitmapL = Watermakfile
// nWLeft = Left
// nWTop = Top
// nWTransp = transparent-level

cScript5 := '-quiet -o ' + cNewFile + ' -wmfile ' + cWBitmapL + ' -wmpos ' + ALLTRIM(STR(nWLeft)) + ' ' + ALLTRIM(STR(nWTop)) + ' -wmopacity ' + ALLTRIM(STR(nWTransp)) + ' -overwrite ' + cOrgfile

Brightness
--------------
// -% = darker, +% = lighter
cScript6 := '-quiet -o ' + cNewFile + ' -brightness ' + ALLTRIM(STR(nBright)) + ' -overwrite ' + cOrgfile

Emboss-effect
-----------------
cScript7 := '-quiet -o ' + cNewFile + ' -emboss -overwrite ' + cOrgfile

Convert to Grey
-------------------
cScript8 := '-quiet -o ' + cNewFile + ' -grey ' + ALLTRIM(STR(nGray)) + ' -overwrite ' + cOrgfile

Mosaic-effect
-----------------
// nMosaic = %
cScript9 := '-quiet -o ' + cNewFile + ' -mosaic ' + ALLTRIM(STR(nMosaic)) + ' -overwrite ' + cOrgfile

Swirl-effect
-----------------
// nSwirl = %
cScript10 := '-quiet -o ' + cNewFile + ' -swirl ' + ALLTRIM(STR(nSwirl)) + ' -overwrite ' + cOrgfile

Best Regards
uwe

Greetings Uwe:

Excellent work i had been very useful, I liked about the entire help file, but i have a question: how can you that the images will take effect for passing from one to another?

I am working with images and i would like them to go aquick

Thanks..

Uwe:

Like always, superb job !

Good Day Forum:

I found that with the example in made, unfortunately is not built with Fivewin, is an independent image editor:
Multimedia Builder 4.9.8.13, is very interesant and interactive..

Greetings.

Silvio,
Help-files, I'm creating with a external Multimedia Builder.
http://www.mediachance.com/mmb/
A compiler is included, to create a stand-alone EXE-file.
Many multimedia-effect are possible.

Víctor posted =>
I found that with the example in made, unfortunately is not built with Fivewin, is an independent image editor:
Multimedia Builder 4.9.8.13, is very interesant and interactive..

Best Regards
Uwe