kchoed
asked on
view tif file in VB with zoom function
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
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
In Windows NT you can use Wang controls to do your job with tif files. It is install with Imaging I think.
In Win 98 and Win 2000 it is Kodak controls. They work same as Wang.
ASKER
Hi COAtheGREAT
Could you please give me a small simple code to do it ?
Thanks
Could you please give me a small simple code to do it ?
Thanks
VERSION 5.00
Object = "{6D940288-9F11-11CE-83FD-
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
ASKER
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
Thanks a lot , but 1 more question, is that control just allow use of tif file, will it support other format?
Thanks
kchoed
It is windows imaging whatever you can use there you can use here
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.