======================================================
注:本文源代码点此下载
======================================================
[delphi]窗口最大化时怎么才能不要把任务栏盖住
方法一:
设置要 全屏的窗体的align 属性为 alclient ,此法最快。
方法二:用代码控制。在窗体 的创建事件中,(此方法 运行后窗体也可以移动。影响美观。应该再加入禁止窗体移动的代码)写入
var
traywnd:hwnd;//任务栏句柄
rec:trect;
begin
traywnd:=findwindow('shell_traywnd',nil);//得到任务栏句柄
getwindowrect(traywnd,rec);//获取任务栏尺寸
mainfm .left :=0;
mainfm .top:=0;
mainfm .width :=screen .width ;
mainfm .height :=screen .height-(rec.bottom- rec.top) ;
这样也实现了 全屏不挡了任务栏。
绿色通道:好文要顶关注我收藏该文与我联系
posted @ 2010-08-19 14:36 huhu0013 阅读(888) 评论(0)编辑 收藏
注册用户登录后才能发表评论,请 登录 或 注册,返回博客园首页。
最新it新闻:
·ios 5.1 beta3文件预示未来 siri有可能支持 ipad和 ipod touch
·android平台12月广告浏览份额51.6% 超越ios
» 更多新闻...
最新知识库文章:
======================================================
在最后,我邀请大家参加新浪APP,就是新浪免费送大家的一个空间,支持PHP+MySql,免费二级域名,免费域名绑定 这个是我邀请的地址,您通过这个链接注册即为我的好友,并获赠云豆500个,价值5元哦!短网址是http://t.cn/SXOiLh我创建的小站每天访客已经达到2000+了,每天挂广告赚50+元哦,呵呵,饭钱不愁了,\(^o^)/