Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
?
Solved

Imaging (WANG)

Posted on 1998-06-22
9
Medium Priority
?
750 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

Get your problem seen by more experts

Be seen. Boost your question’s priority for more expert views and faster solutions

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…
If you have ever used Microsoft Word then you know that it has a good spell checker and it may have occurred to you that the ability to check spelling might be a nice piece of functionality to add to certain applications of yours. Well the code that…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
Suggested Courses

580 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