Solved

view tif file in VB with zoom function

Posted on 2002-03-22
7
192 Views
Last Modified: 2007-12-19
Hi ALL Expert,

If I want to do the above captioned functon, can it be implemented in VB? and if yes, could you please tell me how to do it

Thanks alot
kchoed
0
Comment
Question by:kchoed
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 5
  • 2
7 Comments
 
LVL 1

Expert Comment

by:COAtheGREAT
ID: 6891540
In Windows NT you can use Wang controls to do your job with tif files. It is install with Imaging I think.
0
 
LVL 1

Expert Comment

by:COAtheGREAT
ID: 6891548
In Win 98 and Win 2000 it is Kodak controls. They work same as Wang.
0
 

Author Comment

by:kchoed
ID: 6895790
Hi COAtheGREAT

Could you please give me a small simple code to do it ?

Thanks
0
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!

 
LVL 1

Expert Comment

by:COAtheGREAT
ID: 6895841


VERSION 5.00
Object = "{6D940288-9F11-11CE-83FD-02608C3EC08A}#1.0#0"; "IMGEDIT.OCX"
Begin VB.Form Form1
   Caption         =   "Form1"
   ClientHeight    =   6600
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   8535
   LinkTopic       =   "Form1"
   ScaleHeight     =   6600
   ScaleWidth      =   8535
   StartUpPosition =   3  'Windows Default
   Begin VB.CommandButton Command2
      Caption         =   "Command2"
      Height          =   495
      Left            =   6360
      TabIndex        =   2
      Top             =   1440
      Width           =   1215
   End
   Begin VB.CommandButton Command1
      Caption         =   "Command1"
      Height          =   495
      Left            =   6360
      TabIndex        =   1
      Top             =   720
      Width           =   1215
   End
   Begin ImgeditLibCtl.ImgEdit ImgEdit1
      Height          =   5055
      Left            =   480
      TabIndex        =   0
      Top             =   600
      Width           =   5415
      _Version        =   65536
      _ExtentX        =   9551
      _ExtentY        =   8916
      _StockProps     =   96
      BorderStyle     =   1
      ImageControl    =   "ImgEdit1"
   End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit

Private Sub Command1_Click()

  ImgEdit1.Zoom = ImgEdit1.Zoom * 2
  ImgEdit1.Display

End Sub

Private Sub Command2_Click()

  ImgEdit1.Zoom = ImgEdit1.Zoom / 2
  ImgEdit1.Display

End Sub

Private Sub Form_Load()

  ImgEdit1.Image = "C:\Temp\01.tif"
  ImgEdit1.Display

End Sub
0
 

Author Comment

by:kchoed
ID: 6895849
Hi COAtheGREAT

Thanks a lot , but 1 more question, is that control just allow use of tif file, will it support other format?

Thanks
kchoed
0
 
LVL 1

Expert Comment

by:COAtheGREAT
ID: 6896105
It is windows imaging whatever you can use there you can use here
0
 
LVL 1

Accepted Solution

by:
COAtheGREAT earned 200 total points
ID: 6898596
tif, bmp, jpg, pcx
0

Featured Post

Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

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

When designing a form there are several BorderStyles to choose from, all of which can be classified as either 'Fixed' or 'Sizable' and I'd guess that 'Fixed Single' or one of the other fixed types is the most popular choice. I assume it's the most p…
I was working on a PowerPoint add-in the other day and a client asked me "can you implement a feature which processes a chart when it's pasted into a slide from another deck?". It got me wondering how to hook into built-in ribbon events in Office.
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…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…

739 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