Results for "Category: Custom Controls/ Forms/ Menus"

This button was created to be an enhanced replacement for Visual Basic's standard command button by adding 2 more Border appearance schemes, 2 more button styles, hover effects, 5 more caption styles, and state button compatibility. I cannot guarantee that this code is bug free although I have made every attempt to make it such. If you have any problems with this code please contact me and I'll do what I can to help you though the problem. Release 1.1.0: + New - 5 Caption Styles - State Button Capability (sort of like a checkbox) + Fixed - Bug in caption wrapping that would lose a character if a single "word" was longer than the caption width. + Improved - Slight speed increase from de-coupling the caption wrapping and drawing. Release 1.1.1: + Fixed - Bug that would not re-process the caption for display if the caption was changed in code at run time, unless a refresh was done. (Bug introduced in Release 1.1.0) Release 1.2.0: + New - Added Picture and Graphical Picture modes - Added Bevel Appearance Type - Added Bevel Width and Intensity properties (for customizing the bevel border) - Added UseClassicBorders property (to allow switching between blending and classic borders) - Added Option Button Compatibility and changed the structure of the State Button compatibility some + Improved - Borders have been revamped to allow blending with the gradient/picture on the button + Fixed - Fixed a minor issue with the ValueChanged event (event would not fire if changed via code) - Rewrote description text for properties / events / methods to be completely accurate Release 1.2.1: + Fixed - ToolTips are finally fixed and working. (I thought this important enough for another release just for this one issue)

This is a custom container control which has 9 different caption alignments, 6 caption styles, 8 appearances, and 4 styles including transparent. I've tried to make this as bug free as possible, but I can't guarantee that it is. I'm always looking for suggestions, comments, and/or criticism so feel free to leave any. Enjoy!

This is a custom container control which is designed to act as an enhanced container that a designer can use in place of VB's Frame control. It includes several caption styles, appearances, control styles, and caption alignments. I've tried to make this as bug free as possible, but I can't guarantee that it is. If you have any problems please contact me and I'll try to help you through the problem as best I can. Release 1.1.0: + New: - Added Elliptical and Box Gradients - Added Caption Alignment Cushion (Almost like margins) - Added BackGround/Control Autosizing (Picture Mode) - Added HSL Gradient Blending (Thanks Ulli & Edwin Vermeer) - Added Gradient Repetitions (Thanks Edwin Vermeer) + Fixed: - Bug in Enabled Property (Design Mode, Control would appear enabled even though control was disabled after a form with control on it was closed then re-opened) - Bug in scaling that would cause the button to crash when placed on a parent that did not have ScaleMode available (PictureBox on an MDI form, etc...). Now if Parent.ScaleMode is not available button will scale co-ordinates to Twips

This button was created to be an enhanced replacement for Visual Basic's standard command button by adding more options, visual effects, and compatibility. I cannot guarantee that this code is bug free although I have made every attempt to make it such. If you have any problems with this code please contact me and I'll do what I can to help you through the problem. Release 1.3.0: + New: - Added Picture Alignment (Thanks Edwin Vermeer) - Added Elliptical and Box Gradients - Added Caption and Picture Alignment Cushions (Almost like margins) - Added BackGround/Control Autosizing (Picture Modes) - Added HSL Gradient Blending (Thanks Ulli & Edwin Vermeer) - Added Gradient Repetitions (Thanks Edwin Vermeer) - Added Hover options which allow Full Hover Effects / Border Only Hover / All Hover Effects except Border - Added Mouse Pointer/Icon handling for Disabled, Down, and Hover states. + Fixed: - Bug in Enabled Property (Design Mode, Control would appear enabled even though control was disabled after a form with control on it was closed then re-opened, Bug has present since Release 1.0.0) (Thanks for reporting problem, Edwin Vermeer) - Bug in scaling that would cause the button to crash when placed on a parent that did not have ScaleMode available (PictureBox on an MDI form, etc...). Now if Parent.ScaleMode is not available button will scale co-ordinates to Twips (Thanks for reporting problem, costamar) - Bug in ToolTips that would cause button to crash when used in environments without the extender object (Access VBA, etc...) (Thanks for reporting problem, Edwin Vermeer) + Improved: - Caption Alignment has been improved to allow for positioning in any of 9 different positions [Changed existing enumeration which will cause some problems when upgrading] (Left Top / Left Middle / Left Bottom / Center Top Center Middle / Center Bottom / Right Top / Right Middle / Right Bottom) - Enabled/Disabled coding to allow more control over the Disabled state of the control. Now prevents event processing instead of disabling the user control. - ToolTips to allow using ToolTips in environments that don't support the Extender.

The purpose of this control was to replace the standard VB command button with a button that was far more configurable and had many more options so that it would require less programming on the part of the developer to use nice looking buttons. This release corrects a problem with pushing the button several times very quickly and the button would only show the animation once per two quick clicks. Also fixed a bug in the Option Button implementation that would allow an option button to become "un-clicked" (value of false) without having another option button with a value of true. I've improved the modularity of the HSL color code and decided to use HSL blending for the new style borders and for the caption styles. This should be the last VB release of Gradient Button assuming there are no major bugs. The C++ version (v2.0.0) is coming along quite well, but there is still alot of work to be done. I still have to add an About box, OLE events and code, code tweaking, lots of documentation and lots of testing. It is still probably a few months away from full release.

I just took Todd Herman's project and added a simple search form to let you pick your own .ANI file. Check out Todd's original project at http://www.planetsourcecode.com/xq/ASP/txtCodeId.26016/lngWId.1/qx/vb/scripts/ShowCode.htm

Silly, fun animated About Box for your applications (use your own pictures!) Even plays dopey sound effects!

Automatically completes text entry according to a listbox contents. Autofill/Autotext uses one text control and one listbox control to simulate an autotext feature. Works fast thanks to SendMessage API (supports loooong lists w/o trouble). Supports Up and Down arrow keys as well as PgUp and PgDn. Enter key behaves like tab. Highly commented code.

This snippet creates an uneditable textbox/label whose contents can be copied to the clipboard. This is just like the textboxes in the File properties of Windows (open Windows Explorer, right-click on a file and select PROPERTIES, you'll see that several fields here can be copy/pasted although they cannot be modified). Straightforward and commented code.

Updated: Show Hotkey, Disabled Menus, Seperator, Checked, Better routines, Now you only have to add the module and 1 line of code on your form. Change all Menucolors (Text, Background, Selection and Selected Text) thru subclassing. Still use VB Menus like allways no extra coding needed. popups are possible. only 16k bigger EXE.

A control to get Mouse Over,Out,Middle Button & Wheel for any control with hWnd.

Update of the Usercontrol that emulates the menubar on the side of dialogs on system using the newest version of comctl32.ocx (I think). vbaccelerator image list is now built right in through a class, so there is no need to distribute his ocx (Steve mcMahon). Header and scrolling have been added to allow for a light emulation of an outlook menubar (only one bar though). Allows changing of backcolor, forecolor(text), Header Forecolor, Header Caption, and toggling of Scrollbar and Header Visibility. Also allows for images to be loaded from file and from a STDPicture object. If you are wondering why I went to such lengths to include the vbaccelerator image list in a class wrapper?? it supports color depths up to 32 bit, try that with the normal MS image list!!. All in all a nice control with a pretty small footprint.

This code is a simple example to illustrate using friend methods (or functions, etc...) to pass information between objects within a project (ocx,dll,etc...). The purpose of this example is to show people unfamiliar with friend procedures how they can enable you to develop components that only expose the properties/procedures you wish to make available to your target audience.

I used the idea of Michael Hammond, Dot Matrix clock, and made a control out of it. Right now, you have the choice of 4 colors, of course you can add some yourself. You can change the font. The width of the control is ajustable but the height will automatically adjust to the height of one line of text depending on the font you choose. Tell me what you think.

Application that shows you how to dynamically select skins. Lots of API calls and user controls.

OK... not looking to blow away the world with this one, but felt lead to make the post after reading this article. http://www.planet-source-code.com/vb/scripts/showcode.asp?txtCodeId=26999&lngWId=1 At work, I have an app that is an mdi based program... and while the sub forms don't need a menu bar of their own, they do need popup context menus. Since adding even an invisible menu to a mdichild form will cause it to over write the parent mdi's menu bar, I needed a way to create menus for the child forms on the fly. This simple class demonstrates using the API calls to create a popup menu, display it, and return the item that was clicked (if any). It is simple and self-contained, but this will at least get you started on your way to wrapping the API menu functions in VB classes. I can already see I will be expanding this class, since getting this far was actually quite easy. The ultimate goal would be to "InsertMenuItem"s not just in a popup, but in the menu bar of the parent mdi form as well. I'll repost the class when I've taken it that far. (just updated to include .ItemEnabled property for the popup menu)

O.K. This is the debut of both jeffButton and jeffSplitter. =) jeffButton is a custom control replacement for the VB command button. The enhancements it provides are: location of the caption, providing for the "soft button" effect, and most importantly, automatically creating disabled versions of your button icons... just like the standard vb toolbar. However, I must state now that the API calls I use to achieve this are newer, and probably won't work in Win95 and potentially early versions of Win98 and NT. Works fine on current Win98se, WinME, and Win2K. Anyways... the controls also demonstrates the mouse capturing API calls. The button control also supports hot and disabled icons if you so wish to provide them. =) Addditionally, this project post also exhibits my custom splitter control. I think, at the least, you will find my approach unique. Again, this control demonstrates the mouse capturing API calls. You can set the splitter's orientation, and bounds. And event fires every time the bar moves, allowing you to custom resize controls at will... which is what I like to do. Most implementations I have seen of splitter controls that automatically resize controls for you aren't very complicated, or else they end up adding a lot of overhead. jeffSplitter is simply and based on Edanmo's VB5 ocx splitter controls which provide the splitter but allow you the flexability to implement your own resize techniques (useful when a frame or toolbar is resized in the same section along with a grid or treeview). =) Anyways... hope you guys enjoy my latest offering. I cut with my previous policy of distinguishing between public and private code on this project, so additionally, any of you code hounds out there will also find in this project a rich library of base vb functions and API function definitions and constants in the two files: tools6.bas and mapiconstants.bas. =) I use this module base in both work and recreation projects. If you like it or the latest controls, please gimme a vote. ;) (it don't take long to vote, honest)

jeffLabel is a replacement usercontrol for the standard Visual Basic label control. The control started out simply as a usercontrol containing two labels (for creating a simple drop shadow effect). Things got a bit more involved when it came time for the new label to be a transparent label. The solution was, while in transparent backstyle mode, for the label shadow and text to be drawn directly onto the device context of the parent control. While in transparent mode, this label demonstrates advanced usage of the DrawText API call, specifically, drawing text in any font regardless of the current font in the device context. Additionally, the GetTextFace, GetTextMetrics, GetTextColor, SetTextColor, SelectObject, and CreatFontIndirect functions are demonstrated for converting standard vb font objects into logical fonts, and device context font metrics into standard vb font objects. This is version .1 of this control, so there are some bugs I am aware of already including: transparent user controls have no .hWnd and so do not capture mouse and keyboard events (will need to subclass the parent to trap these events), when in .AutoSize mode (as the test project will demonstrate) the control has a curious effect of growing when the .Caption value is repeatedly changed (this is most likely related to my use of the standard VB controls to do the initial text sizing; this method will need to be dropped in version 1). However, despite these current bugs, if you've been looking for a label with built in drop shadow effect, or you've been trying to figure out how to create genuine transparent usercontrols in vb, this project should sufficiently jump start you on your way. =) Not many examples can be found on Planet Source Code of creating true transparent usercontrols (usercontrol.backstyle = vbTransparent), and since this certainly is still a work in progress, your comments or suggestions below would be much appreciated.

This user control is my own personal replacement for the VB frame control. It more closely emulates the "panels" found in many 3rd party control libraries. It is an excellent example of using the DrawEdge API function. The control exposes 3 properties to this affect: BorderWidth, BorderEdges, and BorderStyle. The sample app visually demonstrates how these properties affect the control. In all of my personal code, I maintain 2 base modules: 1 for declaring constants and API stuff, and the other for containing generic function. Thus, the sample project includes a subset of those 2 files, plus the UserControl... and a test harness screen that allows you to set the frame properties on the fly. For the current versions of this control, or other cool controls or code, hit my web page:                                                                                                          http://members.tripod.com/thefrogprince/                                                                                                          If you are not currently involved in the coding contest, I WOULD REALLY APPRECIATE YOU VOTING FOR MY CODE. Will only take a minute or two to make an account, and while it won't make me any money... =) it will encourage me to keep posting good quality code and controls like this one.

This control is my replacement for the standard VB masked edit control. It came about by my need to add a .Locked property to the masked edit control... and my utter disgust with the colors and performance of the masked edit controls available in the 3rd party libraries. For the most part, I was pleased with the performance of the MS masked edit control, but it needed some tweaking (in addition to the .Locked property). For starters, I needed an alignment property because I wanted to use the masked edit with numeric and money fields. Then, for the purpose of money fields, I wanted to be able to apply a .Format, and then programmatically block certain keystrokes (alpha characters, for instance). And referring to fields, yes, it had to be data bindable. I accomplished all of these things, while retaining the MS masked edit control at the heart of my user control. This preserved the flexibility that was generally lost in the 3rd party controls... and spared me from the much more difficult chore of trying (like other examples I have seen) to implement a masked edit control using a plain ol' text box. In my research, I came across several examples, and none had gone so far as to perfectly preserve the flexibility of the masked edit. Anyway, this user control adds the following properties to the standard masked edit control: .Alignment, .AutoSelectAll, .Locked, and .AllowedKeys (a clever and easy to enhance enum; check it out). For updates to this or other useful VB stuff, check my page:                                                                                                          http://members.tripod.com/thefrogprince/                                                                                                          If you are not currently involved in the coding contest, I WOULD REALLY APPRECIATE YOU VOTING FOR MY CODE. Will only take a minute or two to make an account, and while it won't make me any money... =) it will encourage me to keep posting good quality code and controls like this one.