VB一款实现图像浏览的ActiveX控件

利用GDI实现浏览图片的ActiveX控件，功能:支持读取PNG格式的图片，支持鼠标飞轮对图片进行缩放，镜像，旋转，移动等功能，其中用到了功能强大的GDI，GDI+，对初及vb编程爱好者运用GDI-API有很大的研究价值，控件利用GDI实现了基本功能，更多功能大家自己扩展。
Form代码：
Option Explicit

'放大图像
Private Sub Fangda_Click()
DisplayMap1.Enlarge
End Sub

Private Sub Form_Resize()
If Me.WindowState = 1 Then Exit Sub
DisplayMap1.Move 10, 10, Me.ScaleWidth - 20, Me.ScaleHeight - 20
End Sub

Private Sub Form_Unload(Cancel As Integer)
Dim frm As Form
For Each frm In Forms
Unload frm
Next
End Sub

'适应控件窗口
Private Sub Huanyuan_Click()
DisplayMap1.ScreenFit
End Sub

'镜像
Private Sub MirrorImage_Click(Index As Integer)
DisplayMap1.MirrorImage Index
End Sub

'旋转
Private Sub Hourhand_Click(Index As Integer)
DisplayMap1.Rotation Index
End Sub

'打开
Private Sub Open_Click()
Dim OpenImage As String
OpenImage = OpenImaget(True)
If OpenImage = “” Then Exit Sub
DisplayMap1.LoadImage = OpenImage
End Sub

'是否任意移动图像
Private Sub Rmov_Click()
Rmov.Checked = IIf(Rmov.Checked, False, True)
DisplayMap1.Boundary = Rmov.Checked
End Sub

'另存为
Private Sub Saveas_Click()
Dim OpenImage As String
OpenImage = OpenImaget(False)
If OpenImage = “” Then Exit Sub
DisplayMap1.Storage OpenImage
End Sub

'缩小图像
Private Sub Suoxiao_Click()
DisplayMap1.Shrink
End Sub

工程包下载：https://download.csdn.net/download/ty5858/87815530

VB一款实现图像浏览的ActiveX控件相关推荐

常用的Activex 控件
1. Flash Player ActiveX Control 6.0.47.0 与FLASH 6.0配套的浏览器端动画播放插件 download.pchome. ...
ActiveX 控件注册的几种方法 VC++编写
ActiveX 控件是一个动态链接库,是作为基于COM 服务器进行操作的,并且可以嵌入在包容器宿主应用程序中,ActiveX 控件的前身就是OLE 控件.由于ActiveX 控件与开发平台无关,因此, ...
VB6.0中如何设定COM组件和ActiveX控件的CLSID值
http://ajxfxb.blog.163.com/blog/static/56675086200911181118562/ VB中如何设定COM组件和ActiveX控件的CLSID值 2009-1 ...
如何在VB中实现ActiveX控件的IobjectSafety接口
如何在VB中实现ActiveX控件的IobjectSafety接口 ------------------------------------------------------------------ ...
*继承IObjectSafety接口，实现vb activeX控件安全性（IE不提示安全问题）
原文http://support.microsoft.com/kb/182598/zh-cn 从 Visual Basic 6.0 CD-ROM(安装目录) 中获取 OLE 自动化类型库生成器.若要执 ...
VB 控件分类----内部控件;ActiveX 控件;可插入的对象
控件分类,控件概述时间:2009-6-18 20:19:33 点击:1158 控件分类在Visual Basic中,控件可分成三类: 1.内部控件,例如 CommandButton 和 Frame ...
【办公-Word-VB】Word中VB控制ActiveX控件转换人民币大写并填充-源码带完整注释
2019.03.15更新:已经将个人做好的完整docm 代码附在文后,先上图. 记录几个开发过程中遇到的难点和注意点. Word中添加ActiveX控件,如输入框,需要放置在文本框中,或者放置在 ...
VB编程动态注册ActiveX控件
在使用VB和其它一些Win9X下的编程软件,就要同ActiveX控件打交道,注册和反注册控件是一件令人很头疼的事情.有时从网上下载了一个控件,但是在使用时VB总是提示控件没有注册.又或者想删除一个 ...
VB与ActiveX控件签名谈
在VS安装后发现路径**VC7/Common7/Tools/Bin/下有许多小工具,我对带有Cert的文件比较感兴趣.经过研究,发现是有关证书和签名的,当然,该证书未被证书认证机构认可.下面列出这些工 ...

VB一款实现图像浏览的ActiveX控件

VB一款实现图像浏览的ActiveX控件相关推荐

最新文章

热门文章