Image Resizing

[srussell]

Hello All,

I've looked around the forum and found Intrigued's project using ImageMagic to resize an image, but the EXE seems rather hefty (4.4 MB)

Does anyone know of a a DLL or EXE (free or cheap) and a bit smaller with a command line function that will let me create a 100x100 thumbnail in AutoPlay? All I need is to resize the image... no cropping, etc.

Anyone interested in writing a DLL?

Any input is always appreciated!

Steve Russell

[jfxwave]

I got this from the forum a while back (I think it was from Worm but not sure)

[Dermot]

Here is a small dll I created for my needs. Only returns a JPG but can accept BMP, PNG and JPG.

Use it like this.

local SourceImage = "Full Path To Your Image" -- Can be BMP, PNG or JPG
local Width = 100
local Height = 100
local SaveAs = "Full path and file name to save resized image as" -- Must have ".jpg" extension
local Format = "JPG" -- Only JPG supported
	
local result = DLL.CallFunction(_SourceFolder.."\\AutoPlay\\Docs\\xImage.dll", "Convert_Image", "\""..SourceImage.."\",\""..SaveAs.."\",\""..Width.."\",\""..Height.."\",\""..Format.."\"", DLL_RETURN_TYPE_STRING, DLL_CALL_STDCALL)
	
if result == "OK" then
	Dialog.Message("Done", "Image resized and saved as "..SaveAs)
else
	Dialog.Message("Error", result)
end

[srussell]

A great thanks... I'll try both of these out!

[srussell]

Dermot, that worked out perfectly... many thanks!

[clueless]

Here's a small command line program i wrote that outputs to BMP

Picres is a picture resizer that accepts BMP,PNG,JPG,GIF,icon)
Filesize 74kb

The command line syntax is :
Picres [SourceFile]#[TargetFile]#[Optional new width]#[Optional new height]

File.Run("AutoPlay\\Docs\\MyProg.exe","Pic.bmp#ResizedPic.bmp#200#200", "", SW_SHOWNORMAL, true);

The program can be used as a simple 'to bmp' format coverter if the width and height are left out:
Picres [SourceFile]#[TargetFile]

File.Run("AutoPlay\\Docs\\MyProg.exe","Pic.bmp#ResizedPic.bmp", "", SW_SHOWNORMAL, true);

[thetford]

what about calling windows GDI32.DLL? Is it possible?

[srussell]

what about calling windows GDI32.DLL? Is it possible?

Haven't tried it myself, but might be possible? Right now I'm using Dermot's DLL, which works perfectly - thanks Dermot!

[yosik]

Question to Dermot:
How can you keep the image proportions? Can the resize be done in percentage instead of pizels?
Maybe by checking the original image size? Is there a way to do that?

Thanks

Yossi

[RizlaUK]

Can the resize be done in percentage instead of pizels?

you can do that in AMS then pass the size to the dll, i have a function in a apz somewhere that divides a number into 100% subtracts or adds the required amount (in%) then returns the amended size based of the original size, just for things like this, but do you think i can find it.....no, i'll keep looking

[Dermot]

The dll will keep the image proportional so you don't have to worry about. As RizlaUK says, you should be able to use AMS to calculate percentages and come up with the new size and then pass that to the dll.

[yosik]

Sorry, I don't get it.
Your code makes use of width and height:

local result = DLL.CallFunction(_SourceFolder.."\\AutoPlay\\Docs\\xImage.dll", "Convert_Image", "\""..SourceImage.."\",\""..SaveAs.."\",\""..Width.."\",\""..Height.."\",\""..Format.."\"", DLL_RETURN_TYPE_STRING, DLL_CALL_STDCALL)

How can I keep proportion if I don't know what they are (image in landscape or portrait for example).
Let's say I have a 640X 480 image. Choosing width=320 and height=240 will give me exactly 1/4 size image without distortion. But if I start with a 480X640 image (portrait) and set the same width (320) and height(240), the image will be distorted.

What I want is a way to resize images to same size but keep proportions.

Thank you

Yossi

[Dermot]

Sorry, I don't get it.
Your code makes use of width and height:

local result = DLL.CallFunction(_SourceFolder.."\\AutoPlay\\Docs\\xImage.dll", "Convert_Image", "\""..SourceImage.."\",\""..SaveAs.."\",\""..Width.."\",\""..Height.."\",\""..Format.."\"", DLL_RETURN_TYPE_STRING, DLL_CALL_STDCALL)

How can I keep proportion if I don't know what they are (image in landscape or portrait for example).
Let's say I have a 640X 480 image. Choosing width=320 and height=240 will give me exactly 1/4 size image without distortion. But if I start with a 480X640 image (portrait) and set the same width (320) and height(240), the image will be distorted.

What I want is a way to resize images to same size but keep proportions.

Thank you

Yossi

It will resize the image as close to the speicfied size as possible without distorting. It will never distort. If you want to pass the correct width and height based on the original size then use this
new_width = (new_height * old_width) / old_height
or
new_height = (old_height * new_width) / old_width

[Intrigued]

Here is a small dll I created for my needs. Only returns a JPG but can accept BMP, PNG and JPG.

Use it like this.

local SourceImage = "Full Path To Your Image" -- Can be BMP, PNG or JPG
local Width = 100
local Height = 100
local SaveAs = "Full path and file name to save resized image as" -- Must have ".jpg" extension
local Format = "JPG" -- Only JPG supported
	
local result = DLL.CallFunction(_SourceFolder.."\\AutoPlay\\Docs\\xImage.dll", "Convert_Image", "\""..SourceImage.."\",\""..SaveAs.."\",\""..Width.."\",\""..Height.."\",\""..Format.."\"", DLL_RETURN_TYPE_STRING, DLL_CALL_STDCALL)
	
if result == "OK" then
	Dialog.Message("Done", "Image resized and saved as "..SaveAs)
else
	Dialog.Message("Error", result)
end

Mirrored on amsuser.com, here:

http://www.amsuser.com/ams/examples/...MS7-Dermot.zip

Thanks Dermont.

[yosik]

ok. It looks like I didn't explain myself correctly.

I want to use your Dll to batch resize images from a directory. Some images are landscape, some portraits and not all are the same size, so I DON"T KNOW what the size of the images are.
I want all of the images to be resized to a set value (either width or height) but without distorting them.
I have been looking for a way to check an image size from a file, and THEN I could use your method. BUt I couldn't find it.

I hope this is clearer.
Thank you for trying to help.

Yossi

Edit:
It just struck me. There is an Image.GetFileInfo action which I forgot existed. THIS will give me the necessary information I need.
I think I got that baby licked. I will work on that tomorrow. Thank you all for now