Solved

Changing Title Bar Color in a Window

Posted on 1998-01-03
10
553 Views
Last Modified: 2010-04-04
I would like to know how can I change the caption bar color in a window, so this change does only affect to the active window. I have used SetSysColors, but this changes the color in the system and I want only to change the color in an active Window. I am using Delphi 3.0 with W95 and NT 4.0.
Thanks.
0
Comment
Question by:girona
  • 6
  • 3
10 Comments
 
LVL 2

Expert Comment

by:mvz121697
ID: 1355195
The only way i can come up with is to override the WM_NCPaint messages. This means that you have to do ALL the drawing of the titlebar yourself.
If that's what you want, go and check this one:

http://www.mindspring.com/~cityzoo/ttlbar1.html


0
 
LVL 8

Expert Comment

by:ZifNab
ID: 1355196
Well, don't have a direct answer but a work around. There are components which give you the posibility to get the graded effect in your title bar. If you use these components (begin = end color) and you enable them when your form becomes active. You've got the same result!! And almost no programming!!
If you need such components, I can give you some adresses for it
0
 

Author Comment

by:girona
ID: 1355197
I was trying the software and helps of CITYZOO but with the 'LILTITLE' I have to make everything, minimize, maximize, etc. so I need a function, component or something in order not to do so much work.

I need a component or address to get it and be able of doing forms where I can change the color (and font) of the caption.

0
Are your AD admin tools letting you down?

Managing Active Directory can get complicated.  Often, the native tools for managing AD are just not up to the task.  The largest Active Directory installations in the world have relied on one tool to manage their day-to-day administration tasks: Hyena. Start your trial today.

 
LVL 8

Expert Comment

by:ZifNab
ID: 1355198
here are some :
 torry.rimini.com/vcl/forms/gradient.zip
 torry.rimini.com/vcl/forms/wordcap.zip
 torry.rimini.com/vcl/forms/marscap.zip
 torry.rimini.com/vcl/shared/dunograd.zip
                         
0
 
LVL 8

Expert Comment

by:ZifNab
ID: 1355199
And did you found what you were looking for?
0
 

Author Comment

by:girona
ID: 1355200
Yes, I found what I was looking for. If you want to get the points answer the question with whatever you want. Thanks for that. If you have time I'd like you have a look to that question: "Sorting a lookup field" because I don't have any good answer in 15 days. See you.
0
 
LVL 8

Expert Comment

by:ZifNab
ID: 1355201
I only take the points, if you found it through my comments. Otherwise I don't. I'll look at your other comment.
0
 
LVL 8

Expert Comment

by:ZifNab
ID: 1355202
Can you give the URL, because I can't find it.
0
 

Author Comment

by:girona
ID: 1355203
Yes, I found the solution through your comments, I'm ussing one from torry.rimini.com site but I don't remember which one. The URL of my other question is: http://www.experts-exchange.com/topics/bin/ShowQ?qid=8630033732
Thanks for trying it so quick.

0
 
LVL 8

Accepted Solution

by:
ZifNab earned 100 total points
ID: 1355204
Ok, to answer this question.
Look at these components :

                     torry.rimini.com/vcl/forms/gradient.zip
                      torry.rimini.com/vcl/forms/wordcap.zip
                      torry.rimini.com/vcl/forms/marscap.zip
                      torry.rimini.com/vcl/shared/dunograd.zip
                         
0

Featured Post

ScreenConnect 6.0 Free Trial

At ScreenConnect, partner feedback doesn't fall on deaf ears. We collected partner suggestions off of their virtual wish list and transformed them into one game-changing release: ScreenConnect 6.0. Explore all of the extras and enhancements for yourself!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Newbie Thread Programming 1 151
FMX enumerated colours 2 99
Reconfigure Delphi Install? 2 51
CheckListBox usage 3 58
Objective: - This article will help user in how to convert their numeric value become words. How to use 1. You can copy this code in your Unit as function 2. than you can perform your function by type this code The Code   (CODE) The Im…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
This video shows how to use Hyena, from SystemTools Software, to bulk import 100 user accounts from an external text file. View in 1080p for best video quality.
Although Jacob Bernoulli (1654-1705) has been credited as the creator of "Binomial Distribution Table", Gottfried Leibniz (1646-1716) did his dissertation on the subject in 1666; Leibniz you may recall is the co-inventor of "Calculus" and beat Isaac…

770 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question