VBcoders Browse New Submit Contact Sign In

No account? Register free

Forgot password?

jeffFrame (enhanced VB Frame control)

TheFrogPrince  (8 Submissions)   Custom Controls/Forms/Menus   Visual Basic 3.0   Advanced   Wed 3rd February 2021

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:                                                                                                          https://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.

Inputs
The control exposes 3 properties to this affect: BorderWidth, BorderEdges, and BorderStyle. The sample app visually demonstrates how these properties affect the control.

Assumes
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.

API Declarations
Public Declare Function DrawEdge Lib "user32" ( ByVal hdc As Long, qrc As Rect, ByVal edge As enumBorderEdges, ByVal grfFlags As enumBorderFlags) As Long

Rate jeffFrame (enhanced VB Frame control) (11(11 Vote))

Download jeffFrame (enhanced VB Frame control)

jeffFrame (enhanced VB Frame control) Comments

No comments yet — be the first to post one!

Post a Comment

0/1000 characters