ImageEn for Delphi and C++ Builder ImageEn for Delphi and C++ Builder

 

ImageEn Forum
Profile    Join    Active Topics    Forum FAQ    Search this forumSearch
Forum membership is Free!  Click Join to sign-up
Username:
 Password:
Save Password
Forgot your Password?

 All Forums
 ImageEn Library for Delphi, C++ and .Net
 ImageEn and IEvolution Support Forum
 Help with saving Multi tif scanned images to single images in a shared folder		  New Topic  Reply to Topic
Author Previous Topic Topic Next Topic  

tgentry252

USA
5 Posts
Posted - Nov 13 2024 :  10:10:16  Show Profile  Reply
Can someone advise me on how to save scanned images into single images without the first image being 0.tif? I have tried the code below and it will save the images as 0.tif 1.tif 2.tif etc. I need for them to save as 1.tif 2.tif 3.tif etc. Im using EnMview as the folderview.

Thank you,

for I := 0 to folderview.ImageCount -1 do
folderview.GetImageToFile(i,(trim(paramado.fieldbyname('imagepath').Value+ 'images\' +trim(adoptado.FieldByName('imagenumber').Value)+trimleft('\') + inttostr(i)  + '.tif')));

xequte

38607 Posts
Posted - Nov 13 2024 :  13:33:52  Show Profile  Reply
Hi

To save all files in a TImageEnMView or TImageEnFolderMView to a single file, you can use:

folderview.MIO.SaveToFile( 'D:\0.tif' );

Nigel
Xequte Software
www.imageen.com
Go to Top of Page

tgentry252

USA
5 Posts
Posted - Nov 17 2024 :  08:56:37  Show Profile  Reply
I'm trying to save image pages to individual files not one file itself. When I use getimagetofile it saves all the images from a single tiff file with multiple pages as 0.tif 1.tif 2.tif etc. I'm trying to save the files as 1.tif 2.tif 3.tif etc. I do not want to save a 0.tif page as a number. I just do not know enough on programming to accomplish this. Maybe I'm overthinking it?
Go to Top of Page

xequte

38607 Posts
Posted - Nov 17 2024 :  16:55:08  Show Profile  Reply
Oh, OK. You can just add one to the output filename.

for I := 0 to folderview.ImageCount -1 do
  folderview.GetImageToFile(i,(trim(paramado.fieldbyname('imagepath').Value+ 'images\' +trim(adoptado.FieldByName('imagenumber').Value)+trimleft('\') + inttostr(i+1)  + '.tif')));


Nigel
Xequte Software
www.imageen.com
Go to Top of Page

tgentry252

USA
5 Posts
Posted - Nov 17 2024 :  20:23:51  Show Profile  Reply
Thanks Nigel.
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Reply to Topic
Jump To: