Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Imaging (WANG)

Posted on 1998-06-22
9
Medium Priority
?
748 Views
Last Modified: 2008-02-01
Anybody here using Wang Imaging OCXes? Please give me an example of adding a page to a TIFF file.

Best will be to send anything to bosism@netvision.net.il -thanks in advance

Big thanks!
PS what's the final version of Imaging and where do I get it?
0
Comment
Question by:Matvey
  • 5
  • 4
9 Comments
 
LVL 7

Accepted Solution

by:
tward earned 80 total points
ID: 1463975
I haven't actually done it with Wang OCXes yet but it looks like you would need to use the Image Admin Control to do this:

Appends one or more pages to the current image.

Applies To

Image Admin control

Syntax

object.Append Source, SourcePage, NumPages [,CompressionType, CompressionInfo]

Arguments

Parameter      Data Type      Description
Source      String      Specifies the image file that contains the page(s) to be appended.
SourcePage      Long      Specifies the first page in the source image file to be appended.
NumPages      Long      Specifies the number of pages from the source image file to append to the current image file.
CompressionType      Integer      (Optional)  Specifies the compression type to apply to the appended pages. If a type is not specified, the compression type of the source page(s) is used.
CompressionInfo      Long      (Optional)  Specifies which compression options to apply to the appended pages. If options are not specified, the compression options of the source page(s) are used.
Remarks

The current image file is specified by the Image property.
The current image, if one exists, must be in either AWD or TIFF format, as these formats support multiple pages.  If the image pages added are of another type, they will be converted to the file type format used by the current image.
You can append a single BMP file to a new file. If you do, the only compression type allowed is None, with no options.
If the CompressionType and CompressionInfo values specified are not compatible with a source page’s page type (color), the source file’s compression type and compression information are used in place of those arguments.

If JPEG compression type is specified, and the compression argument is 0 (zero), a default JPEG value is used. The default value is 4096 (low compression, high quality).
If the destination file is in AWD format, only black and white files without annotations may be appended.
The only allowable compression type for AWD is None, with no options.

See Also

Compression
CompressionType property
CompressionInfo property
0
 
LVL 7

Expert Comment

by:tward
ID: 1463976
Acutally it is pretty easy, here are the two lines I used:

ImgAdmin1.Image = "C:\WINDOWS\TEMP\00000003.TIF"
ImgAdmin1.Append "C:\WINDOWS\TEMP\00000002.TIF", 1, 1

0
 
LVL 3

Author Comment

by:Matvey
ID: 1463977
Well, I guess it works - I haven't checked it with VB yet. I'm using Delphi and nobody really answered me in that topic - Delphi has some bugs with these OCXes.

I'll grade you'r answere as soon as I test it with VB, and I'm rather sure it does works... (I've also seen this help page and I was looking at it for some hours long)

Another thing that concerns me is what is the last version of Imaging and where do I get it? I have the very very first one, and I'm supose it should have changed in the last 3 years. What version do you use? I've been to WANG site, but nothing...
0
What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

 
LVL 7

Expert Comment

by:tward
ID: 1463978
I am not sure what version I have by I got it from WANG's Site although WANG software was bought by KODAK so you may want to try their site now??
0
 
LVL 3

Author Comment

by:Matvey
ID: 1463979
Please tell me where can I download it - I've been to www.wang.com, but nothing again - didn't find any download section or something.
0
 
LVL 7

Expert Comment

by:tward
ID: 1463980
Eastman Software now owns it, here is where you can get it:

http://www.eastmansoftware.com/products/imagingpro/instal95.htm
0
 
LVL 3

Author Comment

by:Matvey
ID: 1463981
OK, thanks! I've tryed it and it works. It doesn't works with Delphi though. Do you have Delphi so you can test it on your machine? I will increase points if you can help me to make it work with Delphi, but if you can't that's ok too...
0
 
LVL 7

Expert Comment

by:tward
ID: 1463982
Nope, I don't use Delphi, Sorry.
0
 
LVL 3

Author Comment

by:Matvey
ID: 1463983
OK, thanks again...
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

The debugging module of the VB 6 IDE can be accessed by way of the Debug menu item. That menu item can normally be found in the IDE's main menu line as shown in this picture.   There is also a companion Debug Toolbar that looks like the followin…
Background What I'm presenting in this article is the result of 2 conditions in my work area: We have a SQL Server production environment but no development or test environment; andWe have an MS Access front end using tables in SQL Server but we a…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…
Suggested Courses

885 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question