Wrox Programmer Forums

Need to download code?

View our list of code downloads.

Go Back   Wrox Programmer Forums > Visual Basic > VB 6 Visual Basic 6 > VB How-To
Password Reminder
Register
Register | FAQ | Members List | Calendar | Search | Today's Posts | Mark Forums Read
VB How-To Ask your "How do I do this with VB?" questions in this forum.
Welcome to the p2p.wrox.com Forums.

You are currently viewing the VB How-To section of the Wrox Programmer to Programmer discussions. This is a community of tens of thousands of software programmers and website developers including Wrox book authors and readers. As a guest, you can read any forum posting. By joining today you can post your own programming questions, respond to other developersí questions, and eliminate the ads that are displayed to guests. Registration is fast, simple and absolutely free .
DRM-free e-books 300x50
Reply
 
Thread Tools Display Modes
  #1 (permalink)  
Old October 23rd, 2003, 10:29 AM
Registered User
 
Join Date: Oct 2003
Location: , , .
Posts: 5
Thanks: 0
Thanked 0 Times in 0 Posts
Default Imaging for Windows

Hello VB gurus!

I have a question for you. Did anyone work with Imaging for Windows Professional? I mean using VB.
If you did - just reply "yes" and I'll post the problem that I hope somebody would be able to help me with.

Thank you.

Reply With Quote
  #2 (permalink)  
Old October 23rd, 2003, 10:40 AM
sal sal is offline
Friend of Wrox
 
Join Date: Oct 2003
Location: Clarksville, TN, USA.
Posts: 702
Thanks: 0
Thanked 0 Times in 0 Posts
Default

Just post the question.

Sal
Reply With Quote
  #3 (permalink)  
Old October 23rd, 2003, 10:56 AM
Registered User
 
Join Date: Oct 2003
Location: , , .
Posts: 5
Thanks: 0
Thanked 0 Times in 0 Posts
Default

OK. Here goes.

I'm writing a utility which will go through all pages in a multi-page TIFF image in order to find landscaped pages, rotate them to make them portrait and save the image. There could be multiple TIFF images, so I need to perform batch operation within specified directory; and number of pages in TIFF images could be anywhere from 1 to several thousands.

So I'm trying to use Image Admin and Image Edit controls available with VB. In order to be able to edit image I have to use Display method of Image Edit control, so every page which got displayed gets rotated. The problem is that as soon as I display next page all changes made to the previous one are discarded. So when I save the file, apparently only the last page gets to keep changes.
Could you advise me as to what approach is better to use to make it work.
?

Thank you.

Reply With Quote
  #4 (permalink)  
Old October 23rd, 2003, 02:55 PM
Friend of Wrox
 
Join Date: Aug 2003
Location: , , .
Posts: 205
Thanks: 0
Thanked 0 Times in 0 Posts
Default

When we did this, I think we saved behind the scenes every time the user clicked to go to the next page.
Reply With Quote
  #5 (permalink)  
Old October 23rd, 2003, 03:51 PM
Registered User
 
Join Date: Oct 2003
Location: , , .
Posts: 5
Thanks: 0
Thanked 0 Times in 0 Posts
Default

HI guys!

Sorry, my reply is a little bit out of sync.

Yehuda, I'd done what you suggested before I posted my question. The problem is that files, that I'm to process are quite big - we're talking hundreds of MB, and saving such files after every page was rotated takes a lot of time. I have third-party application, which can rotate images - one image at a time, though, and it takes about 5 minutes for it to rotate 1000 pages. With my current approach it takes 1 hr, at least. I tried to save/append each page after rotation in/to temporary file using SavePage method, but with the same results as far as time was concerned. And it is crucial for the application.

Here's a piece of code. Maybe by looking at it you could find something, that I could do to speed it up:

Private Sub Rotate_Click()

Dim h, w, pc, i

 ImgEdit1.Image = "C:\Temp\1.tif"
 pc = ImgEdit1.PageCount

  For i = 1 To pc
   ImgEdit1.Page = i
   ImgEdit1.Display
   h = ImgEdit1.ImageHeight
   w = ImgEdit1.ImageWidth
   If w > h Then
    ImgEdit1.RotateLeft
   End If
   ImgEdit1.Save
   h = 0
   w = 0
  Next

  MsgBox "Done!!!"

End Sub

Thank you all for your time. I really appreciate your help

Reply With Quote
  #6 (permalink)  
Old October 24th, 2003, 11:44 AM
Friend of Wrox
 
Join Date: Aug 2003
Location: , , .
Posts: 205
Thanks: 0
Thanked 0 Times in 0 Posts
Default

I wish I could offer you a better solution, but I suspect there isn't one. Remember this is a free tool meant for use on one machine (note: you are not supposed to be distributing this tool). It is a subsection of a much bigger tool that Kodak sold (before the company split; I am not sure who sells the full tool at the moment). Hence, the tool probably is not built to handle large size images efficiently. For this I would suggest investing in tools such as Those put out by LeadTools and Pegasus.

Yehuda
Reply With Quote
  #7 (permalink)  
Old February 14th, 2005, 09:35 AM
Registered User
 
Join Date: Feb 2005
Location: , , .
Posts: 2
Thanks: 0
Thanked 0 Times in 0 Posts
Default

Imaging for Windows is now known as Global360 Imaging for Windows

It is available from

http://www.alliancegroup.co.uk/Wang-...r-Windows.html

The current release of Imaging for Windows has a RotateAll method which rotates all the pages of a TIF image.

Imaging for Windows is suitable for use with Windows XP


Imaging for Windows is also used in other applications such as PaperChase records management http://www.alliancegroup.co.uk/Recor...aperChase.html and Imager document management and imaging http://www.alliancegroup.co.uk/Docum...ent-Imager.htm





Reply With Quote
Reply


Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Trackbacks are Off
Pingbacks are On
Refbacks are Off

Similar Threads
Thread Thread Starter Forum Replies Last Post
Disk Imaging Scripts82 Pro VB.NET 2002/2003 0 January 4th, 2007 04:32 PM
PHP Multipage Imaging veggivore PHP How-To 0 August 29th, 2006 11:07 PM
??Imaging with encoder with ServletOutputStream? danielh Servlets 0 June 12th, 2005 04:30 PM
Windows 98 OCX control issues vs Windows XP benoyraj VB How-To 0 May 5th, 2004 08:10 AM
Imaging G-Zilla Beginning PHP 4 January 30th, 2004 05:11 PM



All times are GMT -4. The time now is 04:53 PM.


Powered by vBulletin®
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
© 2013 John Wiley & Sons, Inc.