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

This is a very small function which is potentially useful for those who know where/how to use it. I used this function on several of my projects already if you're wondering if this code has any use at all. I'll post some of them later. This function also demonstrates the use of control arrays and loading objects during run-time and you'll probably learn the concept of form scaling.

Purpose:Play an AVI file through the Animation Control on the Status bar. This code was inspired by James E. Toebes’ code: "Progress Meter on Status Bar"... instead of the ProgressBar control I am using the Animation Control. There were a few things I tweaked. For more AVI files you can check out http://pjs-inc.com/vb-avi

This code will change the color of the "Blue Screen Of Death"

Notice: THIS CODE HAS BEEN FIXED! PLEASE READ THE COMMENTS AT THE BOTTOM OF THE PAGE TO SEE WHAT WAS WRONG BEFORE. Create real C++ style command buttons with ONE line of code!!! You can use this code on any of your commands buttons. You will loose any images and the BackColor of the button, but that really doesn't matter because you can 'paint' images onto the button using the API. Make sure you set the style property to 'Graphical' or this will not work!. OK here is how it works. You see, by default Visual Basic's command buttons are drawn with the 'Default Push Button' style, which makes them flat and ugly when pushed. But when you set the style to 'Graphical' its really just a C++ button with a single pixel outline drawn around it. This code basically just stops the button from drawing that line to create a sunken style button. This code is not compatible with Visual Basic 4.0/32 because its buttons don't have the style property. However, in Visual Basic 4.0 you can apply the code to an option button and it will appear as a C++ push button (they both have the same basic events and properties: Click, MouseMove, etc...) which is a 'rigged' kind of way of getting it in to Visual Basic 4.0...hehe. I wrote this code because I got tired of all the people trying to create C++ style buttons with CreateWindowEx and Message Hooks, and all that other difficult stuff.

This ActiveX allow you to use animated gifs in your applications. I saw examples of modules before but not ActiveX.You can make OCX file from this and use it in other applications.

Places a Progress Bar in a Status Bar, with Windows Common Controls 6, without any third party OCXs or API.

I have been tinkering with the Windows API AnimateWindow function, and have wrapped it into a user control, which you can drop onto any top-level window. You simply call the controls CloseAnimation method from the form_unload event, and your window will roll or slide up, down, left, or right, or fade or zoom to nothing. This easy to use control has 2 main properties - the "AnimationEffect", and the "EffectDelay". The included example project here shows how easy it is to use. It seems that this API Function exists in Windows 98, ME, 2000, and XP (I was unable to get this to work with Windows 95 or Windows NT). I got varying levels of effectiveness depending on the OS. Keeping the EffectDelay to a minimum (500 or less) usually produces great results. This project has the default delay at 1000 to exagerate the effect, but you should set to 400 or 500 in your projects. Use the "Project1.vbp" to see the example, or include the CoolAnimate.ctl in your project to just use the user control. Hope this is helpful to some of you.

Here it is! Want to enter only numbers in a textbox? Or only currency? And avoid users paste something that is not valid? Try this! This is a class module that lets you turn a standard textbox into a new one, that accepts only numbers (also decimal). The decimal and currency separators depends on the locale settings, and are read via API! New features added also!! Check it out!

This is an Intellisense PopUp I'm working on for a project. It uses an XML data file to get the methods for the object, which allows this to be completly customizable for any language or what ever. Note that the example project is just that, an example, and in no way is it the 'perfect' way to popup the list. I am still working on this but wanted to post it so you could use and build off of it. Let me know what you think. I am also working on support for More then 1 level ( ex. Me.Controls.Blah) also if the select item is an object or can equal a boolean value it will load those methods as well. But I'm still working on that. I have included a sample methods file called defs.dat, which is the default filename for the control, but you can change it. *** Update *** Now uses ListView to allow Images. Fixed a couple bugs too. Added Ability to use up and down arrows to select. *** Another Update *** Now supports Popups for other object (see screen shot) *** Yes, Another Update *** Mainly an update of the defs file. I added some more objects to it and changed a few things in it. Fixed a couple little bugs in the example program for gettitng the Intellisense to popup. Added support for different types of methods, three as of right now (Sub/Functions, Properties, Others like Boolean Values). **** Why Look Another Update **** This time I've added an OnError Event that will allow you to capture any error that occurs. Flatscrollbars, Custom Visible Items, Custom ForeColor, Custome BackColor, GridLines, Remove or Show The shadow, Hover Selection, HotTracking. See the Screen shot for examples. **** Heres another Update for you ***** This time around I added the ability to a Use your own Images with out adding them to the image list within the control. You can use an external Image list or even Load the pictures from a file. And Just set up the defs.dat file in the "img" attribute to have the 'key' that you supply to add the image and Viola (see screenshot and demo app for example). Also added a few other properties like: ListIconCount (returns total images), ListIcon (returns the image)Add And Remove Items from the list, Add and Remove Images. Thanks to all of you for the votes. Watch for more updates.

This is a wrapper class that allows you to set minimum and maximum sizes of a form. Never do again checks on the Form_Resize() event, that flickers! This one uses APIs calls to set maximum and mimimum sizes. Four functions calls are needed in the form. I had a look into PSC, and I found nothing similar to this. Have a look at it, and leave comments! Parts of these code are from www.vbaccelerator.com, but this is easier and much better.... :-)

This control can be placed in case when we wants to give some sort of selection to the operator and operator has to select one of it and have to perform task. Due to auto selection it’s easy for operator to use than the data grid which does not support auto selection. Please Vote me. If you like this.

This code lets the user resize any control you'd like. No API's. Neat and tiny code.

This control is a basic mswinsock control but with a couple changed to it. This is basicly for multi-connection management. You can toggle the acceptall to true and it will accept any incoming connection, you can also set it to function like a normal Winsock control. I also added a simple IPList function, when set to true it will accept only the IP's in the reserved IP list. Not too Complex of an idea. Votes Appreciated.

This code will allow you to easily subclass any control that has an hWnd property. Just give the control the chosen hWnd, and you will recieve all it's messages in an event.

Multiple Slider, Scroller controls in one OCX. Now Mousewheel support has been added, in addition to MS properties so that it can be used as a drop-in replacement.

Creates a totally customizable MsgBox replacement which can have custom icons and buttons. Report any bugs or suggestions, and feel free to modify the code (just give me credit for the original). One thing I haven't gotten around to adding yet is the support for default buttons, so if you have to, you can add that. Also, in order to use this in the sample prog (any prog for that matter), you have to compile it into a DLL and reference in the project first. PSC doesn't allow precompiled DLLs, so you have to do it. [ UPDATED ] It now has full support for changing the colors of the buttons and messagebox, as well as their colors

This basic procedure will handle all parent and child Checkboxes in a TreeView control. If you check a child node it will automatically check the parent(s) and vise versa.

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

This is a label resembling LiteStep's labels. It stays on the desktop and shows system information such as memory usage, CPU usage, Time/Date/Uptime (with user-defined formatting), Active window and Active task, Multiline text, Computer name, Windows version, Processor type, etc. Full support for displaying as many images as you like within the label (e.g. icons). FULLY TRANSPARENT, if you like; or can be made to display a custom BackImage. Supports multiple profiles, so you can load more than one label with different info displayed on each. Shows CPU Usage as graphical progress bar as well. User-specified co-ordinates & size, image co-ordinates for each image, and co-ordinates for the CPU graph. (The included screenshot is within LiteStep, but SysLabel looks the same under a regular Windows shell as well).

This is a fully customizable message box that is backwards compatible with the standard microsoft message box. It has 3 additional parameters that tell it whether to autosize and what size to be. Using my FormatRTF function..which is also posted seperately on PSCODE, you can include tags to format the text any way you would like (see screen shots). There are no limits to the uses of this box. It can be used as both a Regular or Bottomless Message Box and Includes the ability to set Default Button and the Help Button. It is a function and will return integer values that can be compared to vb constants (ie: vbok, vbretry) so you can determine what the user clicked. It is vaguely commented (if that) because I just decided to throw it up here. If you don't understand it, Now is a good time to Learn!! Hope someone finds this as usefull as I have...(Comments and Enhancement Requests Welcome) - ENJOY!!