• 0

How to Customize A Title Bar in VB6?


Question

There are 6 style title bars that can be chosen in VB6, but all of them are full of unpleasant traditional manner, such as ugly MaxButton and MinButton. Now the question is how to customize MaxButton or other into what I'm fond of? For instance, want that MaxButton becomes a football-shaped image... and even change shape of the title bar, put a picture into the title bar... How to deal with?

Link to comment
https://www.neowin.net/forum/topic/35064-how-to-customize-a-title-bar-in-vb6/
Share on other sites

11 answers to this question

Recommended Posts

  • 0
  Quote
Originally posted by JZolloXP

You would have to change the form property to 0 (None) and design your own title bar with your own graphics,

Yes, buddy. It's a way out.

Seems just one thing has to deal with. This form with "None" borderstyle can't be resized with mouse, though adding code such as "WindowState" to resize the form. How to settle this prob?

  • 0

You could subclass the form and do all your own non-client painting. With subclassing, you intercept messages sent to your program and have a custom message loop to deal with the ones you want. It can be a pain to do, but it's powerful.

some online resources...

http://www.softcircuits.com/sw_vbsrc.htm

http://www.arcatapet.com/vb.html

http://planetsourcecode.com/vb/Tutorial/de...lt.asp?lngWid=1

http://www.vbsquare.com/api/subcls/

http://vbaccelerator.com/

http://www.allapi.net/

and a book...

http://www.oreilly.com/catalog/subhookvb/

  • 0
  Quote
Originally posted by weenur

You could subclass the form and do all your own non-client painting. With subclassing, you intercept messages sent to your program and have a custom message loop to deal with the ones you want. It can be a pain to do, but it's powerful.

.............

Sounds like having to cleanse the Augean stables. But thanks for replying, buddy.

  • 0
  Quote
Originally posted by Dave888

Seems just one thing has to deal with. This form with "None" borderstyle can't be resized with mouse, though adding code such as "WindowState" to resize the form. How to settle this prob?

  Quote
Originally posted by weenur

You could subclass the form and do all your own non-client painting. With subclassing, you intercept messages sent to your program and have a custom message loop to deal with the ones you want. It can be a pain to do, but it's powerful.

For fearing of the complication of method that you introduced above, i try to seek for another way to work out. Now, buddy, i've found a way easy as pie to change size of a form without border (borderstyle = 0) in VB6.

The approach just uses HScroll or VScrollBar, make its value equal to the form width or height; typing codes in H/VScroll_Change(); and all things will be okay!

The little prob is that the form seems not very handsome and users would feel somewhat inconvenient.

Buddy, i know you are a veteran in programming, your comment is quite often significant for me.

  • 0
  Quote
Originally posted by freeza

i usually set VB to show no titlebar then create my own :)

Good idea!

Would you like to introduce a little of how you let users to resize your form without titlebar, please?

(Note: minimizing, maximizing and being vbnormal

form are very simple, what I mean is to resize form as user's wish)

This topic is now closed to further replies.
  • Recently Browsing   0 members

    • No registered users viewing this page.
  • Posts

    • Ouch, man.. Hope you can get a replacement for that..
    • They just need to add a transparency slider. I’d prefer a middle ground where everything is transparent, but background items are blurred.
    • A guy messaged me yesterday wanting to talk on the phone, it turns out his friend messaged on "marktplaats" a day earlier asking what my lowest price was (€1650). After talking for a bit about it (he says he has no experience with computers and is relying on his friend) and then confirming with his friend, he messaged me he wanted to pick it up today. They both came today to check it out, and pick it up. SOLD. I prefer it this way rather than having to cannibalize it to sell for parts.
    • Was taking the side glass panel off because I want to install the AORUS X870E Master GPU holder, and while I had the glass side panel in my hands the front one decided to take a kamikaze dive. Now I hope they sell the glass fronts separately, or I am screwed. I'll probably be finding bits of glass for weeks now  😅
    • Yeh, I think you'll find there wasn't much legit savings from what he did. Any chump can fire a bunch of people indiscriminately from positions and services that don't impact that person. At the end of the day, it just means that services that are essential in any functional democracy, won't be able to operate because there are no people to deliver those services. Sure, it "saves" money on paper, but like most short sighted bean counters, there are very real, and expensive impacts later on down the track. Did you know that by buying 2x toothbrush's and a tube of toothpaste every year, and seeing the dentist every 6 months would cost you about $400 a year? So by the time you're in your 30's that would be $12000 of cost! Now imagine if you didn't spend any of that $12000 on preventative oral health care! Wow, so much more money! But you also needed to have several root canals at $1500 per tooth. Plus the time off work for being unable to function with the pain. So lets face it, that initial cost is worth it!
  • Recent Achievements

    • Week One Done
      Simmo3D earned a badge
      Week One Done
    • One Month Later
      Simmo3D earned a badge
      One Month Later
    • One Month Later
      greege earned a badge
      One Month Later
    • Week One Done
      greege earned a badge
      Week One Done
    • Week One Done
      LagFighterZ earned a badge
      Week One Done
  • Popular Contributors

    1. 1
      +primortal
      547
    2. 2
      ATLien_0
      230
    3. 3
      +FloatingFatMan
      166
    4. 4
      Michael Scrip
      119
    5. 5
      +Edouard
      91
  • Tell a friend

    Love Neowin? Tell a friend!