Solved

Changing color of form title bar

Posted on 1998-08-23
2
203 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

Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

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

Suggested Solutions

Title # Comments Views Activity
JAudiorecorder record freezing the app 29 83
How to convert memory stream to PDF file 6 187
Delphi: sending SMS on android platform 1 69
Firemonkey BASS_Init into a thread 17 57
This article explains how to create forms/units independent of other forms/units object names in a delphi project. Have you ever created a form for user input in a Delphi project and then had the need to have that same form in a other Delphi proj…
Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
I've attached the XLSM Excel spreadsheet I used in the video and also text files containing the macros used below. https://filedb.experts-exchange.com/incoming/2017/03_w12/1151775/Permutations.txt https://filedb.experts-exchange.com/incoming/201…

726 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