Search Tools Links Login

Mouse-zoom-camera Add-In v1.1


Visual Basic 6, or VB Classic

This is the latest version of my mouse-zoom camera add-in. It is especially useful when designing skinned forms. You can zoom in the form so that you can place your controls at the right places. The source code is heavily commented.
UPDATES (since v1.0):
1.The mouse-cam pauses now when any code-window gets focus, and resumes for any other window.
2.The last zoom level is saved in registry, so that add-in starts with the last zoom level.
3.The link to Office DLL is removed. MenuBar icon placement is now without creating a menubar object. The add-in uses therefore much less resources now.
4.MenuBar icon is changed. It looks more professional now.
5.Button tool-tips added.

Original Author: Alper Saracoglu

Assumptions

HOW IT WORKS:
Compile the project to an ActiveX.DLL and drop the ActiveX.DLL in the C:Program FilesMicrosoft Visual StudioCommonMSDev98AddIns folder. From Add-Ins Menu, start Add-in Manager, and load MouseCam Add-in. An icon will be added to your toolbar. Clicking this icon will make the MouseCam
tool-window visible. Initially, mousecam will be off. Start it with the on/off button. The initial snapshot interval is 100 ms. You can change this by clicking the interval button. The initial zoom is 100%. You can go up to 9900% by clicking the
zoom-in button. When the zoom is more than 100%, the 1:1 button will be enabled. Clicking this button sets the zoom to 100%, and makes the ZoomBack button enabled. You can go back to the last zoom level, by clicking the ZoomBack button.

API Declarations

uses StretchBlt, GetDesktopWindows, GetWindowDC, GetCursorPos API's

About this post

Posted: 2002-06-01
By: ArchiveBot
Viewed: 120 times

Categories

Visual Basic 6

Attachments

Mouse-zoom187834242001.zip
Posted: 9/3/2020 3:45:00 PM
Size: 24,372 bytes


Loading Comments ...

Comments

No comments have been added for this post.

You must be logged in to make a comment.