Solved

Changing color of form title bar

Posted on 1998-08-23
2
200 Views
Last Modified: 2011-09-20
Is there a way to change the color of the title bar (other than changing the Windows colors).  

Also, is there a way to have a window border but without the title bar ?
0
Comment
Question by:sharons
2 Comments
 
LVL 4

Accepted Solution

by:
erajoj earned 50 total points
ID: 1337462
1. Yes, check, for instance, TRxGradientCaption in RXLib.
2. Yes:

type
  TForm1 = class(TForm)
  private
    procedure WMNCHitTest( var Msg: TWMNCHitTest ); message WM_NCHitTest;
    procedure CreateParams( var Params: TCreateParams ); override;
  ...
  procedure TForm1.CreateParams( var Params: TCreateParams );
  begin
    inherited CreateParams( Params );
    with Params do Style := ( Style or WS_POPUP ) and ( not WS_DLGFRAME );
   end;

procedure TForm1.WMNCHitTest( var Msg: TWMNCHitTest ); // client area as titlebar, for dragging
begin
  inherited;
  if ( Msg.Result = htClient )
  then Msg.Result := htCaption;
end;

/// John

0
 

Author Comment

by:sharons
ID: 1337463
Thank you.
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

Introduction The parallel port is a very commonly known port, it was widely used to connect a printer to the PC, if you look at the back of your computer, for those who don't have newer computers, there will be a port with 25 pins and a small print…
In my programming career I have only very rarely run into situations where operator overloading would be of any use in my work.  Normally those situations involved math with either overly large numbers (hundreds of thousands of digits or accuracy re…
Along with being a a promotional video for my three-day Annielytics Dashboard Seminor, this Micro Tutorial is an intro to Google Analytics API data.
Email security requires an ever evolving service that stays up to date with counter-evolving threats. The Email Laundry perform Research and Development to ensure their email security service evolves faster than cyber criminals. We apply our Threat…

809 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