Delphi 2009 之 TLinkLabel

======================================================
注：本文源代码点此下载
======================================================

#10楼 2008-08-25 12:40 guest[未注册用户]

用xp+d7测试,确实在变。跟踪vcl源码即可发现原因:

[1] 写bordericons => setbordericons => recreatewnd => destroyhandle; [2] 读handle => gethandle => handleneeded => createhandle;

再次声明,本人用的是d7,其它版本没有测试。

回复 引用

#11楼 2008-09-10 22:47 月夜[未注册用户]

在 formcreate 肯定会变啦,如果你把代码写在一个按钮的单击事件里面试试,那就不会改变的。

回复 引用

#12楼 2008-09-13 10:12 欧阳蓝缺

to 月夜:

不管在哪里执行self.bordericons := self.bordericons - [bisystemmenu];在delphi中窗口句柄都会变

回复 引用 查看

#13楼 2008-09-28 00:06 dzw[未注册用户]

procedure tcustomform.setbordericons(value: tbordericons);

begin

if fbordericons

回复 引用

#14楼 2008-10-27 11:09 沉香[未注册用户]

我用d2009 3210.17555+winxp sp3 测试,没有发现你说的问题

self.handle是一样的

[e-mail]

回复 引用

#15楼 2008-10-28 13:48 delphier[未注册用户]

winxp+ d7确实有这个问题

procedure tform1.button1click(sender: tobject);

begin

showmessage(inttostr(handle));

self.bordericons:= self.bordericons - [bisystemmenu];

showmessage(inttostr(handle));

end;

不管在哪里都会变。

[1] 写bordericons => setbordericons => recreatewnd => destroyhandle; [2] 读handle => gethandle => handleneeded => createhandle;

回复 引用

注册用户登录后才能发表评论,请 登录 或 注册,返回博客园首页。

首页博问闪存新闻园子招聘知识库

最新it新闻:

·ios 5.1 beta3文件预示未来 siri有可能支持 ipad和 ipod touch

·android平台12月广告浏览份额51.6% 超越ios

·测试版ios源代码显示ipad 3或将支持siri

·斯蒂芬·霍金的新电脑

·京东商城2.95亿竞得北京商业地一块

» 更多新闻...

最新知识库文章:

·javascript 面向对象编程

·持续集成之“everything is code”

·持续集成之“软件自我识别”

·持续集成之戏说check-in dance

·什么是闭包。
       我的理解

» 更多知识库文章...

china-pub 2011秋季教材巡展

china-pub 计算机绝版图书按需印刷服务

copyright ©2012 万一 powered by:博客园 模板提供:沪江博客

======================================================
在最后，我邀请大家参加新浪APP，就是新浪免费送大家的一个空间，支持PHP+MySql，免费二级域名，免费域名绑定 这个是我邀请的地址，您通过这个链接注册即为我的好友，并获赠云豆500个，价值5元哦！短网址是http://t.cn/SXOiLh我创建的小站每天访客已经达到2000+了，每天挂广告赚50+元哦，呵呵，饭钱不愁了，\(^o^)/