delphi 标题栏相关操作

1.隐藏窗体的标题栏
在Delphi中隐藏窗体的标题栏，相信大家都会说是一个件十分容易的事情，只需要设置BorderStyle的属性为bsNone就可以了，不过这种设置方法不但去掉了窗体的标题栏，而且也去掉了窗体的3D边框，这样就显得不好看了，那么请大家试试下面的方法吧。
procedure TForm1.FormCreate(Sender: TObject);
begin
setwindowlong(form1.Handle,gwl_style,getwindowlong(handle,gwl_style) and not ws_caption);
height:=clientheight;//隐藏标题栏
end;

2.在标题栏中显示文字标题
要在窗体的标题栏中显示文字信息，可以先获取此窗体的句柄，然后使用画布(Canvas)在此窗体的标题栏中绘制出文字，根据需要可以对文字的字体大小和颜色进行设置。
procedure TForm1.Button1Click(Sender: TObject);
var
dc:hdc;
cvs:tcanvas;
begin
dc:=getwindowdc(handle);//取得窗体的句柄
cvs:=tcanvas.Create;
cvs.Handle:=dc;
cvs.Font.Size:=11;//设置字体大小
cvs.Brush.Color:=rgb(222,222,9);//背景颜色
cvs.TextOut(100,1.隐藏窗体的标题栏
在Delphi中隐藏窗体的标题栏，相信大家都会说是一个件十分容易的事情，只需要设置BorderStyle的属性为bsNone就可以了，不过这种设置方法不但去掉了窗体的标题栏，而且也去掉了窗体的3D边框，这样就显得不好看了，那么请大家试试下面的方法吧。
procedure TForm1.FormCreate(Sender: TObject);
begin
setwindowlong(form1.Handle,gwl_style,getwindowlong(handle,gwl_style) and not ws_caption);
height:=clientheight;//隐藏标题栏
end;

转载于:https://www.cnblogs.com/wmymtx/archive/2011/12/09/2282747.html

delphi 标题栏相关操作相关推荐

【信息技术刷题记录】 04 Office相关操作及计算机网络知识篇
刷题记录 Office相关操作及计算机网络知识写在前面:此系列文章只为参加知识竞赛时的记录对题目提出一些自己的想法有啥不对的地方还望谅解和指正不胜感激第四次记录一.Offic相关操作 A. ...
Delphi OLE方法操作Excel
Delphi OLE方法操作Excel 来源:http://www.ltesting.net/ceshi/ruanjianceshikaifajishu/rjcskfyy/2008/0519/154 ...
2021年大数据HBase（五）：HBase的相关操作JavaAPI方式
全网最详细的大数据HBase文章系列,强烈建议收藏加关注! 新文章都已经列出历史文章目录,帮助大家回顾前面的知识重点. 目录系列历史文章前言 HBase的相关操作-JavaAPI方式一.需求说明 ...
2021年大数据HBase（四）：HBase的相关操作-客户端命令式！【建议收藏】
全网最详细的大数据HBase文章系列,强烈建议收藏加关注! 新文章都已经列出历史文章目录,帮助大家回顾前面的知识重点. 目录系列历史文章前言 HBase的相关操作-客户端命令式 1.进入HBase ...
2021年大数据Spark（二十五）：SparkSQL的RDD、DF、DS相关操作
目录 RDD.DF.DS相关操作 SparkSQL初体验 SparkSession 应用入口获取DataFrame/DataSet 使用样例类指定类型+列名自定义Schema ...
【数据结构】二叉树及其相关操作
二叉树的定义二叉树是一个由结点构成的有限集合,这个集合或者为空,或者由一个根节点及两棵互不相交的分别称作这个根节点的左子树和右子树的二叉树组成. 二叉树并非一般的树形结构的特殊形式,它们是两种不同的 ...
Linux之用户组相关操作 groupadd groupdel
Linux之用户组相关操作 groupadd groupdel 1. 创建用户组命令说明 groupadd 创建(添加)用户组创建用户组效果图: [grep是搜索功能,详情博文:https: ...
Linux之用户相关操作
Linux之用户相关操作 1. 创建用户 [创建后会立即让设置密码] 命令说明 useradd 创建(添加)用户 useradd命令选项: 选项说明 -m 自动创建用户主目录,主目录的名字就是用 ...
java导入包大全_eclipse快速导入jar包的相关操作步骤
eclipse怎样快速导入jar包呢?熟悉这款软件是非常简单的,今天小编就分享了关于eclipse快速导入jar包,有需要的朋友一起来看看吧! eclipse快速导入jar包的相关操作步骤方法1·最 ...
顺序队列相关操作（C语言实现）
#顺序队列相关操作(C语言实现) #include<stdio.h> #define Size 100 typedef int DataType; typedef struct {Data ...

delphi 标题栏相关操作

delphi 标题栏相关操作相关推荐

最新文章

热门文章