文档章节

重载 CreateParams 方法[2]: 重载 TForm.CreateParams 方法的几个例子

涂孟超
 涂孟超
发布于 2014/09/26 15:35
字数 227
阅读 10
收藏 0

这里有所有相关参数的解释: http://www.cnblogs.com/del/archive/2008/04/15/1154359.html

//最大化窗口
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.Style := Params.Style or WS_MAXIMIZE; {WS_MINIMIZE 是最小化}
end;


//取消系统菜单(如果没法关闭就用 Alt+F4 吧)
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.Style := Params.Style and not WS_SYSMENU;
end;


//取消能够调整大小的边框
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.Style := Params.Style and not WS_THICKFRAME;
end;


//在所有非顶层窗口的最上面
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.ExStyle := Params.ExStyle or WS_EX_TOPMOST;
end;


//工具窗口
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.ExStyle := Params.ExStyle or WS_EX_TOOLWINDOW;
end;


//带阴影边界, 有这 MDI 窗口的视觉
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.ExStyle := Params.ExStyle or WS_EX_CLIENTEDGE;
end;


//带帮助按钮
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.Style := Params.Style and not (WS_MINIMIZEBOX or WS_MAXIMIZEBOX);
  Params.ExStyle := Params.ExStyle or WS_EX_CONTEXTHELP;
end;

//隐藏标题栏
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.Style := WS_DLGFRAME or WS_POPUP;
end;

 
 
 
 
 

 

 

  

本文转载自:http://www.cnblogs.com/del/archive/2008/09/02/1282178.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
私信 提问
用Winform实现屏幕小键盘

前几天碰到一个问题,需要使用Winform实现屏幕小键盘,研究了一下,有一个自认为比较完美的解决方案。 屏幕小键盘的实现方式很简单,无非就是在窗体上加上几个按钮,然后在鼠标的点击事件里使...

技术小美
2017/11/12
0
0
C# Winform 中真正意义的透明控件

在稍微复杂的交互应用中,避免不了耗时的操作,这时候总希望给用户明确的提示,表示程序在运行中暂时不能进行其他操作。显示一个半透明的处于等待状态的遮罩层是很好的方法。在Web应用程序中...

夏至如沫
2015/10/22
7.9K
1
winform 容器控件和timer的问题总结

问题1: 使用容器控件布局多个控件,显示出现卡顿,非常慢? 解决方案: 1,升级电脑配置(网上大神说地) 2,重载createParams函数, 代码如下: protected override CreateParams CreatePara...

__alias
2014/01/13
0
0
重写、覆盖、重载、多态几个概念的区别分析

override->重写(=覆盖)、overload->重载、polymorphism -> 多态 override是重写(覆盖)了一个方法,以实现不同的功能。一般是用于子类在继承父类时,重写(重新实现)父类中的方法。 重写(...

大灰狼wow
2014/04/30
0
0
php设计模式的六大原则(三):里氏替换原则

<?php //例子1class Bird{ protect function fly(){ }}//翠鸟class KingFisher extends Bird{ } //鸵鸟class Ostrich extends Bird{ //鸵鸟不会飞啊} //例子2 class A{ protect function add......

stone_
2015/11/13
0
0

没有更多内容

加载失败,请刷新页面

加载更多

如何处理JavaScript 中的货币值?

 金钱无处不在。   无论在银行应用程序、电子商务网站还是证券交易所平台,我们每天都在与金钱互动。我们也越来越依赖技术来处理问题。   然而,关于如何以编程处理货币价值尚无共识。虽...

数据星河
11分钟前
3
0
并发中的volatile

1. 概述 由于线程有本地内存的存在, 一个线程修改的共享变量不会及时的刷新到主内存中, 使得另一个线程读取共享变量时读取到的仍旧是旧值, 就导致了内存可见性问题. 现在volatile就可以解决这...

Ala6
12分钟前
6
0
三大特性之---封装

封装从字面上来理解就是包装的意思,专业点就是信息隐藏,是指利用抽象数据类型将数据和基于数据的操作封装在一起,使其构成一个不可分割的独立实体,数据被保护在抽象数据类型的内部,尽可能...

architect刘源源
14分钟前
2
0
设计模式 之 策略模式

设计模式 之 策略模式 定义 提供几个算法策略,选择其中一个策略去执行。 优点 由于将算法封装成单独的策略,策略可以灵活切换。 扩展性好,符合开闭原则。 缺点 策略多,类也会变多 策略类需...

GMarshal
15分钟前
2
0
HBase集群监控的那些事儿

为什么需要监控? 为了保证系统的稳定性,可靠性,可运维性。 掌控集群的核心性能指标,了解集群的性能表现; 集群出现问题时及时报警,便于运维同学及时修复问题; 集群重要指标值异常时进行...

微笑向暖wx
15分钟前
2
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部